Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#4

Re: sql zeitsummieren "523600" STD, MIN, SEK..

  Alt 18. Sep 2006, 15:52
Du kannst das Darstellungsproblem auch clientseitig in deinem Programm lösen.
Dazu muss das Event OnGetText benutzt werden.
Delphi-Quellcode:
procedure TForm1.TimeFieldGetText(Sender: TField; var Text: String; DisplayText: Boolean);
var
   zeit : integer;
begin
   if Sender.IsNull then
      Text := ''
   else
   begin
      zeit := Sender.AsInteger;
      Text := Format('%2.2d:%2.2d:%2.2d', [zeit div 10000, (zeit mod 10000) div 100, zeit mod 100]);
   end;
end;
Andreas
  Mit Zitat antworten Zitat