Ich hatte schon oft das Programm das beim mehrmaligen nutzen einer InputBox bzw. InputQuery's ein Fehler auftauchte. Kein Delphi-typischer Fehler sondern Windows Zeugs
Im Moment habe ich das folgendermassen:
Delphi-Quellcode:
var input: boolean;
name: string;
begin
input:=InputQuery('Bezeichnung','Bezeichnung für den USB-Stick:',name);
if input = True then
ShowMessage(name);
end;
Jetzt scheint der Fehler auch weg zu sein aber mich würde mal interessieren warum der Fehler kam? Ich hatte es in folgender Variante:
Delphi-Quellcode:
var input: boolean;
begin
// oder mit InputBox
if inputQuery('Bezeichnung','Bezeichnung für den USB-Stick:',name) then
ShowMessage(name);
end;