Durch Befehl eine bestimmte Zeile im StringGrid markieren

[Killian]

Tach!
Also ich glaube dein eines break ist falsch. das springt er nur aus einer for-Schleife. Naja, wenn er hängt, dann schreibs mal so :

Delphi-Quellcode:

procedure TFormHaupt.BitBtnSucheClick(Sender: TObject);
var 
   suchtext:string;
* *r,c:integer;
begin
  { gewöhn dir eine vernünftgie formatierung und kommentierung an, sonst
    würde ich an deiner stelle es gleich lassen mit proggen }
  suchtext := editsuche.Text;

  if suchtext <> '' then
  begin
*   For r := 0 to StringGrid1.RowCount - 1 do
    begin { wird eiegentlich nicht benötigt, ist für mich aber übersichtlicher } 
  *   For c := 0 to StringGrid1.ColCount - 1 do
      begin
        Application.Processmessages;
*   *   If (StringGrid1.Cells[c, r] = suchtext) then
  * * *   begin
*   * * *   * ShowMessage('Eintrag in Zeile '+InttoStr(r+1)+' gefunden!');* *break;
  * * *   end; 
      end;
    end;   
  end;
end;

Da sollte er zu mindest nicht hängen bleiben. So und danns chau doch einfach mal in der Hilfe nach. Wer lesen kann, ist klar im Vorteil. Ich geb dir noch nen tip: Selection.

Viel spass noch.

Gruss Killian