Zitat von
xX0815Xx:
Ich könnte doch aber auch mit weiteren public-Variablen prüfen ob die anderen Bedingungen erfüllt sind und dann die Variable ändern, oder?
Nein.
Wenn Du machst:
Delphi-Quellcode:
Form1: TForm...
...
public
fAbfrageStarten: Boolen;
...
...
Dann in Form2:
Form1.fAbfrageStarten := True;
dann ist AbfrageStarten bereits geändert.
Du könntest natürlich in Form2 machen:
Delphi-Quellcode:
...
if Form1.VerbindungGeoeffnet and Form1.WerteAbgefragt and Form1.DarfGestartetWerden then
begin
Form1.fAbfrageStarten := True;
end
else
begin
Form1.fAbfrageStarten := False;
end;
Das müsstest Du dann aber
immer machen, wenn Du Form1.AbfrageStarten ändern möchtest.
Also kannst Du es auch gleich im Setter für AbfrageStarten in Form1 erledigen:
Delphi-Quellcode:
Form1: TForm...
...
private
fAbfrageStarten: Boolean;
procedure SetAbfrageStarten(...);
...
published
...
property AbfrageStarten: Boolean write SetAbfrageStarten;
...
end;
...
...
procedure Form1.SetAbfrageStarten(...);
begin
if ... and ... and ... then
begin
...
fAbfrageStarten := True;
end
else
begin
...
fAbfrageStarten := False;
end;
end;
Klaus E.
Linux - das längste Text-Adventure aller Zeiten...
Wer nie Linux mit dem vi konfiguriert hat, der hat am Leben vorbei geklickt.