ich habe ein bißchenProbleme dein problem zu verstehen (das habe ch hier irgendwie viel zu oft)
Aber ich probiere es trotzdem mal:
Delphi-Quellcode:
var x,y:integer;
with form1.mystringGrid do
begin
for x:=0 to ColCount -1 do for y :=0 to RowCount do if pos({Suchwort},Cells[x,y]) > -1 then ResultStringGrid.Cells[{Wohin im Resultgrid auch immer}] :=Cells[x,y];
end;
ist eiegtnlcih ein Einzeiler, passt nur nichtmehr auf den Bildschirm (bei mir zumindest)
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.
Have a lot of fun!