Moin,
ich hab 2 Formulare die ich auch mit Programmstart anzeigen lasse...
Beim ersten Formular Initialisiere ich
Opengl auf dem zweiten
habe ich einen Opendialog und einen Button.
Wenn man auf den Button klickt öffnet sich der Opendialog und man sucht sich
z.B. Ball2.3ds aus so sieht der Code aus
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
if Opendialog1.Execute then
begin
Filename := Opendialog1.FileName;
Form1.Load;
end;
end;
Und die Load Procedure:
Delphi-Quellcode:
procedure TForm1.Load;
begin
model:=TAll3DSMesh.Create(nil);
model.LoadFromFile('Form2.Filename');
Form1.Modelladen := true;
end;
Die Variable Filename ist eine Globale Variable!
Nun starte ich und...
Tja Fehler:' Objekt konnte nicht geladen werden'!
Wenn ich nun aber Opendialog weglasse funktioniert es...
In etwa so...
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
Filename := 'Modelle\Ball2.3ds';
Form1.Load;
end;
Aber ich möchte ja aussuchen können welches Objekt ich lade!?
Kann mir jemand erklären wie ich das machen kann? (Ich hoffe ich hab es richtig Formuliert...
)