Vielen Dank für die Infos, funktioniert!
Das ganze sieht jetzt so bei mir aus:
Delphi-Quellcode:
procedure TForm1.strgrSelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
begin
sbar.Panels.Items[1].Text:='ausgewählter Datensatz Nr.: ' + IntToStr(ARow);
end;
Nochmals danke
