Objekt in Stream verwandeln und Stream in Text konvertieren

[cYaONE]

Servus,

Ist es irgendwie möglich ein Objekt in einen Stream zu verwandeln und diesen Stream dann in normalen Ascii-Text zu konvertieren?

Danke schonmal!

[MatthiasO]

Ich weiß zwar nicht genau, wie du das meinst und wozu du das brauchst, aber vielleicht so:

Delphi-Quellcode:

procedure WandleUm;
var
  MemoryStream: TMemoryStream;
begin
  MemoryStream := TMemoryStream.Create;
  //Objekt ist das Objekt, das du umwandeln möchtest
  MemoryStream.WriteBuffer(Objekt, SizeOf(Objekt));
  MemoryStream.Position := 0;
  //In Memo1 laden
  Memo1.Lines.LoadFromStream(MemoryStream);
  MemoryStream.Free;
end;

In Memo1 ist nun der Ascii-Text.

[CalganX]

Kleine, aber feine Änderung...

Delphi-Quellcode:

procedure WandleUm;
var
  MemoryStream: TMemoryStream;
begin
  MemoryStream := TMemoryStream.Create;
  try
    //Objekt ist das Objekt, das du umwandeln möchtest
    MemoryStream.WriteBuffer(Objekt, SizeOf(Objekt));
    MemoryStream.Position := 0;
    //In Memo1 laden
    Memo1.Lines.LoadFromStream(MemoryStream);
  finally
    MemoryStream.Free;
  end;
end;

Chris

[Christian Seehase]

Moin cYaONE,

was hast Du denn vor?

@Matthias/Chris:
Spätestens, wenn eine binäre Null im Objekt vorhanden ist, würde das Laden ins Memo abbrechen.

[cYaONE]

Ich möchte gern die Eigenschaften eines TFont Objektes speichern, also die Eigenschaften wie Name, Größe, ...

[cYaONE]

Ist es jetzt irgendwie möglich ein TFont Objekt in einem String zu speichern?

[Christian Seehase]

Moin cYaONE,

es gibt zwar Möglichkeiten das Gewünschte zu speichern, allerdings kenne ich mich im VCL-Streaming-System dafür nicht genug aus, um hier die Vorgehensweise zu beschreiben.

Schau Dir mal in der Hilfe TWriter/TReader an.

[Chewie]

Ich bezweifle auch, dass die oben genannte Methode mit dem MemoryStream funktionieren würde. Denn es werden Sizeof(Typ) Bytes kopiert, und Sizeof(Klasse) = Sizeof(Pointer) = 4. Und da liegt das Problem.

[cYaONE]

= man kann nicht machen, was ich machen will?

[Chewie]

Zitat von cYaONE:

= man kann nicht machen, was ich machen will?

Das sicher nicht. Der Krams liegt im Speicher, und auf das, was im Speicher ist, kann auch zugegriffen werden.
Christian Seehase hat den entscheidenenden Tip gegeben, TReader. Schau dir das mal in der OH an. Ich hab das leider noch nie benutzt und kann dir deswegen da auch wenig helfen.