View Full Version : پنجره Full Screen
Dracula
یک شنبه 18 خرداد 1382, 13:20 عصر
با سلام
دوستان عزیز لطفا راهنمایی کنید که چطور میشه پنجره ای رو طوری Full Screen کرد که منوی Taskbar ویندوز هم نمایش داده نشه
یعنی فول اسکرینه فول اسکرین
متشکرم .
JavanSoft
یک شنبه 18 خرداد 1382, 14:55 عصر
در فرم اصلی می توانید پنجره را بصورت Maximizedبازکنید و alwaysOnTop
Dracula
یک شنبه 18 خرداد 1382, 18:09 عصر
مرسی دوست عزیز
ولی راهی غیر از این هم هست ؟
مهدی کرامتی
یک شنبه 18 خرداد 1382, 18:35 عصر
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Top:=0;
Form1.Left:=0;
Form1.Width:=screen.Width;
Form1.Height:=screen.Height;
Form1.FormStyle:=fsStayOnTop;
end;
SyntaxCheck
دوشنبه 19 خرداد 1382, 00:19 صبح
var MyHandle:Thandle
Begin
MyHandle := findwindow('shell_traywnd',nil);
ShowWindow(MyHandle,sw_hide);
End;
کد فوق در قسمت آن شو نوشته شود.
ShowWindow(MyHandle,sw_show);
این کد هم در آن کلوز فرم نوشته شه.
کد های بالا جهت تکمیل فرمایشات دوستان و برای مخفی کردن تسک بار ویندوز میباشد و به نقل از Maysam از برو بچه های دلفی کار.در ضمن اسیستانت عزیز فکر میکنم اگر پنجره بصورت Maximized باز بشه برای فول اسکرین کردن همراه FsStayOnTop کافی باشه و مقدار دهی طول و عرض به طول و عرض اسکرین موردی نداشته باشه.
Dracula
دوشنبه 19 خرداد 1382, 11:28 صبح
دوستان عزیز متشکرم .
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.