Советы по Delphi


              

Можно ли сделать так - одновременно


Nomadic советует:

Обманом можно все.

    procedure ShowAlmostModal(FormModal:TForm);
begin
NavigatorForm.Enabled:=false;
FormModal.ShowModal
end;

И вот это пpивесь на OnShow почти модальной фоpмы

    procedure FormShow(Sender:Tobject);
begin
NavigatorForm.Enabled:=true;
end;

[001110]



Содержание  Назад  Вперед