11.08.2002, 00:29
Пасибо, но есть еще вопросик
при нажатии Alt+P (в проигрывателе) должно начаться воспроизведение т.е. действие анологичное кнопке Play
__________________________________________________
procedure TForm1.PlayClick(Sender: TObject);
begin
with MediaPlayer1 do
begin
Close;
FileName:=FileListBox1.FileName;
Open;
Play;
end;
end;
__________________________________________________
я разместил на форме компонент hotkey но так с ним и не разобрался.
Обьясните плиз как это делается
при нажатии Alt+P (в проигрывателе) должно начаться воспроизведение т.е. действие анологичное кнопке Play
__________________________________________________
procedure TForm1.PlayClick(Sender: TObject);
begin
with MediaPlayer1 do
begin
Close;
FileName:=FileListBox1.FileName;
Open;
Play;
end;
end;
__________________________________________________
я разместил на форме компонент hotkey но так с ним и не разобрался.
Обьясните плиз как это делается