يتم عرض برنامج دلفي في وضع ملء الشاشة بدون شريط عنوان، ويغطي الشاشة بأكملها، وهذا مفيد عند إنشاء أجهزة كمبيوتر صناعية أو شاشات توقف، لذا قم بتدوينه.
انسخ رمز الكود كما يلي:
الإجراء TMainFrm.FormCreate(Sender: TObject);
يبدأ
مع MainFrm تبدأ
{نموذج المنصب}
أعلى := 0 ;
اليسار := 0 ;
{الذهاب إلى وضع ملء الشاشة}
BorderStyle := bsNone ;
WindowState := wsmaximized;
ClientWidth := Screen.Width ;
ClientHeight := Screen.Height;
ينعش؛
SetForegroundWindow(Handle);
SetActiveWindow(Application.Handle);
نهاية؛
نهاية؛