Delphi-Quellcode:
Hi,
ich versuche gerade, Icons, die ich mit Ressourcendatein in das Programm einbinde, auch im Programm zu benutzen.
Die RC-Datei icons.rc sieht so aus:
[code:1:6625f5b5d7]R01 ICON "Symbol1.ico"
R02 ICON "Symbol2.ico"[/code:1:6625f5b5d7]
Mit dem Programm BRCC32.EXE erzeuge ich dann die icons.RES
Der Porjektquelltext ist so:
program TehCrypt;
uses
Forms,
Classes,
Windows,
uMainForm in 'uMainForm.pas' {MainForm},
uLanguage in 'uLanguage.pas',
uPropertys in 'uPropertys.pas';
{$R lang.RES}
{$R icons.RES} //-> hier wird die Ressourcendatei eingebunden
var
Ressource: TResourceStream;
begin
Application.Initialize;
Application.Title := 'TehCrypt v1.0';
Application.CreateForm(TMainForm, MainForm);
Ressource := TResourceStream.Create(hInstance,'R02',RT_GROUP_ICON); //-> Hier lade ich die Ressource
Application.Icon.LoadFromStream(Ressource); //-> Hier versuche ich, sie zu benutzen
Application.Run;
end.
Das Compilieren klappt wunderbar, aber wenn ich das Programm starte, kommt folgender Fehler:
Code:
Exception EOutOfResources im Modul TehCrypt.exe bei 0001264C.
Das Fenster hat keine Bildlaufleisten.
.
Das Programm startet anschließend nicht mehr.
Was mache ich falsch?