![]() |
Problem mit idFTP und Streams
Hallo
Ich möchte eine Datei in einen Stream Laden (ein Textfile mit der endung *.act) Dazu benutze ich folgenden Code
Delphi-Quellcode:
rc ist idFTP
ds := TMemoryStream.Create;
try rc.Get(cn+'.log.act',ds,true); rc.Delete(cn+'.log.act'); except memo1.Lines.Add(timetostr(now)+' -- Error No act File Found') end; memo2.Lines.LoadFromStream(ds); ds.Free; if memo2.Lines.Text = ('ejectcd') then showmessage('junge junge'); if memo2.lines.Text = ('clr') then memo1.Clear; end; ds ist als TStream Deklariert worden cn ist der Computername und hier der Dateiname Ich weiss leider nicht weshalb hier nichts geschieht Uploaden via Streams ist kein Problem Ich hoffe ihr habt da ne idee Grüsse Claudio |
Re: Problem mit idFTP und Streams
Bevor du LoadFromStream aufrufst, muss der Stream an den Anfang gesetzt werden: ds.Position := 0.
|
Re: Problem mit idFTP und Streams
Danke viel mals
Diese Forum ist einfach klasse Sehr Kompetente Anwteorten und forallem sehr schnell Achja Weshalb kann ich den Wert nicht mittels If Vergleichen? Hab jetzt schon vieles versucht doch es hat nicht geklappt |
Re: Problem mit idFTP und Streams
Hab mal den Wert in eine Variable geschrieben, doch auch da... kein vergleich möglich
|
Re: Problem mit idFTP und Streams
was heißt "kein Vergleich möglich"? Kommt eine Fehlermeldung? Wenn ja: Welche?
im übrigen beinhaltet
Delphi-Quellcode:
den Inhalt des kompletten Memos und nicht nur den einer Zeile.
memo2.lines.Text
|
Re: Problem mit idFTP und Streams
Also das Memo sieht etwa so aus
Code:
Da es immer gelöscht wird, verlängert es sich nicht.
Bfehl
Doch das problem ist wenn ich es (wie im code oben) vergleiche (auch mit memo1.text) so passiert nichts Wenn ich den wert (via button oder so) aber manuell setzte dan klapt es |
Re: Problem mit idFTP und Streams
hast du denn mal geschaut welchen Wert dir Memo.Lines.Text gibt? Ich könnte wetten da hängt noch eine Eingabetaste dran.
|
Re: Problem mit idFTP und Streams
hmmm
ja hab ich aber ich kann dir nicht mit sicherheit sagen das es keine Eingabetaste drinn hat. Aufjedenfall hat es auch nicht geklappt als ich den wert des memos in ein Edit geschrieben habe und dan das edit verglich Hast du den ne idee wie ich den Code umschreiben muss damit er (aus deiner sicht) funktioniert? |
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:26 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz