delphi4arab منتديات دلفي للعرب

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

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

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

السلام عليكم

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

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

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; 

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

)

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

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

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

مممم

نعم اخى mourad39

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

PHP كود :
form1.Left:= screen.DesktopWidth - form1.Width;
form1.Top:= screen.DesktopHeight - form1.Height; 

بالتوفيق ,,

Amine

hanipino

Amine

mourad39

hanipino

TF6M