Jump to content

Programın Ekranın üst Köşede Durmasını Sağlama


Abdullah 37

Recommended Posts

0 sayılarını değiştirerek deneyerek bulabilirsin.

yer = Application.GetWndHandle();

Window.SetPos(yer, 0, 0)

Buradaki ilk 0 x yani pencereni soldan 0 pikselde başlatır.İkinci 0 y yani pencereni yukardan 0 pikselde başlatır.

Biraz matematik yapalım :D

Mesela bilgisayarının ekran çönürlüğü 1024x768 varsayıyorum.

Yaptığın program projen ise 600x400 ebatlarında varsayıyorum.

Bu durumda 1024/2=512

600/2=300

512-300=212 x sayımız oluyor y zaten 0 şimdi kodumuzu yazalım.

yer = Application.GetWndHandle();

Window.SetPos(yer, 212, 0)

Bu kodları sayfanın on Show evresine ekledinmi işlem tamamdır.

Link to comment
Share on other sites

Ekranın tam ortası için;

local tbSistemCozunurluk = System.GetDisplayInfo();
local tbPencereBoyut     = Window.GetSize(Application.GetWndHandle());

Window.SetPos(Application.GetWndHandle(), (tbSistemCozunurluk.Width / 2 - tbPencereBoyut.Width / 2), (tbSistemCozunurluk.Height / 2 - tbPencereBoyut.Height / 2));[/CODE]

Ekranın üst orta için;

[CODE]local tbSistemCozunurluk = System.GetDisplayInfo();
local tbPencereBoyut     = Window.GetSize(Application.GetWndHandle());

Window.SetPos(Application.GetWndHandle(), (tbSistemCozunurluk.Width / 2 - tbPencereBoyut.Width / 2), 0);[/CODE]

Link to comment
Share on other sites

  • 1 ay sonra...

Programı sol üst köşeye sabitlemek için Project > Actions > On Startup evresine:

Window.SetPos(Application.GetWndHandle(), 0, 0)[/CODE]

Eğer sürekli oraya sabitlemek istiyorsanız;

Page On Preload evresine:

[CODE]Page.StartTimer(100)[/CODE]

On Timer evresine:

[CODE]Window.SetPos(Application.GetWndHandle(), 0, 0)[/CODE]

Programın saatin orda çıkması içinde Project Settings'den System Tray'i seçin.

adszvnd.png

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...