| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Значок программы в диалоге. [D3, Win95/98]
inko © (2002-04-09 15:46:00)Как можно в диалоге "О программе" вывести значок своего приложения, а не стандартные - mtInformation, mtWarningи т.д.?
procedure TForm1.Button6Click(Sender: TObject);
begin
AMsgDialog := CreateMessageDialog("Моя программа версии 1.0", mtInformation, [mbOk]);
with AMsgDialog do
try
Caption := "Загаловок программі" ;
Case ShowModal of
ID_OK:
end;
finally
Free;
end;
end;
Набережных С. (2002-04-09 22:09:00) [1]Например, так:
Img:TImage;
....
Caption := "Загаловок программі" ;
TComponent(Img):=FindComponent("Image");
if Img <> nil then Img.Picture.Icon.LoadFromFile...
Case ShowModal of
.....
inko (2002-04-09 18:03:00) [2]> Reindeer Moss Eater
mtCustom не хочет работать !
Reindeer Moss Eater (2002-04-09 16:47:00) [3]mtCustom
| |
