Kombinieren von Repeat- mit For-Schleifen

[Amateurprofi]

1) auf cells wird mit cells[col,row] zugegriffen, du greifst mit cells[row,col] darauf zu. Wenn das Grid nicht zufällig quadratisch ist, müßtest du eigentlich eine Exception kriegen.
2) Suchbegriff ist leer, d.h. du müßtest für jede leere Zelle eine Message "Gefunden" erhalten und für jede nicht leere Zelle eine Message "Pech gehabt".
Ich unterstelle mal du willst nach der Message "Gefunden" die Prozedur verlassen und willst die Message "Pech gehabt" nur dann erhalten, wenn der Suchbegriff im Grid nicht gefunden wurde.
Das könntest du z.B. so realisieren :

Delphi-Quellcode:

   for i:=0 to Kundenliste.colcount-1 do
      for k:=1 to Kundenliste.rowcount-1 do
         if Kundenliste.Cells[i,k]=Suchbegriff then begin
            ShowMessage('Gefunden!');
            exit;
         end;
   ShowMessage('Pech gehabt!');

Du solltest aber auch dafür sorgen, daß Suchbegriff nicht leer ist