Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Noticias
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #14  
Antiguo 29-04-2013
jorge82 jorge82 is offline
Baneado
 
Registrado: jun 2005
Ubicación: Mérida, Yucatán, México
Posts: 75
Poder: 19
jorge82 Va por buen camino
Cita:
Empezado por Lepe Ver Mensaje
Ya que está calentito el tema de la sintaxis... vamos a echar un jarro de agua fría:
¿Por qué no quitar los begin y end y las{ } de un plumazo?

Así lo hace python basándose en la sangría del código, más simple y legible, creo imposible.
(Los tabuladores se pueden configurar a 2 caracteres, yo lo tenía por defecto a 8. Esto es de un programa que hice en 3D, "def" es un "procedure" de delphi, los comentarios que se pongan a continuación entre comillas dobles o triples, sirven de ayuda al pulsar ctrl + espacio, igual que en delphi. "self" tiene el mismo significado que en delphi. Las variables no se necesitan declarar, lenguaje interpretado).
Código:
	def attachTo(self, node):
		''' reattach axis and rotation arrows to the node'''
		self.scale = 0, 0, 0
		if node:
			pos = node._getDerivedPosition() 
			ori = node._getDerivedOrientation()
			if 'translation' in self.entryShow and 'translation' in self._allowedToShow:
				self.translateNode.setPosition(pos)
				self.translateNode.setScale(self.normalScale)
			if 'rotation' in self.entryShow and 'rotation' in self._allowedToShow:
				self.rotateNode.setPosition(pos + self._rotateNodeOffset)
				self.rotateNode.setOrientation(ori)
				self.rotateNode.setScale(self.normalScale)

	def selectTerrain(self, positionTuple):
		if 'terrain' in self._allowedToShow:
			self.attachTo(None)
			if positionTuple[0] is not None and positionTuple[1] is not None and positionTuple[2] is not None:
				self.terrainNode.setPosition(positionTuple[0], positionTuple[1] + 0.5, positionTuple[2])
				self.terrainNode.setScale(0.2, 0.2, 0.2)
	
		if 'pointer3d' in self._allowedToShow:
			self.pointer3d.setPosition(positionTuple)
			s = 0.05
			self.pointer3d.setScale(s, s, s)
En cuanto a lo de crear variables, hace 3 años que no voy a la parte de declaración de un procedimiento, en cualquier parte del código escribo: "Lista:TStringList" pulso una combinación de teclas en Delphi7 y me crea la declaración de la variable y escribe el constructor automáticamente. Esto debería estar en el IDE sí o sí.

Oye Lepe, ¿utilizas algún experto para hacer lo de la declaración de las variables?, o como le haces, ¿el IDE de Delphi7 ya tiene algo así?
__________________
Un saludito.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Tema para la próxima reunión de delphi en México. poliburro Debates 11 25-09-2008 16:39:07
Sacar fecha mas proxima VRO MySQL 1 26-06-2008 10:09:40
fecha mas proxima VRO Varios 1 04-10-2007 13:31:20
Avanzar a la próxima línea de error Crandel Varios 5 27-11-2006 17:35:49
La proxima versión de Delphi será compatible con la VCL y el .NET SMTZ Noticias 0 30-05-2004 09:34:16


La franja horaria es GMT +2. Ahora son las 08:45:48.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi