Resourcen einbinden

[Uwe Raabe]

Zitat von Willie1:

HolgerX, ein Testprogramm von mir liegt vor.

Na, ja. Zugegeben, du hast einen Quelltext gepostet, der das Auslesen des Icons zeigt. Zu einem Testprogramm erwarte ich aber mindestens eine ZIP-Datei mit den zum Build nötigen Dateien. In diese Fall gehört sicher neben der DFM, PAS und DPR auch noch die ICON- und DPROJ-Datei dazu, damit man das ohne großen Aufwand auf seinem System probieren kann. Man muss das in ein Verzeichnis entpacken, das Projekt in der IDE laden und compilieren können. Andernfalls mutet man den Helfenden hier meiner Meinung nach zuviel zu.

[Willie1]

das geht... Willie.

Himitsu, #1 wird akzeptiert, die Ikone wird aber nicht gefunden.

[Uwe Raabe]

Man kann aber auch keine Icon-Resource in ein TBitmap laden!

So funktioniert es hier bei mir unter Tokyo:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Image1.Picture.Icon.LoadFromResourceName(HInstance,'Icon_1');
end;

[Ghostwalker]

@Uwe

Jo..so tuts.

Hab mal selbst ein bischen probiert. Aber mit einem Resourcestream krieg ichs nicht gebacken. Schreibweise ist dabei egal, ob ich Ansi- oder Widestring im Namen übergeben, egal. Ob ich als Typ Icon oder Icon Group angeben, auch egal. Jedesmal "Kenn ich net...". Das is schon etwas...merkwürdig.

[EWeiss]

Wenn ihr meinen Beitrag richtig interpretiert hättet wäre aus dem Problem keine 3 Seiten geworden.
Aber sei es drum.

Zitat:

dann wäre da noch die frage des Typs..
Was denn nun *.ico, *.bmp oder gar *.png?

Zitat:

Wieso hat ein Icon denn die Language-ID 1031? Üblich wäre doch 1033.

Nö 1031

gruss

[Willie1]

Hallo, das ist die Lösung. Danke.
Was bei Delphi 2005 klappt, muss bei Delphi 10 nicht unbedingt funktionieren!!!
Ok, ganz glücklich wäre ich jetzt, wenn ich wüste, wie ich ein JPG-Bild aus der Resource anzeigen kann. Als Resource abgelegt habe ich es: RCDATA.

Ghostwalker, du hast recht, etwas merkwürdig bleibt die Sache schon..

Willie.

[zeras]

[QUOTE=Willie1;1376885
Ok, ganz glücklich wäre ich jetzt, wenn ich wüste, wie ich ein JPG-Bild aus der Resource anzeigen kann. Als Resource abgelegt habe ich es: RCDATA.

[/QUOTE]

Siehe Beitrag #12

[Willie1]

Hallo, auf die Gefahr hin, dass ich nerve: aber es geht nicht!!!

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  ResStr: TResourceStream;
begin
  ResStr:=TResourceStream.Create(HInstance,'JpgImage_1',PWideChar('RT_RCDATA'));
  Image1.Picture.Graphic:=TJpegImage.Create;
  Image1.Picture.Graphic.LoadFromStream(ResStr);
  ResStr.Free;
//  Image1.Picture.Graphic.Free;
end;

bei Zeile 5 klemmt es:
wieder Resource ... nicht gefunden.
Die Resource JpgImage_1 ist ein gebunden.

bei Delphi 2005/6 hat es geklappt natürlich ohne PWideChar.

Willie.

N.T. kann das Projekt als Zip hochladen, wenn gewünscht.

[Glados]

Du schreibst TResourceStream.Create(HInstance,'JpgImage_1',PWideChar('RT_RCDATA'));
Aber es muss heißen TResourceStream.Create(HInstance, 'JpgImage_1', RT_RCDATA);

Und  Image1.Picture.Graphic:=TJpegImage.Create; ganz weg.

Und Image1.Picture.LoadFromStream(); . Nicht Image1.Picture.Graphic.LoadFromStream();