Forum: Sonstige Fragen zu Delphi
Delphi
by fips0705,
4. Jun 2009
Vielen Dank, dann werde ich wohl den Code von himitsu nehmen da er auch profesioneller ist und wesentlich schnellere.
Forum: Sonstige Fragen zu Delphi
Delphi
by fips0705,
4. Jun 2009
Ich habe es jetzt so gelöst vielen Dank
function FileToStringErsetze(const FileName: string;NeueZeichen: string;zuErsetzendeZeichen:integer): AnsiString;
var
fs: TFileStream;
Len,j: Integer;
temp: string;
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by fips0705,
4. Jun 2009
vielen Dank für die vielen Tipps.
nur weiß ich nicht wie ich in einem Strem bzw. Puffer Zeichen ersetzte.
welchen Befehl kann ich dafür benutzen.
Forum: Sonstige Fragen zu Delphi
Delphi
by fips0705,
3. Jun 2009
M F Bitte bei der Zahlung angeben
so sieht die Datei mit notepad aus.
lässt sich aber komplet öffnen
Forum: Sonstige Fragen zu Delphi
Delphi
by fips0705,
3. Jun 2009
Es ist im Prinzip eine Textdatei, Sie enthält aber Drucksteuerzeichen. Das bewirkt, das es mit einer Stringlist oder auch Memoliste nicht funktioniert. Hier wir immer nur ein Teil gelesen.
Habe es auch schon mit BlockRead versucht.
Leider weiß ich nicht wie ich die komplette Datei einlese und dann von Anfang bis Ende die Datei durchsuche.
Forum: Sonstige Fragen zu Delphi
Delphi
by fips0705,
3. Jun 2009
ich habe mit
TFileStream.Create(opendialog1.filename, fmOpenReadWrite or fmShareDenyWrite)
eine Datei gelesen und möchte nur im Stream bestimme Zeichen wie z.B. Hex 00 durch Leerzeichen ersetzen
mit der Funktion StringReplace funktioniert das im Filestream nicht