Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi sql zeitsummieren "523600" STD, MIN, SEK.. (https://www.delphipraxis.net/77345-sql-zeitsummieren-523600-std-min-sek.html)

Karstadt 18. Sep 2006 14:07

Datenbank: mysql • Version: 4 • Zugriff über: mydac

sql zeitsummieren "523600" STD, MIN, SEK..
 
Hallo.

So mit greife ich auf die Tabelle zu.

SQL-Code:
SELECT SUM(pma_ar_gesamt) FROM projekte_ma
Result := 523600

das sind 52 Stunden 36 Minuten und 00 Sekunden.

Wie kann ich das aber als 52:36:00 ausgeben?

mkinzler 18. Sep 2006 14:16

Re: sql zeitsummieren "523600" STD, MIN, SEK..
 
Was für einen Typ hat denn das Ergebnis?
Wenn es ein String ist könntset du es ja von rechts zerlegen.

Karstadt 18. Sep 2006 15:44

Re: sql zeitsummieren "523600" STD, MIN, SEK..
 
Das wäre möglich

problem ist nur die Länge. das kann auch 1 minute sein 100

shmia 18. Sep 2006 15:52

Re: sql zeitsummieren "523600" STD, MIN, SEK..
 
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;

Karstadt 19. Sep 2006 08:10

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

Rückgabewert von war falsch. Beim Zeitaddieren wird ein anderes Wert ausgegeben.

Ich habe mein Problem so gelöst:

SQL-Code:
SELECT SUM(Minute(pma_ar_gesamt)+(Hour(pma_ar_gesamt)*60)) FROM projekte_ma
dann wird weiter gerechnet...

Die sekunden sind NUN nicht mehr SO wichtig ;) ist immer 00


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:24 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz