Einzelnen Beitrag anzeigen

Benutzerbild von RavenIV
RavenIV

Registriert seit: 12. Jan 2005
Ort: Waldshut-Tiengen
2.875 Beiträge
 
Delphi 2007 Enterprise
 
#11

Re: globale Variablen?

  Alt 29. Jan 2008, 09:29
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.
  Mit Zitat antworten Zitat