bir alttaki pencerenin koordinatlarını alabilen form?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

bir alttaki pencerenin koordinatlarını alabilen form?

Mesaj gönderen nitro »

merhaba,
programda herhangi bir form görüntülendiği zaman bir alttaki formdan biraz daha sağ tarafta ve biraz daha aşağıda açılmasını istiyorum.
böylece pencereler üst üste düzenli bir şekilde açılmış olacak.
programda bir form herhangi başka bir formdan çağrılabiliyor. o nedenle bir alttaki formun koordinatlarını kendi kendine alan kodlar lazım.
yardımlarınız için şimdiden teşekkürler.
saygılarımla
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

Merhaba,
Tform.Top = Formun Ekranın üst köşesine, Tform.Left =Formun Ekranın Sol tarafına olan uzaklığını pixel cinsinden verir, siz bu değerleri yeni formunuzu ShowModal etmeden önce alıp zevkinize göre toplayıp çıkartıp yeni formun açılacağı yere göre düzenleyip yeni forma atayabilirsiniz.
İyi çalışmalar.
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

teşekkürler vkamadan.
bir fomdan çağrılacak tüm formlara bu komutu yazmaktansa, daha farklı bir şey düşünmüştüm, mesela

form1 'den form4'ü gösteriyoruz diyelim.
form2 'den form4'ü gösteriyoruz diyelim.
form3 'den form4'ü gösteriyoruz diyelim.

3 farklı kod yazmamız gerekiyor bu durumda.
ama form4'e öyle bir kod yazsak ki, onu çağıran hangi form ise o formun koordinatların göre kendini konumlandırsın.
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

Merhaba ,

Kod: Tümünü seç

  function ShowModalEx(ParentForm,TargetForm:TForm):Integer;
    begin
       TargetForm.Top:=ParentForm.Top+10;
       TargetForm.Left:=ParentForm.Left+10;
       Result:=TargetForm.ShowModal;
    end;
Ozaman buna benzer bir fonksiyona , Üzerinde bulunduğun ve çağıracağın foru parametre geçerek formu açarsan olabilir die düşünüyorum.

Kod: Tümünü seç

 ShowModalEx(anaForm,CagrilanForm);
gibi kolay gelsin.
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

teşekkürler volkan hocam. bu sefer oldu :)
Cevapla