Ver Mensaje Individual
  #1  
Antiguo 16-01-2009
Avatar de jbautista
jbautista jbautista is offline
Miembro
 
Registrado: jul 2008
Posts: 43
Reputación: 0
jbautista Va por buen camino
Crear Tipos de Datos Propios?

Hola que tal, pues lo que quisiera saber (si se puede) es como definir tipos de datos proios... bueno, por ejemplo hace tiempo compre un componente (un Grid) que tiene un metodo:

AddButton(ACol, ARow, bw, bh: Integer; Caption: string; hal: TCellHalign; val: TCellValign);

En este metodo los primero parametros ACol, ARow, bw, bh: Integer; Caption: string; son de tipo predefinidos en Delphi, pero los siguientes son de la Clase del Componente (TCellHalign; val: TCellValign)

Al invocar al metodo lo tengo que hacer de la sig, manera:

grid1.AddButton(0,0,10,10,'Boton',haCenter,vaCenter)

En los dos ultimos parametros le tengo mandar forzosamente los tipos que me pide (haCenter,haLeft,vaCenter,etc)

Pues bueno yo quisiera hacer algo parecido en mi programa:

Tengo una Clase x, con un metodo llamado MueveRenglon
MueveRenglon(posicion:Boolean);
begin
if posicion = true then ...(Mueve
else if posicion = false then...(Mueve abajo)
end;
pero no quiero que al invocar al metodo de la clase desde el un Form le pasen directamente el valor boolean

p.e. Form.objetoDeClaseX.MueveRenglon(True)

me gustaria definir un tipo de dato pripio (como el caso que les puse arriba)
y que al invocar mi metodo de clase desde un form se haga de la sig. manera:

Form.objetoDeClaseX.MueveRenglon(cArriba)

y que mi metodo quedara definido
MueveRenglon(posicion:TPosicion);
begin
if posicion=cArriba then ...(Mueve arriba)
else
if
posicion=cAbajo then...(Mueve abajo)
end;

Como se declaran y usan lo tipos de datos propios (cArriba y cAbajo).

De antemano muchas gracias.

Buen Dia.
Responder Con Cita