** Harold |
Отправлено: 24.05.2005, 19:20 |
|
Не зарегистрирован
|
Такое ощущение, что все используют этот вариант и довольны..
CODE |
ExeCatalog = ExtractFilePath(Application->ExeName);
Form1->Icon-> LoadFromFile(Form1->ExeCatalog + "\\Icons\\MyAppIcon.ico");
|
А как же все-таки иконку из ресурсов загрузить-то? Звук, например, просто (ну, ест-но, его нужно сначала в ресурс положить, я положил прямо в ехе-шник. И иконки положил, а как использовать не знаю...)
CODE |
//PlaySound((const char*)(((Form1->ExeCatalog +"\\Sounds\\MySound.wav")).c_str()), 0, SND_SYNC);//из файла
PlaySound("MySound", 0, SND_RESOURCE ); // из ресурсов
|
? . Может, кто в курсе? |
|
Rius |
Отправлено: 24.05.2005, 20:33 |
|
Мастер участка
Группа: Участник
Сообщений: 321
|
Можно попробовать грузануть иконку из ресурсов в TImage и сохранить в файл, либо в Clipboard, а потом уже загрузить в TIcon. Но должно быть что-то проще.
|
|
** Harold |
Отправлено: 24.05.2005, 20:54 |
|
Не зарегистрирован
|
Вот и я о том, что должно быть проще...
Ведь ВСВ для и для "дятлов" в том числе написан, а тут такая простая НЕЗАУМНАЯ потребность...
Никаких Вам виртуальных методов и динамически подключаемых библиотек — неужели никто НЕ ЗНАЕТ?
Ну, хоть скажите, что мол знаю, но не скажу — ей богу полегчает
Я, конечно, понимаю, что вопрос из серии как "ложкой попасть в рот и не промахнуться..." но, тем не менее...
Лето наступило! ЗдОрово! |
|
AVC |
Отправлено: 25.05.2005, 09:22 |
|
Ветеран
Группа: Модератор
Сообщений: 1583
|
Кусок рабочего кода
CODE |
FIco_Tray_Idle = new TIcon(); FIco_Tray_Idle->Handle = LoadIcon (HInstance, "IDLE");
...
Application->Icon = FIco_Tray_Idle;
...
Image1->Picture->Icon = FIco_IPPanel_PingOn;
| |
|
Gal |
Отправлено: 25.05.2005, 16:08 |
|
Станционный диспетчер
Группа: Участник
Сообщений: 124
|
Посмотри в Examples\Tray |
|
** Harold |
Отправлено: 25.05.2005, 17:52 |
|
Не зарегистрирован
|
Спасибо, разобрался. Действительно, вместо того чтоб ложку с супом в рот положить, я ее зачем-то в ухо пихал. (хотя ухо, в общем случае, тоже отверстие в голове... ) |
|
|