Mit Sekunden und hundertstel rechnen

[luzifer]

Hallo,

ich hab ein kleines Problem mit meinem Progi. Ich will mit der Zeit rechnen, brauch aber nur die Sekunden und hundertstel. Natürlich arbeite ich hier auch noch mit ner Query wo der ganze Schmu gespeichert wird.

Jetz habsch keene Ahnung wie ich die ganze Sache händeln muss.
Hab da bloss schon mal was mit Encode und decode Datetime ausprobiert, hat aber nicht gefunzt.

[gmarts]

Hallo!

in der OH gibt es folgendes Beispiel zu decodetime:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);

var
  Present: TDateTime;
  Year, Month, Day, Hour, Min, Sec, MSec: Word;
 begin
  Present:= Now;
  DecodeDate(Present, Year, Month, Day);
  Label1.Caption := 'Heute ist Tag ' + IntToStr(Day) + ' des Monats '
    + IntToStr(Month) + ' im Jahr ' + IntToStr(Year);
  DecodeTime(Present, Hour, Min, Sec, MSec);
  Label2.Caption := 'Die Uhrzeit ist Minute ' + IntToStr(Min) + ' der Stunde '
    + IntToStr(Hour);
end;

Das müsste bei dir problemlos funktionieren.

Wo hakt es denn bei dir?

MfG GM

[luzifer]

Danke gmarts,

hab dein Ansatz nur noch ein weing umgestellt > gab dann noch ein paar Fehler aber jetzt funzt es...
Danke für die Hilfe