Thema
:
Winamp Control Library - Die ultimative *DLL für Winamp :)
Einzelnen Beitrag anzeigen
fylo
Registriert seit: 18. Feb 2004
Ort: Rostock
155 Beiträge
Delphi 7 Personal
#
7
Re: Winamp Control Library - Die ultimative *DLL für Winamp
23. Jan 2008, 19:34
Zitat von
Oliver1983
:
wie kann ich die Volume Anzeigen lassen in einem Label?
Zum Beispiel so:
markieren
Delphi-Quellcode:
var
WinAmp: TWinAmpControl;
// sollte irgendwo schon existieren (z.B. als private in der Form)
procedure
TForm1.Timer1Timer(Sender: TObject);
begin
case
trunc(winamp.GetVolume/256*100)
of
0 : label1.Caption := '
min
';
1..99 : label1.Caption := inttostr(trunc(winamp.GetVolume/255*100)) +'
%
';
100 : label1.Caption := '
max
';
end
;
end
;
have fun
fylo
Zitat
fylo
Öffentliches Profil ansehen
Mehr Beiträge von fylo finden