Fixed missing result

This commit is contained in:
Andreas Schneider 2015-09-28 11:09:59 +02:00
parent 5ae488c008
commit 46a87b3e0c

View File

@ -17,7 +17,7 @@ implementation
function Prompt(ACaption: String; AMode: TPromptMode): String;
begin
Prompt(ACaption, '', AMode);
Result := Prompt(ACaption, '', AMode);
end;
function Prompt(ACaption, ADefault: String; AMode: TPromptMode): String;