Сообщение от Winner
Вот моя прога:
begin openPlayer ('/Simply.wav','audio/x-wav'); startPlayer; if not openPlayer('/Simply.wav', 'audio/x-wav') then halt; if not setPlayerCount(-1) then halt; if not startPlayer then halt; delay(5000); end.
|
Надо вызывать так:
var workbool: boolean;
.......
workbool:=OpenPlayer(.....);