witam wszystkich!mam maly problem. moze mi ktos powie o co tu chodzi?
czemu sie wyswietla bląd?
project player.exe raised exception class EMCIDeviceError with 'MMSystem274 Używane urządzenie MCI nie obsługuje wydanego polecenia.'.Process stopped.
o oto ten kodzik:
try
if Open.Execute then
FName := Open.FileName;
Player.FileName := FName;
Player.Open;
Player.Display := PP;
Player.DisplayRect := PP.ClientRect;
Scroll.Position := 0;
Tx := ExtractFileName(Player.FileName);
ShowText(Tx);
Caption := Tx;
except
on EMCIDeviceError do
raise Exception.Create(Format(
'Nie mogę otworzyć pliku o rozszerzeniu %s. Sprawdź czy plik nie '+
'jest uszkodzony lub czy prawidłowy jest jego format danych.',
[ExtractFileExt(Player.FileName)]));
end;
--if label1.caption = www.programowanie.of.pl then you win!