AccessTr.neT

iyi günler
öyle bir fonksiyon yazmak istiyorum ki
formu sağ alt köşeye sıfırlasın
ekran kaç inch ve çözünürlülüğü ne olursa olsun
form büyüklüğü ne kadar olursa olsun
formu ekranın sağ alt köşesine yerleştirsin
yardımcı olacak arkadaşlara teşekkürler
bunu c# için yazmışlar

Kod:
var X = Screen.GetWorkingArea(this).Width;

var Y = Screen.GetWorkingArea(this).Height;

this.Location = new Point(X - this.Width, Y - this.Height);

bunuda delphi için

Kod:
left := Screen.DesktopWidth - Width;

  Top  := Screen.DesktopHeight - Height;

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    Me.Visible = True

    Dim x As Integer

    Dim y As Integer

    x = Screen.PrimaryScreen.WorkingArea.Width

    y = Screen.PrimaryScreen.WorkingArea.Height - Me.Height



    Do Until x = Screen.PrimaryScreen.WorkingArea.Width - Me.Width

        x = x - 1

        Me.Location = New Point(x, y)

    Loop



End Sub

dener misiniz lütfen!

bu kodlar vb için mi
access de nasıl olmalı

Bunu deneyememişim galiba

accessman

chopper07

accessman

accessman