Как внести в if ... then команду которая отобразит адрес выделенной ячейки

[danil663]

Есть форма, на ней: adoconnection1,adoquery1,datasource 1,Dbgrid1(связана с БД) и кнопка. Необходимо при выборе определённое ячейки(или строки), при нажатии на кнопку запускать песни, ту или иную(в зависимости от ячейки).Хотелось бы подсказки: как внести в if ... then команду которая отобразит адрес(или то к чему можно обратиться) выделенной ячейки.
Не нужны огромные кода и события,т.к. не знаю как ими пользоваться.
Прописываю так, но песня запускается только одна, при нажатии на любое поле воспроизводиться bate.mp3

if dbgrid1.SelectedIndex = 1  then
MediaPlayer1.Filename := 'bate.mp3';
MediaPlayer1.open;
MediaPlayer1.Play;
if dbgrid1.SelectedIndex = 2 then
MediaPlayer1.Filename := 'dinamo.mp3';
MediaPlayer1.open;
MediaPlayer1.Play;

[Yurk@]

может так

case ADOQuery1.RecNo of 
  0 : MediaPlayer1.Filename := 'bate.mp3';
  1 : MediaPlayer1.Filename := 'dinamo.mp3';
  <и т.д.>
end;
MediaPlayer1.Open;
MediaPlayer1.Play;

хотя на самом то деле это изначально неверный подход. если у тебя (скажем в 1й колонке грида) выводятся названия песен, но правельнее будет так:

MediaPlayer1.Filename := ADOQuery.FieldByName('nazvanie_polya').AsString;
MediaPlayer1.Open;
MediaPlayer1.Play;

и не нужно никакого if

[danil663]

Использую первый способ всё работает спасибо,искал уже 3-й день!!!
второй что-то не работает,но это уже не важно