zeilenumsprung in IDFTP.Put

[XXcD]

so ich hab jetzt folgendes problem wenn ich mit IdFTP eine Textdatei erstelle wird der text reingeschrieben der da rein soll aber nach dem text ensteht noch ne neue zeile die aber da nicht rein soll. Ist es möglich, dass die nicht erstellt wird?

[mkinzler]

Du könntest ja überprüfen, ob der Text eine solche Leerzeile besitzt und diese dann Löschen.

[XXcD]

es sollen aber viele datein erstellt werden und ich kann nicht jede einzelne überprüfen. Gibt es nicht irgendein befehl womit das unterbunden wird dass noch eine zweite zeile erstellt wird?

[inherited]

Lade die Datei in eine Stringlist und lösche die letzte Zeile.

[SirThornberry]

da putt auch binärdateien etc. hochlädt bezweifel ich das durch die Verwendung von Put die Leerzeile dazu kommt. Lädst du die Datei eventuell im falschen Modus hoch?

[XXcD]

Delphi-Quellcode:

 Stream := TMemoryStream.Create;
  Stream.Seek(0,soFromBeginning);
  S := TStringlist.Create;
  S.Add(Edit2.Text);
  S.SaveToStream(Stream);
  IDFTP1.Put(Stream,Edit1.Text+'.txt');

Also so lade ich das gerade hoch weiß ja nicht ob das so richtig ist oder vielleicht gibt es noch eine andere möglichkeit die datei auf meinem ftp Server zu speichern???

[SirThornberry]

es liegt an der Stringliste. Speicher mal die Datei auf die lokale Festplatte und ich denke da wird auch die Leerzeile drin sein. Denn die Stringliste speichert eine Zeile + #13#10
Somit hast du hinter der letzten Zeile noch einen Zeilenumbruch

[XXcD]

Wie kann ich das denn jetzt hochladen ohne, dass der eine leerzeile macht??

[SirThornberry]

wenn man wieß das der Zeilenumbruch aus #13 und #10 besteht, also 2 Zeischen, kann man den Stream um diese Anzahl an Zeischen verkürzen. Also einfach

Delphi-Quellcode:

if Stream.Size >= 2 then
  Stream.Size := Stream.Size - 2;

[XXcD]

suppppperrr hat geklappt. Vielen dank für die schnelle und gute hilfe!