Forum: Cross-Platform-Entwicklung
by stalkingwolf,
17. Mär 2021
ne das ist nicht das Problem. OK hat einwandfrei funktioniert. Dafür ist die Procedure hinten drin und danach kommt auch kein Quellcode mehr.
Es war nur bei "Abbrechen" das die APP komplett abgestürzt ist. Man kam auch nirgendwo im Quellcode raus.
Das andere funktioniert und ist vermutlich auch insgesamt die korrekte Vorgehensweise.
Forum: Cross-Platform-Entwicklung
by stalkingwolf,
17. Mär 2021
Folgender Code stürzt die APP ab ( APP angehalten -> Neustart ), wenn ich auf Abbrechen drücke. Reproduzierbar.
Die showmessage werden auch gar nicht angezeigt.
Inputbox('Passwort','Passwort:','',procedure(const AResult: TModalResult; const AValue: string)
begin
case aresult of
mrok:begin
// Hier ist alles ok
...