Formlar arası geçiş

[AliRiza]

Arkadaşlar form1den form2'ye formun show metodunu kullanarak geçiş yapıyorum.Benim istediğim form2'de simge durumuna küçülştme yapıldığı zaman görev çubuğuna atması.Görev çubuğuna indirmeme nedeni ne olabilir.Form1'de form2 açık değilken görev çubuğuna iniyor.Form2 açıkda olsa form1'den simge durumuna küçültme tuşuna basınca form1 ile birlikte form2'ninde simge durumuna küçülmesini istiyorum.Ne yapabilirim..

[naile]

hiç bişey anlamadım

[AliRiza]

Şimdi daha anlaşılır olur herhalde.Benim anlatmak istediğim normalde anaformdan simge durumuna küçültme yapıldığında programa bağlı diğer formlarında simge durumuna küçülmesi.Ama diğer formlardan simge durumuna küçültme yapıldığında başlat menüsünün üst kısmında yer alıyor.Formların hepsinin stili normal.
Formda araştırdım.
Formu minimize etmek için application.minimize etmek yeterli.
Ama benim istediğim kendi oluşturduğum buton değilde windows'un kendi minimize düğmesine müdahale etmek.
Yani minimize edildiğinde tüm açık formları minimize etmek.
Yardımlarınızı bekliyorum..

[pentiumkivanc]

Bunun olması normal çünkü form1 main form, yani application ı temsil ediyor. Diğer formlar ise onabağlı formlar.

[AliRiza]

Olması doğal ama mutlaka sistemin minimize düğmesine müdahale etmenin bir yolu vardır diye düşünüyorum.Yani önce windowsun minimize düğmesine basılıp basılmadığını kontrol ettirmek gerekiyor.Daha sonra basıldı ise bir handle gönderip application.minimize olayını yaptırabiliriz.
Ama minimize düğmesine basılıp basılmadığını nasıl kontrol ettiririm.

[pentiumkivanc]

formun onresize olayını denedinizmi belki işinizi görebilir

[AliRiza]

Onresize olayını denedim.Ama olmadı.Tekrar denemeyi düşünüyorum.
Onresize olayında
application.minimize yaptım ama bir şey olmadı..
Aklıma bir tane applicationevent alıp onun applicationminimize olayında kod yazmak geldi.Orada denedim olmadı..
Arkadaşlar mutlaka ikinci formda minimize yapıldığı zaman onu görev çubuğuna indirmenin bir yolu vardır.
Yardımlarınızı bekliyorum...

[gkimirti]

tum formlarını bir temel formdan turet
bunun uzerine applicationevents nesnesini koy ve gereken kodları yaz
bu sekilde olabilir.

[AliRiza]

Formları nasıl temel formdan türetirim.Ana formu mdi,diğer formları child form yapmadan mı bahsediyorsunuz?Bunu biraz açablirsiniz.Ayrıca formların hepsinin stili normal .
Mdiform veya child formda child olanlar mdi içerisinde geldiği için kullanmak istemedim.Ayrıca child formda siz nasıl boyutlandırırsanız boyutlandırın mdi formun boyutu ilöe aynı alıyor.

[pentiumkivanc]

bir formu create etmek için ille mdi olmasına gerek yok.

[mrmarman]

Merhaba...

- Formun System Command (SYSCOMMAND) SC_ mesajlarını takip ederek istediğin mesajı yakaladığında bunu ya Inherited eder yoluna devam etmesine izin verirsin ya da önünü kesip kendi işini yaptırırsın, karar senin..

Formunun Public kısmına şunu ekle...

Kod: Tümünü seç

  public
     Procedure MesajVar(var Msg : TMessage); message WM_SysCommand;

- bu procedure satırının üzerinde CTRL+SHIFT+C tuş kombinasyonuna basarsan Delphi IDE senin için bu procedure'u aşağıda kurar... Yapamazsan aşağıya in ve şunları yaz...

Kod: Tümünü seç

procedure TForm1.MesajVar(var Msg: TMessage);
begin
 If MSG.WParam = SC_Minimize
 then begin
        ShowMessage('Minimize isteği geldi. İzin verilmedi...')
      end
 else inherited;
end;

Burada SC_Minimize ile minimize olma durumunu takibe aldık,

[AliRiza]

Peki formun hangi olayını kullanmam lazım.Yani bu procedurü formun resize olayında mı yoksa başka hangi olayda çağırmam gerekir.Muharrem arkadaş bu konuda bir açıklama yaparsan sevinirim.

[AliRiza]

Muharrrem kardeş kusuruma bakma denemeden sana hangi olayda yazılacağını sordum.Direk yazdım işimi gördü.Peki siz bilirsiniz ben izinle ilgili bölümde inherit yapmadan application.minimize yaptım.Buda tüm formları minimize ediyor.Sadece bulunulan formu görev çubuğuna (normalde ana form dışında diğer formlarda başlatın üstüne minimize ediyor.)nasıl minimize ederim..

[mrmarman]

Merhaba..

- Application.Minimize yaparsan adı üzerinde tüm projen minimize edilir. Sen istediğin formu (ana form hariç)

Kod: Tümünü seç

  Form2.WindowState := wsMinimized;

kodunu sadece form adını değiştirerek istediği form için kullanarak yapabilirsin...

[AliRiza]

Muharrem arkadaş yardımların için çok teşekkür ama benim anlatmak istediğim farklı. windowstate ile yaptığımız zaman form2'de başlatın üstüne atıyor görev çubuğuna atmıyor.Zaten problemde burada ben görev çubuğuna indirmek istiyorum..