dgTeaTime - Version 0.1 - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

dgTeaTime - Version 0.1

Ein Thema von Mithrandir · begonnen am 24. Sep 2009 · letzter Beitrag vom 25. Sep 2009

Vorheriger Beitrag

Nächster Beitrag

turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge

Delphi 6 Personal

#11

Re: dgTeaTime - Version 0.1

25. Sep 2009, 10:21

Nettel Teil.
Aber für mein ab 18 & 18.00Uhr Tee-Kaltgetränk nicht geeignet.

Ich habe einen Minifehler gefunden. Du solltest bei:

markieren

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.