Работа с диалогом ShowModal

← →
Frozzen (2005-06-04 14:37) [0]

Здравствуйте уважаемые!
Подскажите как нужно сделать?
Я вызываю форму:

if frmtunegr.ShowModal = mrOK then ...

procedure Tfrmtunegr.JvXPButton1Click(Sender: TObject);
begin
TBank(banks.Items[Tag]).cl := cl.Color;
TBank(banks.Items[Tag]).wi := udWid.Position;
end;

procedure Tfrmtunegr.JvXPButton3Click(Sender: TObject);
begin
if ColorDialog.Execute then cl.Color := cd.Color;

end;

Все работала, пока не использовал Колор диалог. Теперь при выборе цвета в КолорДиалоге форма закрывается, как быть?

← →
begin...end © (2005-06-04 14:42) [1]

Проверьте значение свойства ModalResult у кнопки JvXPButton3.

← →
Frozzen (2005-06-04 14:49) [2]

Пасиба! помогло

Работа с диалогом ShowModal Найти похожие ветки