Array de distintos tipos de objetos
Publicado por Claudio (3 intervenciones) el 12/09/2003 10:49:10
Hola, necesitaria crear una variable array en donde almacene distintos tipos en cada item, por ej:
Type TButton = Record
Name :String;
Width :Integer;
Height :Integer;
Dimensions:TRect;
End;
Type TSlide = Record
Name :String;
MainRect :TRect;
Min, Max :Integer;
Dimensions :TRect;
End;
...
var Objects :Array of [Any of objects, TButton, TSlide, ...]; QUE VA AHI ?
...
Objects[0]: TButton;
Objects[1]: TSlide;
...
Gracias
Type TButton = Record
Name :String;
Width :Integer;
Height :Integer;
Dimensions:TRect;
End;
Type TSlide = Record
Name :String;
MainRect :TRect;
Min, Max :Integer;
Dimensions :TRect;
End;
...
var Objects :Array of [Any of objects, TButton, TSlide, ...]; QUE VA AHI ?
...
Objects[0]: TButton;
Objects[1]: TSlide;
...
Gracias
Valora esta pregunta


0