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
bir alttaki pencerenin koordinatlarını alabilen form?
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
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.
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
www.polisoft.com.tr
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.
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.
Merhaba ,
Ozaman buna benzer bir fonksiyona , Üzerinde bulunduğun ve çağıracağın foru parametre geçerek formu açarsan olabilir die düşünüyorum.
gibi kolay gelsin.
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;
Kod: Tümünü seç
ShowModalEx(anaForm,CagrilanForm);
Volkan KAMADAN
www.polisoft.com.tr
www.polisoft.com.tr