Super DANKE!!!!
habs nen bissel geändert:
Delphi-Quellcode:
begin
GetSystemTime(SystemTime);
with SystemTime do
Result := houroftheday((EncodeDate(wYear, wMonth, wDay) +
EncodeTime(wHour, wMinute, wSecond, wMilliseconds))+
11*(1.0/24.0));
end
und funktioniert SUPER!!!!