Problem bei ReadBuffer ;(

[sakura]

Also für das Lesen geht es unter .NET wie folgend:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
type
  TByteArray = array of Byte;
var
  FileStream: TFileStream;
  ByteArray: TByteArray;
begin
  FileStream := TFileStream.Create('C:\Temp\dp.txt', fmOpenRead or fmShareDenyNone);
  try
    SetLength(ByteArray, FileStream.Size);
    FileStream.ReadBuffer(ByteArray, FileStream.Size);
    Caption := System.Convert.ToString(ByteArray);
  finally
    FileStream.Free;
  end;
end;

Schreiben sollte analog dazu sein ;)

...:cat:...

[Memo]

Das wusste er schon. :?

[sakura]

Zitat:

Zitat von Memo

Das wusste er schon. :?

Danke :?

@Curse4Life: Wir haben in der DP nichts gegen sogenannte Cross-Postings, aber wir würden schon gerne die Lösung erfahren (oder einen Link dahin), wenn Du diese woanders bekommst.

...:cat:...

[GuenterS]

Es ist leider nicht möglich, alte D7 Sourcen in D8 zu verwenden, da einige Methoden von Klassen anders auch mit anderen Parametern implementiert wurden. Soviel zu dem, dass man die Schnittstellen nicht verändern sollte.

Gerade diese FileStream Methode hat es leider ziemlich verändert, schau dir da einmal die genaue Deklaration an. Ich denke das wird aufschlussreich sein.

[Curse4Life]

Tut mir leid, dass nächste mal werde ich die Lösung dann hier sofort posten!


mfg

[Robert_G]

Warum macht ihr euch das so schwer?
Eine Datei in einen String zu lesen ist unter .Net ein Einzeiler (solange man diese komischen VCL.Net -klassen nicht verwendet :? ).


Die erste Möglichkeit kommt IMHO aus dem Framework 2.0, die zweite sollte aber sogar mit Delphi8 funktionieren (die 2. ist eigentlich ein Zweizeiler ;) ):

Delphi-Quellcode:

  strTextFile := System.IO.File.OpenText(strPath2TextFile).ReadToEnd();

Delphi-Quellcode:

  strTextFile := System.IO.StreamReader.Create(strPath2TextFile, true).ReadToEnd();

In beiden Fällen kann man einfach durch StreamReader.ReadToEnd den gesamten Stream als ein String bekommen.