Bestaetigung
Version vom 5. November 2013, 16:11 Uhr von Pfotenhauer (Diskussion | Beiträge) (Die Seite wurde neu angelegt: „{|class="wikitable" === RAP-Funktion "{{SEITENNAME}}" === |'''Beschreibung''' || function Bestaetigung(const aFrage: String): Boolean; |- |'''Parameter'''…“)
RAP-Funktion "Bestaetigung"
| Beschreibung |
function Bestaetigung(const aFrage: String): Boolean; |
| Parameter |
aFrage - String mir einer Frage, die sich durch Ja oder nein
beantworten lässt
|
| Rückgabewert |
TRUE, falls 'OK' angeklickt wird, FALSE sonst |
| Beispiel |
Procedure ReportBeforePrint;
var
lFilename : String;
begin
If Bestaetigung('Soll der Text geladen werden?') then begin
lFilename:=FileOpenDlg('*.txt','c:\Texte','Textdateien|*.txt|Alle Dateien|*.*');
If lFilename <> then Memo1.Text:=LoadFromFile(lFilename)
end;
end;
|
Zurück zu RAP-Funktionen