AccessTr.neT
Formun Yarısını Gizleme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Formun Yarısını Gizleme (/konu-formun-yarisini-gizleme.html)

Sayfalar: 1 2 3


RE: Formun Yarısını Gizleme - ozanakkaya - 03/09/2020

Bahsettiğiniz formda, kutunun solundaki denetimler gizlenecek, kutu ve çizginin sol (left) değeri azaltılacak. Kendi uygulamanızda deneyin, olmazsa uygulamanızı paylaşın


RE: Formun Yarısını Gizleme - enginbeyy - 03/09/2020

hocam dosya eklenecek yer yok


RE: Formun Yarısını Gizleme - enginbeyy - 04/09/2020

hocam şimdi ekleyebildim. size zahmet bakabilir misiniz?


RE: Formun Yarısını Gizleme - berduş - 04/09/2020

resim gizlendiğinde resmin dışında kalan tüm nesneler mi sola kayacak? siz mi çok özensiz rasgele hazırladınız yoksa benim ekran çözünürlüğünün yetersizliğinden kaynaklanan bir durum mu bilmiyorum ama tüm nesneleriniz iç içe girmiş. neleri sola kaydıracağımı anlamadım.
isterseniz kaydırılacak tüm nesneleri tab/sekme duruma göre kaydırma yapabilirsiniz.


RE: Formun Yarısını Gizleme - enginbeyy - 04/09/2020

Hocam dosya bende düzgün bir sorun yok.

Hocam şöyle anlatayım @ozanakkaya beyin bana verdiği kodu ekteki dosyaya ekledim hatta bir iki küçük eklemeler yaptım çok güzel çalışıyor. Fakat Kutu25'i az sağa veya sola kaydırdığımda çalışmıyor. asıl dosyamda fotoğraf büyük olduğu için Kutu25'i biraz daha sağ tarafa almam gerekiyor. Ozan hocam left değerlerini neye göre ayarladı acaba yada farklı bişey mi var.


Re: Formun Yarısını Gizleme - berduş - 04/09/2020

gizlenecekler ve sola kaydırılacak nesneler için 2 sekme nesnesi ekledim
nesneleri kendi sekmelerine gömdüm
dilerim işinize yarar
kutu tıklama kodu
If Kutu262.Left < 4000 Then
    Me.TabCtl274.Visible = True
    Me.Kutu262.Left = 4590
    Me.TabCtl268.Left = 4875
    Me.Çizgi267.Left = 4755
Else
    Me.TabCtl274.Visible = False
    Me.Kutu262.Left = 60
    Me.TabCtl268.Left = 345
    Me.Çizgi267.Left = 225
End If
2. dosyada (hy3 olan) ise çizgi ve kutu da sekme içine alınmıştır.