Okay, formSettings ist noch nicht erstellt. Wie sorge ich dafür?
Entweder steh ich im Moment gewaltig auffem Schlauch oder ich weiss auch nicht. Einen solchen Fehler hatte ich noch nie in diesem Zusammenhang
edit:
es geht jetzt! Ich habe mir im Debugger das den Aufruf-Stack anzeigen lassen, der so aussah:
Delphi-Quellcode:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {addPatient},
mysqlqueries in 'mysqlqueries.pas',
Unit5 in 'Unit5.pas' {doctorFrame},
settings in 'settings.pas' {formSettings};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TaddPatient, addPatient);
Application.CreateForm(TdoctorFrame, doctorFrame);
Application.CreateForm(TformSettings, formSettings); //das hier muss ganz nach oben
Application.Run;
end.
daraus wurde dann
Delphi-Quellcode:
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {addPatient},
mysqlqueries in 'mysqlqueries.pas',
Unit5 in 'Unit5.pas' {doctorFrame},
settings in 'settings.pas' {formSettings};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TformSettings, formSettings); //<--so ist das schon besser!
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TaddPatient, addPatient);
Application.CreateForm(TdoctorFrame, doctorFrame);
Application.Run;
end.