Einzelnen Beitrag anzeigen

Kralle

Registriert seit: 31. Okt 2004
Ort: Bremerhaven
355 Beiträge
 
Delphi XE7 Professional
 
#19

AW: [gelöst] Lazarus: SaveToFile geht nicht

  Alt 17. Feb 2015, 15:51

Delphi-Quellcode:
   StringGrid1.RowCount := sl.count + StringGrid1.FixedRows;
    for i := 0 to sl.count-1 do
        begin
         StringGrid1.Rows[i+StringGrid1.FixedRows].StrictDelimiter := True;
         StringGrid1.Rows[i+StringGrid1.FixedRows].CommaText:=sl.Strings[i];
   end;
ändern.

Denn wenn Du im OI die Property FixedRows des Stringgrids änderst, dann würde es bei Deiner Variante wieder zum Fehler kommen.
Okay, danke für den Hinweis. Habe das sofort umgesetzt.

Gruß Heiko
OS: Windows 10 Professional, Delphi XE7 Pro SP1 +(Mobilpack & FireDAC)
  Mit Zitat antworten Zitat