Delphi-Quellcode:
MediaPlayer1.TimeFormat := tfHMS;
PosMedia := MediaPlayer1.Position;
PosMedia ist ein LongInt.
Delphi-Quellcode:
HMSRecord = record
Hours : byte;
Minutes : byte;
Seconds : byte;
NotUsed : byte;
end;
with HMSRecord[PosMedia] do
Label2.Caption := IntToStr(Hours) + ':' + IntToStr(Minutes) + ':' + IntToStr(Seconds);
So was ähnliches müsste auch in der Hilfe von Delphi stehen.