Ainda com dificuldades
[b:63d04d14fb] 1) Como eu faço para que o mediaplayer.filename seja a linha que esta selecionada dentro de uma listbox ?[/b:63d04d14fb]
[b:63d04d14fb] 2) Como eu faço a mesma coisa dando dois cliques em uma linha do listbox ?[/b:63d04d14fb]
[b:63d04d14fb] 2) Como eu faço a mesma coisa dando dois cliques em uma linha do listbox ?[/b:63d04d14fb]
Anonymous
Curtidas 0
Respostas
Carnette
16/02/2003
DoubleClick no ListBox
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
MediaPlayer1.FileName := ListBox1.Items[ListBox1.itemindex];
end;
No evento onClick do Button ou em qualquer componente que voce tenha usado
procedure TForm1.Button1OnClick(Sender: TObject);
begin
ListBox1DblClick(self);
end;
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
MediaPlayer1.FileName := ListBox1.Items[ListBox1.itemindex];
end;
No evento onClick do Button ou em qualquer componente que voce tenha usado
procedure TForm1.Button1OnClick(Sender: TObject);
begin
ListBox1DblClick(self);
end;
GOSTEI 0