Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.31;
Скачать: CL | DM;

Вниз

Как добавить иконку в заголовок окна?   Найти похожие ветки 

 
Гость2   (2005-05-30 11:36) [0]

Как добавить иконку в заголовок окна?


 
SergP.   (2005-05-30 11:39) [1]

У формы есть свойство icon.


 
Гость2   (2005-05-30 12:28) [2]

а так, чтоб иконка, которая зашита в *.res


 
TUser ©   (2005-05-30 12:41) [3]

Загрузить ее из ресурсов (LoadFromStream)


 
TUser ©   (2005-05-30 12:50) [4]

Автору:
Написал бы "Как запуздырить иконку в заголовок окна" - сразу бы мастера прибежали :)


 
Чапаев ©   (2005-05-30 13:57) [5]

А я, прочитав "добавить", понял так, что нужно, чтоб окно имело две иконки...


 
Гость2   (2005-05-30 14:12) [6]

Уточню, BorderSyle:= bsNone,
а хотелось бы, чтобы на панели задач отображалась определенная иконка


 
Чапаев ©   (2005-05-30 14:16) [7]

>а хотелось бы, чтобы на панели задач отображалась определенная иконка
Тю. Ну так с этого следовало начинать.


procedure TForm1.CreateParams(var Params:TCreateParams);
begin
 inherited;
 Params.StyleEx:=Params.StyleEx or WS_EX_APPWINDOW;
end;


Form1.Icon.Handle:=LoadIcon(...);


 
Игорь Шевченко ©   (2005-05-30 14:25) [8]


> а хотелось бы, чтобы на панели задач отображалась определенная
> иконка


Project Options|Application|Icon|Load Icon


 
Navigator   (2005-05-30 14:30) [9]


> Загрузить ее из ресурсов (LoadFromStream)

А как это делается?


 
Гость2   (2005-05-30 14:32) [10]

Игорь Шевченко ©   (30.05.05 14:25) [8]
> а хотелось бы, чтобы на панели задач отображалась определенная
> иконка

Project Options|Application|Icon|Load Icon


Это первое, что приходит в голову, однако с BorderSyle:= bsNone, это не срабатывает:(


 
Anatoly Podgoretsky ©   (2005-05-30 14:37) [11]

Чапаев ©   (30.05.05 13:57) [5]
Основная и запасная.

Гость2   (30.05.05 14:12) [6]
панель задач это заголовок окна


 
DVM ©   (2005-05-30 14:39) [12]


> однако с BorderSyle:= bsNone, это не срабатывает:(

Когда таскбар рисует кнопу - она обязательно присылает окну WM_GETICON - на него надо реагировать.


 
Гость2   (2005-05-30 14:43) [13]

Признаюсь, собственно, ничего не понял:(
Подскажите мои необходимые действия.
>Чапаев ©   (30.05.05 14:16) [7]
StyleEx - unknown :(


 
Navigator   (2005-05-30 14:44) [14]


> Anatoly Podgoretsky ©   (30.05.05 14:37) [11]


> панель задач это заголовок окна

Позвольте с Вами не согласиться. Заголовок окна - это синенькая (стандартн.) полоска в самом верху текущего окна, справа на которой помещены кнопки "Свернуть", "Восстановит", "Закрыть".


 
Navigator   (2005-05-30 15:01) [15]


> Загрузить ее из ресурсов (LoadFromStream)

Ну то как это сделать?


 
DVM ©   (2005-05-30 15:05) [16]


> Ну то как это сделать?

HICON LoadIcon
(  
HINSTANCE hInstance, // указатель на приложение
LPCTSTR lpIconName   // идентификатор
);

Если функция завершится неудачно, то вернется значение NULL. Эта функция вернет указатель на икону в том случае, если ее параметры совпадают с параметрами установленными в SM_CXICON и SM_CYICON, которые можно получить функцией GetSystemMetric. Если Вы хотите икону другого типа, то используйте LoadImage().


 
Anatoly Podgoretsky ©   (2005-05-30 15:11) [17]

Navigator   (30.05.05 14:44) [14]
Ну так добавь знак вопроса в предложение.


 
Игорь Шевченко ©   (2005-05-30 15:46) [18]

Гость2   (30.05.05 14:32) [10]


> Это первое, что приходит в голову, однако с BorderSyle:=
> bsNone, это не срабатывает:(


Срабатывает. На панели задач показывается иконка окна Application.Handle, а не формы с bsNone


 
Navigator   (2005-05-30 18:51) [19]

то я так и не понял, как добавить иконку в ЗАГОЛОВОК ОКНА.
Потрепались, а на сабж никто не дал ответа


 
Чапаев ©   (2005-05-30 19:44) [20]

> StyleEx - unknown :(
Ну значит ExStyle... Как будто я всё могу запомнить и как будто вы ничего не можете своими руками сделать.


 
Anatoly Podgoretsky ©   (2005-05-30 19:54) [21]

Navigator   (30.05.05 18:51) [19]
Если ты внимательно читал, то должен быть понятб, что у него нет заголовка окна!
Если у тебя есть такое окно с заголовком, то задай свой вопрос с точной формулировкой, а то как оказалось нужен заголовок для кнопки в панели задач.


 
Navigator   (2005-05-30 19:59) [22]

>Anatoly Podgoretsky ©   (30.05.05 19:54) [21]
а то как оказалось нужен заголовок для кнопки в панели задач
Дык не заголовок нужен, а иконка


 
Navigator   (2005-05-30 20:00) [23]

У меня, например такой же вопрос - на кнопке в панели задач есть иконка, а на самом окне (в заголовке) - нет. Как сделать, чтоб иконка появилась и в заголовке окна тоже?


 
GrayFace ©   (2005-05-31 17:48) [24]

Navigator   (30.05.05 20:00) [23]
Ну дак Form1.Icon.Handle:=LoadIcon(HInstance,"MAINICON");
Но ведь у всех форм по умолчанию ставится иконка приложения.


 
rOOse ©   (2005-05-31 18:19) [25]

procedure TForm1.Button1Click(Sender: TObject);
var
 DC: HDC;
 Icon: HICON;
begin
 DC:= GetWindowDC(form1.Handle);
 DrawIcon(DC, 5,5, image1.Picture.Icon.Handle);
 ReleaseDC(form1.Handle, DC);
end;


 
DVM ©   (2005-06-01 10:10) [26]


> а на самом окне (в заголовке) - нет. Как сделать, чтоб иконка
> появилась и в заголовке окна тоже?

А что при создании окна на WinApi иконку трудно было в параметрах класса окна указать?

wc.hIcon := LoadIcon(0, IDI_APPLICATION);



Страницы: 1 вся ветка

Текущий архив: 2005.07.31;
Скачать: CL | DM;

Наверх




Память: 0.52 MB
Время: 0.044 c
3-1119383683
Alex Romanskiy
2005-06-21 23:54
2005.07.31
Объявление UDF


1-1121165114
Piter
2005-07-12 14:45
2005.07.31
Эмуляция нажатия мышкой


3-1118917400
ivc_andr
2005-06-16 14:23
2005.07.31
Узнать текст запроса и Host


4-1117733649
MacRine
2005-06-02 21:34
2005.07.31
Как получить список программ свернутых в SysTray?


14-1120491919
RusLAN_
2005-07-04 19:45
2005.07.31
Сервер пищит (во время работы) Помогите разобраться...