Ich führe eine
lange Berechnung durch, und will verhindern, dass man versehentlich zwei- oder mehrmals auf den Button klickt.
Selbst mit diesem Code klappt es erstaunlicherweise
NICHT:
Bei Button Onclick am Anfang der Berechnung:
Delphi-Quelltext
1: 2: 3:
| button1.Enabled := false; if inprogress then exit; inprogress := true; |
Am Ende:
Delphi-Quelltext
1: 2:
| inprogress := false; button1.Enabled := true; |
Wenn ich ganz schnell doppel-klicke, wird die Prozedur mehrmals hintereinander ausgeführt.
Ich vermute es liegt an den Windows Messages, muss ich da eingreifen?
Moderiert von Narses: Topic aus Windows API verschoben am Di 12.12.2017 um 19:50