Thema: Delphi Excel (Import/Export)

Einzelnen Beitrag anzeigen

ssach

Registriert seit: 9. Dez 2002
Ort: schleiwenhaff
99 Beiträge
 
Delphi 6 Professional
 
#8
  Alt 7. Mai 2003, 18:07
also hier ist ein Code zum speichern von stringgrids in eine csv datei, konnte sie nochnicht testen, werde dies aber im abend noch tun:

Delphi-Quellcode:
procedure TForm1.BtnSaveClick(Sender: TObject);
var
R, C : integeR;
S : string;
begin
   for R := 0 to sg.RowCount - 1 do
      begin
         S := '';
         for C := 0 to sg.ColCount - 1 do
            S := S + sg.Cells[C,R] + ';';
         delete(S,length(S),1); //loescht den ueberfluessigen ;
         lb.Items.Append(S);
      end;

   lb.Items.SaveToFile('Exell.csv');
end;
hoffe konnte helfe, cu
Greissen all d'Letzebuerger !!
  Mit Zitat antworten Zitat