Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
ВнизЗначок программы в диалоге. Найти похожие ветки
← →
inko (2002-04-09 15:46) [0]Как можно в диалоге "О программе" вывести значок своего приложения, а не стандартные - 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;
← →
Reindeer Moss Eater (2002-04-09 16:47) [1]mtCustom
← →
inko (2002-04-09 18:03) [2]> Reindeer Moss Eater
mtCustom не хочет работать !
← →
Набережных С. (2002-04-09 22:09) [3]Например, так:
Img:TImage;
....
Caption := "Загаловок программі" ;
TComponent(Img):=FindComponent("Image");
if Img <> nil then Img.Picture.Icon.LoadFromFile...
Case ShowModal of
.....
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c