ShowModal Form açık iken ana formu görev çubuğuna indirmek

[NewMember]

Arkadaşlar projemde child formlarımı ShowModal olarak açtırıyorum.Mesela diyelim ana formum ve üzerinde ShowModal açık olan bir child formum var.Programımı görev çubuğuna indirmek için ana formun üzerindeki minimize butonuna basmak için child formu kapatmam gerekiyor.Doğal olarak ana forma ulaşılamıyor.Sadece bu minimize butonuna erişimi mümkün kılmamızın bir yolu varmı acaba?Yani child formu kapatmadan ana formu minimize etmenin yolu varmı?Tabii görev çubuğundaki program bölmesine tıklarsanız aşağıya iniyor ama cins kullanıcılar için bunu da yapsak iyi olacak..

[Battosai]

anaformu mininize edince child formda onla beraber gidecektir...Modal olarak kullanacağınız formları child yapmayın bunların kapatılmasındada yani free ederkende sıkıntı çıkarır

[NewMember]

anaformu mininize edince child formda onla beraber gidecektir...Modal olarak kullanacağınız formları child yapmayın bunların kapatılmasındada yani free ederkende sıkıntı çıkarır

Kusura bakmayın child form derken ana fromun dışındakileri kastettim.Form tipleri child değil normal.Ama modal iken ana forma ulaşamıyoruz ki?

[csunguray]

Soruyu şu şekilde değiştirin.
Modal görüntülenen bir form minimize yapıldığında uygulamayı nasıl minimize edebilirim?

Aşağıdaki şekilde yapabilirsiniz.

Kod: Tümünü seç

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Menus, ComCtrls, DB;

type
  TForm1 = class(TForm)
  private
    { Private declarations }
    procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TFormOrj.WMSysCommand(var Message: TWMSysCommand);
begin
  case (Message.CmdType and $FFF0) of
    SC_MINIMIZE: 
      begin
        EnableWindow(Application.handle, true);
        Application.Minimize;
      end;
  end;
  inherited;
end;

[NewMember]

@csunguray teşekkürler.bu işimi gördü...