Resourcen einbinden

[Willie1]

Hallo Delphi-Freunde/innen,
ich bin von Uralt-Delphi 2005 auf Delphi Berlin SE umgestiegen und will jetzt meine Projekte übernehmen.
Bei meinem Projekt Abfrage ist eine Resource mit einer zweiten Ikone "verschwunden". Ich denke kein Problem: mit "Resourcen und Bilder" kann ich die Ikone in das Projekt übernehmen.
Es werden das Script AbfrageRecource.rc und Abrage.dres, die ich einbinde, erzeugt. Aber wenn ich die Ikone aufrufen will, kommt "Resource ... nicht gefunden". Woran liegt das?

RC-Script:

Delphi-Quellcode:

Icon_1 ICON "abfrage_2.ico"

Delphi-Quellcode:

    Bild.LoadFromResourceName(HInstance,'Icon_1');
    Image1.Canvas.Draw(0,0,Bild)

Bitte meldet euch, ich bin ratlos.
Gruß und Dank
Willie.

[zeras]

Ich habe meine Ressourcen unter Projekt -> Ressourcen und Bilder -> Hinzufügen eingebunden. Als Typ habe ich RCData gewählt.
Mit einer Ressourcendatei hatte ich dann nichts mehr am Hut. Das hat alles Delphi für mich gemacht.

[himitsu]

Da, wo deine RC/RES eingebunden wird, gibt es keine Message im BuildLog?

Mit einem Ressource-Explorer mal in die EXE gucken, ob alles "richtig" drin ist und ob vielleicht noch was Anderes fehlt/fehlerhaft ist.

[Redeemer]

Ich würde vermuten, Delphi hat die Ressource ICON_1 genannt, aber er lädt Icon_1.

[Glados]

Zitat:

Ich würde vermuten, Delphi hat die Ressource ICON_1 genannt, aber er lädt Icon_1.

Ich habe das heute mal mit ICON_1 durchgespielt. Die Resource habe ich dabei so erstellt, wie ich es immer mache und wie es auch immer funktioniert.
ICON_1 konnte dabei genau so wenig gefunden werden wie Icon_1.

[DeddyH]

Hast Du das Kompilat mal mit einem Ressourceneditor untersucht?

[Willie1]

Ich habe alles versucht, die Icons, auch Bitmaps, werden nicht eingebunden.
Ich habe eine kleine Testanwendung geschrieben:

Delphi-Quellcode:

unit ResTester_h;

{$R ResTester.dres}

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ExtCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Image1: TImage;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  bmp: TBitmap;
begin
  beep;
  bmp:=TBitmap.Create;
  try
    bmp.LoadFromResourceName(HInstance,'Icon_1');
    Image1.Canvas.Draw(1,1,bmp);
  finally
    bmp.free;
  end;
end;

end.

Mit "Resourcen und Bilder" habe ich 2 Ikonen eigefügt, sie stehen im gleichem Ordner, wie das Programm. In der Projektverwaltung werden die Ikonen angezeigt.
Ein IconGrabber findet keine Icons.
Welchen Resourcen-Explorer soll ich downloaden, es gab ihn früher bei Borland als Zugabe und Beispiel. (finde ihn nicht mehr)


Nachtrag: Könnte das eine weitere Gemeinheit von E. sein, die Möglichkeiten der Starter Edition ein zu schränken? Deshalb bin ich sehr daran interessiert, ob es bei euch läuft!
Willie.

[Zacherl]

Zitat:

Zitat von Willie1 (Beitrag 1376804)

Welchen Resourcen-Explorer soll ich downloaden, es gab ihn früher bei Borland als Zugabe und Beispiel.

ResHacker z.b.

[EWeiss]

Zitat:

Als Typ habe ich RCData gewählt.

Verstehe nicht warum man für Icons RCDATA verwendet und nicht Icon!

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

gruss

[Glados]

Zitat:

Verstehe nicht warum man für Icons RCDATA verwendet und nicht Icon!

Zitat:

Zitat von Glados (Beitrag 1376791)

Zitat:

Ich würde vermuten, Delphi hat die Ressource ICON_1 genannt, aber er lädt Icon_1.

Ich habe das heute mal mit ICON_1 durchgespielt. Die Resource habe ich dabei so erstellt, wie ich es immer mache und wie es auch immer funktioniert.
ICON_1 konnte dabei genau so wenig gefunden werden wie Icon_1.

Habe das alles mit ICON als Typ ebenfalls getestet. Mit und ohne Bitmap als Zwischenspeicher.
Das Problem liegt also woanders.

Zitat:

dann wäre da noch die frage des Typs..

Zitat:

Icon_1 ICON "abfrage_2.ico"