Stringgrid, in bestimmter Spalte nach String suchen...

[Thanatos81]

Hatte ganz übersehen, dass du speuichern wolltest...

Delphi-Quellcode:

procedure TForm1.speichern;
var t : TextFile;
    c,r : integer;
begin
  AssignFile(t,'c:\stringgrid.txt');
  Rewrite(t);
  for r := 0 to StringGrid1.RowCount-1 do
    begin
      for c := 0 to StringGrid1.ColCount-1 do
        begin          
          Write(t,StringGrid1.Cells[c,r]+';');  //kenne ASCII für Tab gerade nicht, 
                                                //deswegen ; zum Trennen
        end;
      Writeln(t,''); //neue Zeile
    end;
  CloseFile(t);
end;