Delphi-Quellcode:
type elemente =record
name:string;
typ:twincontrol;
end;
var elem: array[0..10] of elemente;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var test:tbutton;
begin
test:=tbutton.Create(form1);
test.Left:=10;
test.Top:=10;
test.caption:='huhu';
test.Width:=80;
test.Height:=22;
test.Name:='uggi';
elem[1].name:='uggi';
elem[1].typ:=test;
elem[1].typ(form1.FindComponent(elem[1].name)).left:=20;
end;
end.
So geht es natürlich nicht. Ich möchte mit der folgenden Zeile verschiedene Objekte ansprechen.
elem[1].typ(form1.FindComponent(elem[1].name)).left:=20;
Labels, buttons, etc.
Es ist sichergestellt das nur Eigenschaften abgefragt werden, die die alle haben.
elem[1].typ soll quasi für die Standard-Controlls stehen, bzw. kann ich bei der OnCreate Procedure ja auch etwas zuweisen à la elem[1].typ:=test;
Nur ich weiß nicht was das für ein Datentyp sein muss.