[gelöst] Binärdaten in Quellcode

[Schwedenbitter]

Hallo,

ich bastel an einer Klasse, die von TBitBtn abgeleitet ist. Die Glyphs lade ich derzeit aus zur Laufzeit aus externen Dateien. Um Platz zu sparen sind das PNG-Dateien.
Ich meine irgendwo mal gesehen zu haben, dass man solche Daten (oder Streams?) in den Code mit aufnehmen kann. Die PNG-Bilder sind in Summe lächerliche 583 Bytes. Die kann ich locker abtippen. Ich möchte ausdrücklich keine res-Datei beim Compilieren mit einbinden. Ich meine ich so etwas als array in der const-Definition gesehen.

Daher meine Frage:
Gibt es irgend eine Möglichkeit, diese Daten in den Programmcode mit aufzunehmen?

[stahli]

Du könntest die Daten in Base64 umwandeln und z.B. in einem nicht sichtbaren Memo oder Label speichern.
Wäre zwar unüblich, sollte aber gehen.

[Luckie]

Darf man fragen warum keine Ressourcendatei? Die Ressourcen werden ja auch in das Kompilat einkompiliert.

[nahpets]

Lade mal ein Bild in der IDE und schaue Dir dann in der DFM an, wie es dort abgelegt ist.

Das kannst Du dann analog auch als Konstante im Quelltext ablegen.

Oder benutze eine ImageList, in die Du in der IDE die Bilder lädst, sie werden dann Teil des Formulars.

Zur Laufzeit kannst Du dann die Bilder den TBitBtn nach Bedarf zuweisen.

[Schwedenbitter]

Zitat von Luckie:

Darf man fragen warum keine Ressourcendatei? Die Ressourcen werden ja auch in das Kompilat einkompiliert.

Wenn ich das weitergebe, möchte ich nur eine Unit als pas-Datei haben und nicht noch 2 Bilddateien, eine RC-Datei etc.
Die Idee mit der ImageList fand ich sofort toll. Allerdings fiel mir dann ein, dass die Dateien dort als bmp-Dateien mit mehreren KBytes "gespeichert" werden.

Manchmal versuche ich Sachen auch nur, weil ich der Meinung bin, dass es gehen muss. Häufig fällt mir so etwas später wieder ein, wenn ich das wirklich mal brauche...

[Redeemer]

Bilder in DFMs zu speichern, benötigt allerdings in der EXE auch deutlich mehr Platz als Ressourcen.

Du kannst natürlich ein Array nehmen. Schön ist das alles nicht.

Delphi-Quellcode:

const
  size = 4711;
  bild: array[0..size-1] of Byte = (42, ...);
var
  ms: TMemoryStream;
begin
  ms := TMemoryStream.Create;
  ms.Write(bild[0], size);
  ms.position := 0;
  // usw.
end;

[Uwe Raabe]

Zitat von Schwedenbitter:

Die Idee mit der ImageList fand ich sofort toll. Allerdings fiel mir dann ein, dass die Dateien dort als bmp-Dateien mit mehreren KBytes "gespeichert" werden.

Vielleicht sind die PngComponents hier besser geeignet. Die dort vorhandene PngImageList speichert eben keine BMPs sondern direkt das PNG-Format. Falls die Bilder unterschiedlich groß sind, kannst du auch die PngImageCollection verwenden.