Bass.dll aktuelle Position auslesen

[Luki206]

Ok danke :)

Edit: DElphi bringt mir zwei mal folgenden Fehler:

Code:

[dcc32 Fehler] haupt.pas(544): E2015 Operator ist auf diesen Operandentyp nicht anwendbar

und mein Delphi Code sieht so aus:

Delphi-Quellcode:

procedure TFrmHaupt.Timer1Timer(Sender: TObject);
var StreamPos: Int64; Ellapsed: double; WholeSeconds: Double; TimeEllapsedStr: String;
const SECONDS_PER_MINUTE = 60;
begin
  StreamPos := BASS_ChannelGetPosition(strs, BASS_POS_BYTE);
  Ellapsed := BASS_ChannelBytes2Seconds(strs, StreamPos);
  WholeSeconds := trunc(Ellapsed);
  TimeEllapsedStr := Format('%.2d:%.2d', [WholeSeconds div SECONDS_PER_MINUTE, WholeSeconds mod SECONDS_PER_MINUTE]);
  LblLaufZeit.Caption := TimeEllapsedStr;
end;

Habe ich da was mit den Variablen falsch gemacht?

Kann mir keiner Helfen oder stehe ich so aufm Schlauch das mir nicht geholfen gehört? :mrgreen:

So mein letztes Edit ^^ ich habe es so gelöst das ich die Dauer aus der MP3 mit einem im onTimer Event sitzenden +1 Routine vergleiche aber trotzdem vielen dank :)

[nuclearping]

Zitat:

Zitat von Luki206 (Beitrag 1251297)

Und wie würde ich dass dann machen wenn ich jetzt haben möchte dass es so aus sieht: '0:0' Mit Format?

Die Frage hast du doch schonmal gestellt: http://www.delphipraxis.net/1250160-post9.html ;)

[DeddyH]

Man müsste ja nur einmal nachsehen, was trunc zurückgibt und was DIV und MOD für Datentypen erwarten, dann wüsste man auch, wieso ich die Nachkommastellen abschneide :roll: