ist auch klar, du rufst zwar
TGrundeinstellungen.Create(Self)
auf, weißt dies aber nirgendwo der Variablen "Grundeinstellungen" zu. Um es dir zu verdeutlichen:
Delphi-Quellcode:
with TGrundeinstellungen.Create(Self) do
try
ShowModal;
if EtwasNichtErzeugtesBzwEineVariableDerNichtsZugewiesenWurde.ModalResult = mrOk then
Datenneuladen1.OnClick(Datenneuladen1);
finally
Free;
end;
wenn dann
Delphi-Quellcode:
with TGrundeinstellungen.Create(Self) do
try
ShowModal;
if ModalResult = mrOK then
Datenneuladen1.OnClick(Datenneuladen1);
finally
Free;
end;
oder
Delphi-Quellcode:
with TGrundeinstellungen.Create(Self) do
try
if ShowModal = mrOk then
Datenneuladen1.OnClick(Datenneuladen1);
finally
Free;
end;
oder
Delphi-Quellcode:
var
lFormInstance: TGrundeinstellungen;
begin
lFormInstance := TGrundeinstellungen.Create(Self);
try
lFormInstance.ShowModal;
if lFormInstance.ModalResult = mrOK then
Datenneuladen1.OnClick(Datenneuladen1);
finally
lFormInstance.Free;
end;