سؤال في وضع الفورم أسفل الشاشة

كيف كانت تجربتك ولماذا فشلت!

هل تقصد البالون الاصفر؟؟؟؟

هل تقصد ايقونة Tray اذا كان كذالك هناك مكون خاص لها

ان اردت اضعه ولكن الان الوقت متاخر وهو ضائع بالمكتبة

ااسلام عليكم

اعتذر عن التأخير

وهذا هو الكود الذي كتبته لكي يعطيني ما اردته

شكرا للشباب للمحاوله

procedure TForm1.FormCreate(Sender: TObject);
begin
form1.Left:=(screen.Width div 1) - (form1.Width div 1);
form1.top:=(screen.Height div 1) - (form1.Height div 1)- 30;

end;

عليك تصغير الفورم كما تريد

form_min.rar

و عليكم السلام :)

لدي بعض الملاحظات على ما كتبته:

اولاً: لماذا استخدمت div مع العدد 1 حيث انّ div يعيد ناتج القسمة صحيح و لا داعي للقسمة على 1 اي ليس هناك فائدة من كتابة div

ثانياً: الكود الذي كتبته لن يعمل في حال قمت بتكبير taskbar اي انت وضعت القيمة 30 هي طول ال taskbar لذلك اذا كانت اكبر لن تظهر الفورم بالشكل الصحيح

لذلك يمكنك استخدم screen.WorkArea و سوف تحل المشكلة لك تماما لاحظ الكود التالي:

  form1.Left:=  screen.WorkAreaWidth - form1.Width;
  form1.top:= screen.WorkAreaHeight  - form1.Height;

سوف تظهر الفورم في مكانها بغض النظر عن طول ال taskbar

السلام عليكم

أقدر لكم جهودكم .....

وبالنسبة لمشاركة الأخ وائل

على الأغلب هي الطريقة الصحيحة ولم أجربها بعد ولكن الحاجة أم الاختراع

وفقكم ربي