Selektierte Zeilen aus StringGrid 1 in StringGrid 2

[capo]

Hallo,

ich habe folgendes Beispiel gefunden:

Delphi-Quellcode:

procedure TFormMain.SpeedButtonAddToPlaylistClick(Sender: TObject);
var
  i : integer;
  mdata : TMusicData;
  mr : TModalResult;
begin
  if (musiclist.getItemCount > 0) then
  begin
    mr := mrCancel;
    for i := StringGridInventory.Selection.Top to StringGridInventory.Selection.Bottom do
    begin
      mdata := musiclist.getMusicDataPK(StrToInt(StringGridInventory.Cells[ML_COL_PRIMARY, i]));
      playlist.addMusicData(mdata, mr);
    end;
    refreshStringGridPlayList();
  end;
end;

Bekomme das Beispiel aber nicht umgesetzt.
StringGridInventory ist ein Stringgrid aber musiclist.getMusicDataPK verstehe ich auch nicht.
Kann mir das jemand erklären?

Gruss vom Vito