[Back to DELPHI SWAG index] [Back to Main SWAG index] [Original]

    From: "James D. Rofkar" <jim_rofkar%lotusnotes1@instinet.com>

    Robert Copier wrote:
    > Is there a way to hide the Windows 95 statusbar when i start my
    application made in delphi 2.01. When the user close the application
    the statusbar must become visible again.

    I'm guessing you're referring to the Windows 95 taskbar and system
    tray window, and not a statusbar. The answer: Sure you can! And
    what a cool idea! Here's how:

    First declare a variable of type HWND to store the Window handle of
    the Windows 95 taskbar.
    --------------------------------------------------------------------------------

          TForm1 = class(TForm)
             ...
          private
             hTaskBar: HWND;
             ...
          end;

    --------------------------------------------------------------------------------

    In  your  main  form's  OnCreate()  event  handler,  place  some  code that
    resembles:
    --------------------------------------------------------------------------------

          hTaskBar := FindWindow('Shell_TrayWnd', nil);
          ShowWindow(hTaskBar, SW_HIDE);

    --------------------------------------------------------------------------------

    Finally,  in your  main form's  OnDestroy() event  handler, code  something
    like:

    --------------------------------------------------------------------------------

          ShowWindow(hTaskBar, SW_SHOW);

    --------------------------------------------------------------------------------

[Back to DELPHI SWAG index] [Back to Main SWAG index] [Original]