Skip to main content

AccessTr.neT


Kontrol Köşelerinin Yerine Bulmak

Kontrol Köşelerinin Yerine Bulmak

Çözüldü #1
şöyle bir fonksiyon var
Public Function GetControlsWindowSize(tag As String)
    Dim f As Form
    Dim c As Control
    Dim GrpLeft As Long
    Dim GrpRight As Long
    Dim GrpTop As Long
    Dim GrpBottom As Long

        For Each c In f.Controls
            If c.Properties.Item("tag") = tag Then
                If GrpLeft = 0 Or GrpLeft > c.Left Then GrpLeft = c.Left
                If GrpRight = 0 Or GrpRight < c.Left + c.Width Then GrpRight = c.Left + c.Width
                If GrpTop = 0 Or GrpTop > c.Top Then GrpTop = c.Top
                If GrpBottom = 0 Or GrpBottom < c.Top + c.Height Then GrpBottom = c.Top + c.Height
            End If
        Next
    End Function
 var buradan köşe lokasyonlarını nasıl bulabiliriz
@benbendedeilem
Cevapla
#2
Kod içerisinde GrpLeft, GrpRight,GrpTop ve GrpBottom değiştenleri mevcut.
Cevapla
#3
teşekkürler sn. @ozanakkaya
@benbendedeilem
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da