Minimizing a form

Hi Expert
With D5 I have lost the possibility to minimize the form without showing the animated window going down on the taskbar.
How Can I minimize my form without showing that animation ?
Can you understand me ?
Thank you.
borgoAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

intheCommented:
heh note also that calling Application.Minimize from a modal form does not work anymore in d5 ..
0
kifahCommented:
Hi

ShowWindow(Form1.Handle, SW_HIDE);

Best Regards
0
craig_capelCommented:
also, in delphi 4, application.restore; does not work, i had to do a showwindow(form1.handle,sw_restore) have inprise neglected this basic workings of a form?
0
Cloud Class® Course: Python 3 Fundamentals

This course will teach participants about installing and configuring Python, syntax, importing, statements, types, strings, booleans, files, lists, tuples, comprehensions, functions, and classes.

borgoAuthor Commented:
Sorry but don't work
0
borgoAuthor Commented:
Madshi wrote:

Add this to your form:

  private
    procedure SysCommand(var Message: TWMSYSCOMMAND); message WM_SYSCOMMAND;

procedure TForm1.SysCommand(var Message: TWMSYSCOMMAND);
begin
  if Message.CmdType and $FFF0 = SC_MINIMIZE then begin
    Message.result:=0;
    Hide;
  end else inherited;
end;

And this work fine !!!
Thank you again Madshi.

Andrea.
0
MadshiCommented:
Hmmm... Where did I post that? Can't remember...   :-)

Well, but that isn't the answer to your problem, is it?
0
borgoAuthor Commented:
Hi Madshi

Yes I use it to hide my form without showing the minimizing animation.
Any other good solutions are welcome :-)
0
MadshiCommented:
Hmm... In the moment I have no other idea...
0
borgoAuthor Commented:
Ok, please Madshi reply for the points, the answer is one of yours.
Bye.

0
MadshiCommented:
Okay, thank you...   :-)

Regards, Madshi.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
esariCommented:

procedure TMainForm.FormCreate(Sender: TObject);
begin
Application.OnMinimize := FormDblClick;
ShowWindow(Application.Handle,SW_Hide);
end;


procedure TMainForm.FormDblClick(Sender: TObject);
begin
Icons.Show; // taskbar icon..
ShowWindow(Handle, SW_HIDE);
ShowWindow(GetWindow (Handle, GW_OWNER),SW_HIDE);
ShowWindow(Application.Handle,SW_Hide);
end;
0
borgoAuthor Commented:
Many thanks to all of you who have helped me

Have a nice day.

Andrea.
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Delphi

From novice to tech pro — start learning today.