Delphi-Quellcode:
procedure TDemoForm.StringGridSelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
begin
QueryAdr.RecNo := StringGrid.Row; // Codezeile ergänzt!
EdTelefon.Text := QueryAdr.FieldByName('Telefon').AsString;
end;
Guter Vorschlag!
Eines stört aber:
Im Grid muß ich jetzt auf eine markierte Zeile doppelt klicken, damit die
passende Tel-Nr. im Edit erscheint.
Wie bitte kann ich das abstellen?