Hallo zusammen,
ich habe auf einer Form zwei DBGrids. Ich möchte das wenn ein DBGrid selektiert ist, das andere deselektiert wird, da ich durch eine Funktion Abfrage welches DBGrid selektiert ist und demnach bestimmte Prozesse auslöse.
Wie geht das ?
So geht es nicht:
Form1.DBGGrid2.SelectedField := nil;
So ist meine Abfrage, welches DBGrid selektiert ist:
Delphi-Quellcode:
function Focussierte_Komponente_ermitteln_DBGrid(Form:TForm):TDBGrid;
var
I: Integer;
DBGrid: TDBGrid;
begin
Result := nil;
For I := 0 to Form.ComponentCount - 1 do
begin
if Form.Components[I] is TDBGrid then
begin
DBGrid := TDBGrid(Form.FindComponent(Form.Components[I].Name));
If (DBGrid.SelectedField <> nil) then
begin
Result := DBGrid;
end;
end;
end;
end;