Hallo hier ist Terry,
wenn mir bei meinem Problem jemand helfen könnte wäre ich sehr dankbar.
Ich programmiere einen Viewer mit Glscene (
OpenGL).
Mir gelingt es nicht auf zur Laufzeit erzeugte FreeForm Objekte zuzugreifen. Dies
ist erforderlich um eine Datei zu erzeugen in der diverse Scenen Informationen gespeichert werden können.
FreeForm.Parent:=Self; funktioniert nicht.
das weitere tüfteln brachte auch nichts.
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
i: integer;
begin
TFreeForm.Create(Self).Name := 'FreeForm';
FreeForm:=TFreeForm(DummyCube1.AddNewChild(TFreeForm));
FreeForm.Name := 'FreeForm';
FreeForm.LoadFromFile('..\..\media\mushroom.3ds');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
(FindComponent('FreeForm' as TFreeForm).position.x:=2;
end;
end;
[edit=SirThornberry]Delphi-Tags gesetzt - Mfg, SirThornberry[/edit]