CanClose spielt verrückt

[inherited]

Zitat von dominikkv:

leute...was ist daran so schwierig?

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if passwortabfrage then canClose := true else canClose := False;
end;

Junge, warum so kompliziert?
  CanClose:=passwortabfrage; Und bitte nicht in dem Ton

[Zacherl]

Eben .. wobei ganz einfach Passwortabfrage bei mit CloseQ heißt .. ganz simpel eigentlich ..
naja lassen wir dem Threadersteller erstmal Zeit zu antworten

[SirThornberry]

wofür ist in der vierten Zeile das "Close"?

[Nils_13]

Sein Code sollte wohl eine Prozedur darstellen, statt OnCloseQuery. Dann muss er nämlich auch noch die Form schließen, da sie es nicht von alleine machen würde.

[Matze]

Zitat von Nils_13:

Sein Code sollte wohl eine Prozedur darstellen, statt OnCloseQuery. Dann muss er nämlich auch noch die Form schließen, da sie es nicht von alleine machen würde.

Dann kann er auf CanClose aber nicht zugreifen. Wie Jens es bemerkt hat, brauchst du im OnClose kein Close aufrufen, das könnte unter Umständen eine Rekursion auslösen, habe es allerdings nie getestet.

[Zacherl]

Genau und als globale Variable wäre CanClose auch nicht möglich.

[Nils_13]

Oh, stimmt, dann ist halt Close oder CanClose falsch.

[dominikkv]

Zitat von inherited:

Zitat von dominikkv:

leute...was ist daran so schwierig?

Delphi-Quellcode:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if passwortabfrage then canClose := true else canClose := False;
end;

Junge, warum so kompliziert?
  CanClose:=passwortabfrage; Und bitte nicht in dem Ton

jo, so gehts einfacher...

[Bassel]

Ahh ich Depp

Dank an alle Beteiligten