by zaplik » July 30th, 2007, 1:45 pm
OK, Your code returned result:
---------------------------------------
Microsoft Sound Mapper
Realtek AC97 Audio
Přehrávání pomocí linky modemu
Sound Blaster X-Fi Xtreme Audio
---------------------------------------
item3 generate error : "device is out of range"
My code:
for I := 0 to AudioPlayer1.NumDevs - 1 do
begin
AudioPlayer1.DeviceID := I;
ComboBox1.Items.Add(AudioPlayer1.DeviceName);
end;
.
.
AudioPlayer1.DeviceID:=ComboBox1.ItemIndex;
AudioPlayer1.Active:=True;
This code working. Result strings:
---------------------------------------
Realtek AC97 Audio
Přehrávání pomocí linky modemu
Sound Blaster X-Fi Xtreme Audio
-------------------------------------
Please, wherein is difference and problem?