ein string der combobox im stringgrid suchen

[Sharky]

Hai djpaull,

wenn Du weisst in welcher Spalte Du suchen möchtest kannst Du das zum Beispiel so machen:

Delphi-Quellcode:

function SearchTextInCol(aSg: TStringGrid; aSearch: string; aCol: Integer): Boolean;
var
  RowIndex: Integer;
begin
  RowIndex := aSg.Cols[aCol].IndexOf(aSearch);
  if (RowIndex <> -1) then
  begin
    aSg.Row := RowIndex;
  end;
  Result := RowIndex <> -1;
end;

procedure TDemo_Form.Button1Click(Sender: TObject);
var
  SearchText: string;
  SearchCol:  Integer;
begin
  SearchText := Edit1.Text;
  SearchCol  := 2;
  if not (SearchTextInCol(StringGrid1, SearchText, SearchCol)) then
  begin
    ShowMessageFmt('%s wurde in Zeile %d nicht gefunden', [SearchText, SearchCol]);
  end;
end;

Ansonsten kannst Du dir das ja schnell auf alle Spalten anpassen.