ReadDateTime: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
svws>Raffenberg (Die Seite wurde neu angelegt: „{|class="wikitable" === RAP-Funktion "{{SEITENNAME}}" === |'''Beschreibung''' || function ReadDateTime(aPrompt: String; var D,T1,T2: TDateTime; IsInterval…“) |
|||
(Eine dazwischenliegende Version desselben Benutzers wird nicht angezeigt) | |||
Zeile 32: | Zeile 32: | ||
'''Zurück zu [[RAP-Funktionen]]''' | '''Zurück zu [[RAP-Funktionen]]''' | ||
[[Kategorie:RAP-Funktionen]] |
Aktuelle Version vom 4. Mai 2022, 17:40 Uhr
RAP-Funktion "ReadDateTime"
Beschreibung |
function ReadDateTime(aPrompt: String; var D,T1,T2: TDateTime; IsIntervall: Boolean): Boolean; |
Parameter |
aPrompt - Hinweistext im Dialogtitel D - Datum) T1 - Uhrzeit (Beginn) T2 - Uhrzeit(Ende IsIntervall - Falls True, wird die Uhrzeit (Ende) eingeblendet und kann verändert werden |
Rückgabewert |
True: Dialog durch „Ok“ beendet, False sonst |
Beispiel |
Procedure Label1OnGetText(var Text: String); var D,T1,T2 : Datetime; begin If ReadDateTime('Sprechtag', D, T1, T2, True) then Text:='Elternsprechtag am ' + DateToStr(D) + ' von ' + TimeToStr(T1) + ' Uhr' + ' bis ' + TimeToStr(T2) + ' Uhr' else Text:='---'; end; |
Zurück zu RAP-Funktionen