Текущий архив: 2002.08.05;
Скачать: CL | DM;
Вниз
Такой вот вопрос: Найти похожие ветки
← →
andrey_pst © (2002-07-25 07:53) [0]Такой вот вопрос:
Можно ли в стандартной функции MessageDlg(...) использовать свою иконку вместо стандартных ?
← →
Eugene Lachinov © (2002-07-25 08:58) [1]procedure TForm1.Button3Click(Sender: TObject);
var
Image : TImage;
begin
with CreateMessageDialog("Мое сообщение", mtInformation, [mbOK]) do try
Position := poScreenCenter;
Image := FindComponent("Image") as TImage;
if Image <> nil then Image.Picture.LoadFromFile("D:\XP_TrashFull.ico");
ShowModal
finally
Free
end
end;
← →
Игорь Шевченко © (2002-07-25 08:59) [2]Стандартно - нельзя.
Если только написать свой по образу и подобию.
С уважением,
← →
Игорь Шевченко © (2002-07-25 09:00) [3]Eugene Lachinov © (25.07.02 08:58)
Тоже способ :-)
И мне наука будет...
Страницы: 1 вся ветка
Текущий архив: 2002.08.05;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.044 c
