Nettel Teil.
Aber für mein ab 18 & 18.00Uhr Tee-Kaltgetränk nicht geeignet.
Ich habe einen Minifehler gefunden. Du solltest bei:
Delphi-Quellcode:
function DisplayTime(sTime: Integer): Pchar;
var
Tmp: String;
begin
Tmp := IntToStr(sTime div 60) + ' m '; // <--<< deswegen
If (sTime mod 60) <> 0 then
Tmp := Tmp + IntToStr(sTime mod 60) + ' s';
Result := PChar(Tmp + #0); // <--<< hier mal noch eine #0 dazu
end;
den String Terminieren. Sonst kann es vorkommen das sich seltsame Zeichen einschleichen.