Zitat von
toms:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
const
{$j+} bClicked: Boolean = False;{$j-}
begin
if bClicked then
ShowMessage('Du hast schon geklickt')
else
bClicked := True;
end;
So gehts nicht, da man Konstanten nicht ändern kann
@Steve: ich dachte, die Variable wird im ganzen Event beibehalten (also auch beim 2. und 3. mal aufrufen)
