http://wiki.svws.nrw.de/mediawiki/index.php?action=history&feed=atom&title=ReadDateTime 2026-04-26T06:49:05Z Versionsgeschichte dieser Seite in Schild-NRW Wiki MediaWiki 1.39.12 http://wiki.svws.nrw.de/mediawiki/index.php?title=ReadDateTime&diff=81&oldid=prev 2013-11-05T16:32:36Z

<p>Die Seite wurde neu angelegt: „{|class=&quot;wikitable&quot; === RAP-Funktion &quot;{{SEITENNAME}}&quot; === |&#039;&#039;&#039;Beschreibung&#039;&#039;&#039; || function ReadDateTime(aPrompt: String; var D,T1,T2: TDateTime; IsInterval…“</p> <p><b>Neue Seite</b></p><div>{|class=&quot;wikitable&quot;<br /> === RAP-Funktion &quot;{{SEITENNAME}}&quot; ===<br /> |'''Beschreibung''' || <br /> function ReadDateTime(aPrompt: String; var D,T1,T2: TDateTime; IsIntervall: Boolean): Boolean;<br /> |-<br /> |'''Parameter''' || <br /> aPrompt - Hinweistext im Dialogtitel<br /> D - Datum)<br /> T1 - Uhrzeit (Beginn)<br /> T2 - Uhrzeit(Ende<br /> IsIntervall - Falls True, wird die Uhrzeit (Ende) eingeblendet<br /> und kann verändert werden<br /> |-<br /> |'''Rückgabewert''' ||<br /> True: Dialog durch „Ok“ beendet, False sonst<br /> |- <br /> |'''Beispiel''' || <br /> Procedure Label1OnGetText(var Text: String);<br /> var<br /> D,T1,T2 : Datetime;<br /> begin<br /> If ReadDateTime('Sprechtag', D, T1, T2, True) then<br /> Text:='Elternsprechtag am ' + DateToStr(D)<br /> + ' von ' + TimeToStr(T1) + ' Uhr'<br /> + ' bis ' + TimeToStr(T2) + ' Uhr'<br /> else<br /> Text:='---';<br /> end;<br /> |}<br /> <br /> <br /> <br /> '''Zurück zu [[RAP-Funktionen]]'''</div>

Pfotenhauer