vložil Radek Červinka
6. května 2011 00:09
Někdy je vhodné použít pro ukládání dat místo datových modulů nebo formulářů "old school" přístup přes resource (např. možnost následně resource vyměnit bez rekompilace).
Pro vytvoření resource můžete použít některý resource editor (něco už jsem o tom psal když jsem ukazoval výměnu resource - připomínám třeba jeden psaný v Delphi a volně šiřitelný - Anders Melander.
nebo pokud máte Delphi 2010+ můžete použít integrovaný (menu Project/Resources a images)
Pokud používáte PNG musíte je umístit do sekce RCDATA, bitmapy do sekce BITMAP, ikony do sekce ICON atd.
implementation
uses
pngimage;
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
var
p: TPngImage;
begin
p:= TPngImage.Create;
p.LoadFromResourceName(HInstance, 'BAL');
img1.Picture.Assign(p);
p.Free;
end;
HInstance je handle aplikace a je deklarován v jednotce System.
RSS