Zitat von
Flom:
ich versteh irgendwie den sinn dieser Berechnung dahinter nicht...
Ich sag jetzt also:
Delphi-Quellcode:
Dezimal:=aAudioFile.Dauer;
Minute := Trunc(Dezimal) + 0.6*Frac(Dezimal);
Item.SubItems.Add(FloatToStr(Minute));
Wobei ich noch ein Problem mit dem Format habe wo sag ich denn dort das er sich auf Minute beziehen soll?
Wenns funktioniert is ja gut ... das mit dem Format ginge dann so:
Delphi-Quellcode:
Dezimal:=aAudioFile.Dauer;
Item.SubItems.Add(IntToStr(Trunc(Dezimal)) + ':' + InttoStr(0.6*Frac(Dezimal)));