+- 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ığı: Buton Konumlama (/konu-buton-konumlama.html)
RE: Buton Konumlama - atoykan - 24/02/2021
Bir öneri olarak şunu söyleyeyim:
Command butonlarınızı işaretlerin geleceği noktalara yakın oluşturun ve visible özelliğini false yapın. Gerekli koşulların sağlanması durumunda caption ve color özellikleri tanımlansın ve visible özelliği true olarak güncellensin. Böylece command buton oluşturmuş gibi istediğiniz butonlar görüntülenebilir.
RE: Buton Konumlama - temre - 27/02/2021
Sn Atoykan haklısınız.
Butonları tüm ilçelere (yaklaşık 1000 nokta sanırım) konumlandıracağım için biraz üşendim doğrusu
RE: Buton Konumlama - berduş - 28/02/2021
1000 butonu tek tek eklemek yerine aşağıdakine benzer bir kodu kullanabilirsiniz:
uzunluk, genişlik vs vs gibi değerleri girmezseniz varsayılan ayarları kullanır
diğer özellikleri de Visible gibi buradan ayarlayabilirssiniz
.CreateControl (FormAdı, NesneTürü(metnKutusu-Buton_listeKutusu vsvs), EkleneceğiBölge(başlıkkısmına-anagövde-alttbölge), Parent, ColumnName, SolaMesafe, ÜsteMesafe, Genişlik, Yükseklik)
Dim CtName As String
FrmAdi = "Form1"
DoCmd.OpenForm FrmAdi, acDesign
For X = 1 To 1000
CtName = "BtnAdi_" & X
Set ctlCheck = CreateControl(FrmAdi, acCommandButton, , , "") ', CtLeft, CtTop, CtlWidth, CtlHeight)
ctlCheck.Name = CtName
'With ctlCheck
' .Name = "BtnGun" & X
' .Top = CtlUst + DkyArlk * ((X - 0.6) \ 7)
' .Left = CtlSol + YtyArlk * ((X - 0.6) Mod 7)
'End With
Next XRE: Buton Konumlama - temre - 28/02/2021
Sn Berduş çok teşekkürler
RE: Buton Konumlama - temre - 28/02/2021
Sn Berduş,
For Next döngüsü Tablo1'de Seç alanında tıklanan satırları okusa ve
butonlar boyut-renk-konum-tanım bilgilerini buradan alsa
kodlama nasıl olur?
RE: Buton Konumlama - berduş - 28/02/2021
Bu kodlar sadece bir defa kullanılacak o da siz tek tek butonları eklemeyin diye
Yani her defasında bu kodlar çalışıp forma buton eklemeyecek yani yanlış anlaşılma olmasın.