Stringgrid nach einem Begriff durchsuchen und....

[Hobby-Programmierer]

Moin ...
vielleicht so

Delphi-Quellcode:

...
  StringGrid_neu.RowCount:= 1; 
  res := StringGrid1.findfirst(finddlg.findtext.text, findparams);
  if res.x >= 0 then begin
    StringGrid1.Col := res.x;
    StringGrid1.row := res.y;
    // hier ins neue Stringgrid schreiben zb.
    StringGrid_neu.Rows[StringGrid_neu.RowCount]:= StringGrid1.Rows[res.y];
    StringGrid_neu.RowCount:= StringGrid_neu.RowCount +1; // Zeile um 1 erhöhen
   end else
    MessageDlg('Text not found', mtinformation, [mbOK], 0);
  end;

Ungetestet aber sollte so funktionieren!
LG Mario