Witam. Mam pewnien problem. Mam w zasobach ikonę i chce w OnCreate formy dodać ją do ImageList'a. Wszystko jest ok, jakby nie to, że zmienia mi się też automatycznie ikona programu na tą ikonę z zasobów [???] Mój kodzik prezentuje się następująco:
Icon := TIcon.Create; Icon.Handle := LoadIcon(hInstance, 'ID_FILE');
ImageList1.AddIcon(Icon); Icon.Free;
Co może być nie tak, próbowałem już LoadIconA i LoadIconW, ale zawsze zmienai się ikona aplikacji :/
che che
sprobuj
var
AIcon:TIcon;
begin
AIcon := TIcon.Create;
AIcon.Handle := LoadIcon(hinstance, 'ID_FILE');
ImageList1.AddIcon(AIcon);
AIcon.Free;
end;
Icon jest zdefiniowana w TForm ! i ot powod
Zmieniłem, ale problem jest nadal, coś mi się wydaje, że to coś z tym LoadIcon :|
Hmm już chyba wiem w czym tkwi mój problem: plik zasobów. Program zmienia sobie ikonę, ponieważ zadeklarowane mam w pliku zasobów ICON.
ID_FILE ICON "file.ico"
Trzeba jakoś zamienić te ICON na coś innego co też deklaruje ikonę, hmm próbowałem już ICONFILE i ICOFILE, ale wtedy już zasób się nie ładuje. Może ktoś ma jakieś pomysły ?
ooo troche zle zrozumialem o co ci chodzi !
to niestety kolejnosc ikon (alfabet) w zasobach (widzialem kiedys program co potrafil zmieniec i ustawiac wedlug innej kolejnosci)
mozna zrobic tak
dodac jakas ikone
AAAAA ICON "ikonaprg_cochcesz.ico"
ID_FILE ICON "tatwoja.ico"
bo ikona delphi to MAINICON
rozwiazanie chamskie ale skuteczne
Niby już jest OK, ale program się trochę zwiększył :/ Dopuki nie znajde innego rozwiązania pozostane przy tym. Dziękuję za pomoc i pozdrawiam.
Zamiast LoadIcon daj LoadImage (opis znajdziesz w WSDK).