tracklength(integer) in Date (hh,MM,SS) umwandeln??

[Pitch-Bull]

wie kann man integer in date umwandeln??

[barf00s]

in MMSystem gibts behelfsfunktionen ....

andererseits hilfts dir vllt:

1 Minute = 60 Sekunden
1 Stunde = 60 Minuten
1 Tag = 24 Stunden
1 Monat = 30 Tage
1 Jahr = 12 Monate (^_°(@==(-.-)

[Matze]

EncodeTime sollte weiterhelfen.

[Pitch-Bull]

du mist mir ja n kleiner scherzkeks...
und immer wieder nett (das gilt:barf00s)

Danke

[barf00s]

da die träcklänge in sekunden angegeben wird - ... hab nur laut gedacht

<klugscheiß>"date" gibts nicht - im zusammenhang mit "integer nach "date" konvertieren" - wenn dann Integer -> TDateTime/double =P</klugscheiß>

[Pitch-Bull]

vielen dank, aber ich habe jetzt schon eine lösung gefunden

Delphi-Quellcode:

TrackBar2.Max:=MediaPlayer1.TrackLength[MediaPlayer1.Length];
h:=TrackBar2.max div 3600000000;
m:=(TrackBar2.max -h) div 60000;
s:=(TrackBar2.max -h-m) div 1000;
lblauftext.Caption:=playsound+'   '+inttostr(h)+':'+IntToStr(m)+':'+IntToStr(s);

[barf00s]

Zitat:

lblauftext.Caption:=playsound+' '+inttostr(h)+':'+IntToStr(m)+':'+IntToStr(s);

lblLauftext.Caption := playsound + Format(' %d:%d:%d', [h, m, s]); =P

[Pitch-Bull]

ey super, das funktioniert...aber was sind das für zeichen? was sagen die?

Zitat:

' %d:%d:%d'

[barf00s]

%d ist ein platzhalter für "decimals"

%3d für dreistellige

%f für floats (fließkommazahlen - also single, double, real, real48, comp, extended)
%3.2f dasselbe nur für 3 vorkomma und 2 nachkommastellen


USW USW ... schau mal in der hilfe nach der funktion "Format"

[Pitch-Bull]

da hab ich auch gard geguckt..
ist ja interessant-wat man nich allet hier dazulernt.

naguti - allet klar. bis denne. Vielen dank dafür