مشکل در مورد از بین بردن Task Bar

[abedi vida]

سلام من این موضوع را قبلا سرچ کردم و این ستورات را اجرا کردم اما به مسکل رفتن به فرم دیگه رو ÷یدا کردم یعنی اگر روی button که توی ارون دستور form2.show رو نوشتم کلیک کنم هیچ اتفاقی نمی افته
دستور:پنجره Full Screen
دوستان عزیز لطفا راهنمایی کنید که چطور میشه پنجره ای رو طوری Full Screen کرد که منوی Taskbar ویندوز هم نمایش داده نشه

یعنی فول اسکرینه فول اسکرین
در فرم اصلی می توانید پنجره را بصورت Maximizedبازکنید و alwaysOnTop

procedure TForm1.FormCreate(Sender: TObject); 

begin 

Form1.Top:=0; 

Form1.Left:=0; 

Form1.Width:=screen.Width; 

Form1.Height:=screen.Height; 

Form1.FormStyle:=fsStayOnTop; 

end; 

 



var MyHandle:Thandle 

Begin 

MyHandle := findwindow('shell_traywnd',nil); 

ShowWindow(MyHandle,sw_hide); 

End;

کد فوق در قسمت آن شو نوشته شود.

 ShowWindow(MyHandle,sw_show); 

این کد هم در آن کلوز فرم نوشته شه.

[مهدی کرامتی]

1- به این دلیل فرم دوم شما نمایش داده نمیشود که فرم اول دارای خاصیت StayOnTop است.

2- این کد ها را ببینید:

procedure EnableTASKBAR(Enable : boolean);

var

  hTASKBARWindow : HWnd;

begin

  hTASKBARWindow:=FindWindow('Shell_TrayWnd'  ,nil);

  if hTASKBARWindow<>0 then

    EnableWindow(hTASKBARWindow,Enable);

end;



procedure ShowTASKBAR(Visible: boolean);

var

  hTASKBARWindow : HWnd;

begin

  hTASKBARWindow:=FindWindow('Shell_TrayWnd'  ,nil);

  if hTASKBARWindow<>0 then

    if Visible then

      ShowWindow(hTASKBARWindow, SW_SHOW)

    else

      ShowWindow(hTASKBARWindow, SW_HIDE)

end;

با پارامترهای این توابع (که False و True میتواند باشد) بازی کنید و لذت ببرید.

نمونه برنامه استفاده از این توابع ضمیمه شده است.

[abedi vida]

سلام.

من میخواهم با باز شدن فرم اینکار انجام بشه، در حالی که شما اینکارو تو چک باکس انجام دادید.

حالا چه کنم؟

دوست عزیز، لطفا فارسی بنویسید.
متن شما به فارسی ترجمه شد!

[مهدی کرامتی]

کاری نداره. تو OnShow فرمتون این دستور را بنویسید:

ShowTaskBar(False);

[abedi vida]

سلام.

:oops: من میخواهم با باز شدن فرم اینکار انجام بشه، در حالی که شما اینکارو تو چک باکس انجام دادید.

حالا چه کنم؟

دوست عزیز، لطفا فارسی بنویسید.
متن شما به فارسی ترجمه شد!

شرمنده اون روز فونت فارسی نداشتم

[abedi vida]

کاری نداره. تو OnShow فرمتون این دستور را بنویسید:

ShowTaskBar(False);

سلام من تو قسمت آن شو <span dir=ltr>ShowTaskBar(False);</span> رو نوشتم ولی ایراد گرفت.

[مهدی کرامتی]

مثال رو اصلاح کردم. امیدوارم مفهوم شود.

[abedi vida]

ممنون مشکلم حل شد :)