ضبط مكان الفورم فوق الساعة تماما

[Amine]

مرحبا
عندي برنامج احناج فيه الى وجود فورم في الزاوية السفلية فوق الساعة
مثل الشاشة التي نراها عادة في الانتي فايرس
حاولت ضبطها هناك , لكن عند تغيير دقة الشاشة , يتغير مكانها

كيف يمكتتي ضبطها في الزاوية السفلية , مهما تم تغيير دقة الشاشة

وشكرا جزيلااااا

[hanipino]

السلام عليكم

جرب احدى الطريقتين

الاولى : ( الاحسن)

PHP كود :

procedure TForm1.FormCreate(Sender: TObject);
var
  R: TRect;
  Hauteur: Byte;
begin
  SystemParametersInfo(SPI_GETWORKAREA, 0, @R, 0);
  Hauteur := Screen.Height - R.Bottom;
  Left := Screen.Width - Width;
  Top := Screen.Height - Height - Hauteur;
end; 


الثانية : (شبه خدعة )

PHP كود :

procedure TForm1.FormResize(Sender: TObject);
begin
  Constraints.MaxWidth := 270;
  Align := alBottom;
  Align := alNone;
  Left := Screen.Width - Width;
end; 


[Amine]

يعطيك الصحة، اخي
طبقت الكود وحصلت على النتيجة بالظبط
شكرا جزيلاا

[mourad39]

لكن عندما يكون الويندوز عربي سيتوجب تغييرها إلى الجهة اليسرى

[hanipino]

مممم

نعم اخى mourad39

[TF6M]

السلام عليكم
- ماذا لو عملنا على أساس الـ شاشة :

PHP كود :

form1.Left:= screen.DesktopWidth - form1.Width;
form1.Top:= screen.DesktopHeight - form1.Height; 


بالتوفيق ,,