- - - - - - - - - - - - - - ผู้ให้การสนับสนุน- - - - - - - - - - - - - -

สามารถทำได้ 2 แบบ คือ
1. ใช้คำสั่ง ShowWindow โดยใส่ Parameter ตามตัวอย่างด้านล่าง

ShowWindow(Application->Handle, SW_HIDE); //--- C++ Builder
ShowWindow(Application.Handle, SW_HIDE); //--- Delphi

ข้อด้อยของการใช้คำสั่งนี้คือโปรแกรมสามารถถูกสั่งให้แสดง Icon บน Task ได้อีก ถ้ามีการเรียกใช้คำสั่ง ShowWindow ทั้งจากตัวโปรแกรมเองหรือจากโปรแกรมตัวอื่นโดยใช้คำสั่งข้างล่าง

ShowWindow(Application->Handle, SW_SHOW); //--- C++ Builder
ShowWindow(Application.Handle, SW_SHOW); //--- Delphi

2. วิธีลดข้อบกพร่องของโปรแกรมในตัวอย่างที่ 2 ครับ วิธีการก็คือบังคับหรือกำหนดให้โปรแกรม (Main Window) มีลักษณะ Form Style เป็นแบบ Tool Window ดูตัวอย่างประกอบนะครับ

ตัวอย่างบน Delphi

• ไปที่เมนู View ' Project Manager หรือ กดปุ่ม Ctrl + Alt + F11
• ไปที่หน้าต่าง Project Manager แล้วคลิกเมาส์ขวาที่ Project
  

จากนั้นเลือกไปที่ View Source จะแสดงหน้าต่างแก้ไข Project ไฟล์ข้างล่างให้เพิ่มเติมคำสั่งดังนี้

program Project1;
uses
Forms,Windows,
Unit1 in 'Unit1.pas' {Form1};

{$R *.res}
var dwExStyle:longWORD;
begin
dwExStyle := GetWindowLong(Application.Handle, GWL_EXSTYLE);
dwExStyle := dwExStyle or WS_EX_TOOLWINDOW;
SetWindowLong(Application.Handle, GWL_EXSTYLE, dwExStyle);

Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

ทดลอง Run โปรแกรมโดยกดปุ่ม F9 นะครับ จากคำสั่งตัวอย่างเป็นการกำหนดให้ Main Window เป็นแบบ Tool Window โดยถาวร ไม่สามารถบังคับโดยใช้คำสั่ง ShowWindow เพื่อให้โปรแกรมแสดง Icon บน Taskbar ได้อีก

ตัวอย่างบน Borland C++ Builder

• หลักการแก้ไขคำสั่งจะคล้ายกับ Delphi ครับคือไปที่หน้าต่าง Project Manager แล้วดับเบิ้ลคลิกที่ Project1.cpp ในที่นี้โปรเจคผมมีชื่อ Project1 ครับ สมมติว่าโปรเจคคุณชื่อ TestApp คุณก็ไปดับเบิ้ลคลิกที่ TestApp.cpp
  

• จากนั้นก็แก้ไขคำสั่งตามรูปด้านล่าง

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
DWORD dwExStyle = GetWindowLong(Application->Handle, GWL_EXSTYLE);
dwExStyle |= WS_EX_TOOLWINDOW;
SetWindowLong(Application->Handle, GWL_EXSTYLE, dwExStyle);

try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}

ทดลอง Run โปรแกรมโดยกดปุ่ม F9 นะครับ จากคำสั่งตัวอย่างเป็นการกำหนดให้ Main Window เป็นแบบ Tool Window โดยถาวร ไม่สามารถบังคับโดยใช้คำสั่ง ShowWindow เพื่อให้โปรแกรมแสดง Icon บน Taskbar ได้อีก

- - - - - - - - - - - - - - ผู้ให้การสนับสนุน- - - - - - - - - - - - - -