Dziwny problem z ikoną

0

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 :/

0

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

0

Zmieniłem, ale problem jest nadal, coś mi się wydaje, że to coś z tym LoadIcon :|

0

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 ?

0

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

0

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.

0

Zamiast LoadIcon daj LoadImage (opis znajdziesz w WSDK).

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0