Array of Char Frage

[Bernd29bln]

hmmm, hab mich mit binarystream noch nicht so befasst. wie könnte man den das realisieren?

gruß bernd

[himitsu]

Delphi-Quellcode:

var ini: TIniFile;
  stream: TStream;
  S: AnsiString;

stream := TMemoryStream.Create;
try
  ini := TIniFile.Create('name.ini');
  try
    ini.ReadBinaryStream('section', 'ident', stream);
    stream.Position := 0;
    SetLength(S, stream.Size);
    stream.ReadBuffer(S[1], stream.Size);
  finally
    ini.Free;
  end;
finally
  stream.Free;
end;
// in S wären nun die Daten drin

statt einem AnsiString könnte man auch leicht ein Byte-Array oder Dergleichen verwenden

[Bernd29bln]

Das ist ne sehr interessante sache, werd ich mal umsetzen.


Vielen Dank!

Gruß Bernd

[Bernd29bln]

Hallo,

Ich habs mal ausprobiert und ich hab festgestellt das nun S als string behandelt wird. Der Drucker druckt S aus.

Gruß Bernd

[DeddyH]

Zeig doch mal Deinen Code.

[Bernd29bln]

ich verwende den Code von himitsu.

und füge S dann ein
  WriteLn (d,s); gruß bernd