Einzelnen Beitrag anzeigen

Benutzerbild von 5etH
5etH

Registriert seit: 4. Mär 2008
Ort: Giessen
217 Beiträge
 
Delphi 2007 Professional
 
#17

Re: .txt von einem ftp server auslesen

  Alt 3. Apr 2008, 16:47
so nochmal zum eigentlich stream in stringgrid lesen ...

mein aufruf sieht so aus
Delphi-Quellcode:
var
    DB : TMemoryStream;
    csv : TStringList;
    i : Integer;
begin

  DB := TMemoryStream.create;

  datenmodul1.idftp1.Username := 'proguser';
  datenmodul1.idftp1.Password := 'manuel13';
  datenmodul1.idftp1.Host := '10.15.121.106';
  datenmodul1.idftp1.Connect;
  datenmodul1.IdFTP1.ChangeDir('/Kunden/');
  datenmodul1.idftp1.Get('/Kunden/DB2.txt', DB);
    
    csv := TStringList.create;
    csv.loadfromStream(DB);
    stringGrid1.rowCount := csv.count;

  for i:=0 to csv.count -1 do
    begin
      StringGrid1.Rows[i].Delimiter:=';';
      StringGrid1.Rows[i].Commatext:=csv[i];
    end;
  csv.free;
doch leider lädt er die Datensätze nicht in das Grid ein es bleibt leer... er verändert etwas, (Die fixed Cols verschwinden der fixed Row bleibt) aber es wird kein text eingefügt die quelldatei ist aber richtig

[EDIT] Beim lokalen speicher geht alles klar nur wenn ich lokal laden will sagt er mir das: Listenindex überschreitet das Maximum (1)

wie kann ich das beheben und hängt es vill mit dem oben genannten zusammen ?
Manuel
  Mit Zitat antworten Zitat