Funktion aufrufen

[Peter Hennek]

Hallo, könnt Ihr mir zu dieser Funktion einen Beispielaufruf aufschreiben. Danke ph.
<br>function Is24HourTimeFormat: Boolean;
<br>var
<br>DefaultLCID: LCID;
<br>begin
<br>DefaultLCID := GetThreadLocale;
<br>Result := 0 <> StrToIntDef(GetLocaleStr(DefaultLCID,
<br>LOCALE_ITIME,'0'), 0);
<br>end;

[Frank ter Duis]

if Is24HourTimeFormat then<br>
Application.MessageBox('Function gibt Wahr zurück!', 'MSG', 0)<br>
else<br>
Application.MessageBox('Function gibt Falsch zurück!', 'MSG', 0);<br><br>
Gruß Fran