AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Bilder in exe speichern...
Thema durchsuchen
Ansicht
Themen-Optionen

Bilder in exe speichern...

Ein Thema von Daniel B · begonnen am 24. Aug 2002 · letzter Beitrag vom 24. Aug 2002
Antwort Antwort
Daniel B
(Gast)

n/a Beiträge
 
#1

Bilder in exe speichern...

  Alt 24. Aug 2002, 23:18
Guys,

ist es eigentlich möglich jpg's o.ä. in einer exe zu Speichern. Es handelt sich dabei um 3 Stck. je ca. 5Kb klein. Aber nicht so wie mit TImage und dann auf Visible := False; sondern einfach nur in der exe drin sein und später irgendwo anzuzeigen. Also an keinem festgelegtem Punkt. Was also TImage ausschliesst. Sie dürften auch nciht in einem Verzeichniss drin sein, da ich nur! die exe weitergeben möchte.

Grüsse, Daniel
  Mit Zitat antworten Zitat
Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#2
  Alt 24. Aug 2002, 23:24
Moin Daniel B,

dann bietet es sich an, die als Resourcen einzubinden.
Sollte eigentlich genauso funktionieren, wie mit Bitmaps.

Schau Dir dies doch mal an:

Bitmaps in DLL..
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat
jbg

Registriert seit: 12. Jun 2002
3.483 Beiträge
 
Delphi 10.1 Berlin Professional
 
#3
  Alt 24. Aug 2002, 23:49
Zitat:
Sollte eigentlich genauso funktionieren, wie mit Bitmaps.
Nicht ganz, denn es gibt keinen JPEG Typ und auch kein LoadJpeg().

Ich würde das dann mit dem Typ RCDATA machen und über TResourceStream das ganze einlesen. Im Gegensatz zur TImage-Lösung wird es aber etwas umständlicher. Du kannst dir aber eine Funktion schreiben.
Code:
[b]procedure[/b] LoadJpeg(Jpeg: TJpegImage; [b]const[/b] ResId: [b]string[/b]; Instance: THandle = 0);
[b]var[/b] ResStream: TResourceStream;
[b]begin
  if[/b] Instance = 0 [b]then[/b] Instance := HInstance;
  ResStream := TResourceStream.Create(Instance, ResId, RT_RCDATA);
  [b]try[/b]
    Jpeg.LoadFromStream(ResStream);
  [b]finally[/b]
    ResStream.Free;
  [b]end[/b];
[b]end[/b];
Du kannst dir aber auch eine nicht sichtbare Komponente schreiben, die Jpegs speichert. Diese braucht nur eine einzige Eigenschaft im published Teil, nämlich ein TJpegImage oder wenn mehr unterstützt werden soll ein TPicture. Dann musst du dich nicht um das erstellen der .rc -> .res Dateien kümmern und brauchst dir auch keine Gedanken um das Auslesen zu machen.
  Mit Zitat antworten Zitat
Daniel B
(Gast)

n/a Beiträge
 
#4
  Alt 24. Aug 2002, 23:57
jbg,

Das Dateiformat ist jetzt nicht auf JPG's fixiert. Ich kann auch bmp, gif, tiff usw. nehmen. JPG war nur ein Beispiel, das ist noch nicht festgelegt. Ist halt recht klein vom Format her. Es sind nur 3 runde(1cm Durchmesser) farbige Flächen. Nichts aufwendiges.

Grüsse, Daniel
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:51 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz