Как у MessageDlg сделать фон к примеру Белым?

← →
Starcom (2005-08-10 21:25) [0]

Привет Мастера!

Как у MessageDlg сделать фон к примеру Белым?

Есть соображения!

С Уважением Starcom! ;-()

← →
palva © (2005-08-10 22:12) [1]

Свойства рабочего стола - Оформление - Рельефные объекты - выбрать белый цвет.

← →
Ученик (2005-08-10 22:23) [2]

>Starcom (10.08.05 21:25)

Из Dialogs.pas

function MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint): Integer; begin Result := MessageDlgPosHelp(Msg, DlgType, Buttons, HelpCtx, -1, -1, ""); end; function MessageDlgPosHelp(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint; X, Y: Integer; const HelpFileName: string): Integer; begin with CreateMessageDialog(Msg, DlgType, Buttons) do try HelpContext := HelpCtx; HelpFile := HelpFileName; if X >= 0 then Left := X; if Y >= 0 then Top := Y; if (Y < 0) and (X < 0) then Position := poScreenCenter; Result := ShowModal; finally Free; end; end;

← →
Starcom (2005-08-10 22:35) [3]

palva © (10.08.05 22:12) [1]

Тоже вариант! :)

← →
Starcom (2005-08-10 23:00) [4]

Ученик (10.08.05 22:23) [2]

Попробовал, не вкусно!
Разжуй если мона...
(Шютка!!! нифига он не белый):(

← →
Ученик (2005-08-10 23:15) [5]

function ColorMessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint; aColor: TColor): Integer; begin with CreateMessageDialog(Msg, DlgType, Buttons) do try Color := aColor; HelpContext := HelpCtx; Position := poScreenCenter; Result := ShowModal finally Free end end;

← →
TG © (2005-08-18 02:20) [6]

Попробуй различные компоненты для Delphi

← →
Eraser © (2005-08-18 02:22) [7]

Starcom (10.08.05 21:25)

Сделай своё окно типа MessageDlg.

← →
Starcom (2005-08-18 06:50) [8]

Всем спасибо за новые советы!

Eraser © (18.08.05 02:22) [7]
Честно говоря я об этом подразумевал, но хотелось узнать
ваше мнение! Придётся так и сделать (своё окно)

TG © (18.08.05 02:20) [6]
А различные компоненты, енто шо за це таке, А?

С Уважением Starcom! :)

← →
Наиль © (2005-08-18 08:55) [9]

Статья по теме:
http://skycity.dem.ru/Text/msgdlg.htm

← →
Starcom (2005-08-18 15:21) [10]

Наиль © (18.08.05 08:55) [9]

Спасибо! Посмотрю! :)

Starcom (18.08.05 15:21)
То есть [5] тебя ну никак не устраивает???

← →
Starcom (2005-08-18 22:01) [12]

jack128 © (18.08.05 15:28) [11]

Да я блин нафиг нифига не понял, написал данную финкцию
но нифига не прёт, т.е вызвать функцию не могу ...
и где там цвет фона ? (типо чё за бред - про меня!!!)

С Уважением Starcom! :(

← →
Starcom (2005-08-20 18:05) [13]

Ау Мастерам! :(

Starcom (20.08.05 18:05) [13]

[5], [7]

← →
Starcom (2005-08-22 07:34) [15]

Привет Мастера!

[7]- Сделал, все О"кей!

Eraser © (20.08.05 18:28) [14]

[5]- Немогу разобратся как использовать, можно поподробнее
типа: Создать форму, кинуть на неё кнопку, и.т.д... А?
(Чёто аж мурашки бегут, я ли это!(Насчёт вопроса ламерского)).

С Уважением Starcom! ;-()

Как у MessageDlg сделать фон к примеру Белым? Найти похожие ветки