Ukrywanie (Hide) i przywracanie okna.

[Cyfrowy Baron]

Zastanawiam się nad takim patentem. Ukrywam okno programu funkcją Hide(), okno znika, ale widoczny jest przycisk programu na pasku zadań, klikam na pasek zadań (przycisk programu) i okno się pokazuje. Coś w stylu minimalizacji i przywracania programu, ale z ukrywaniem okna zamiast minimalizacji.

Zastanawiam się czy można to zrealizować inaczej niż poprzez przechwytywanie komunikatu, gdyż wymagałoby to zamontowanie haka systemowego.

[mckri]

Problem był już poruszany na tym forum
http://www.programowanie.cal.pl/forum/viewtopic.php?f=2&t=810&p=5029&hilit=ShowMainForm#p5029

Wystarczy zastosować, np. w zdarzeniu CreateForm

Kod: Zaznacz cały

Application->ShowMainForm=false;

[Cyfrowy Baron]

Nie o to chodzi. Przeczytaj uważnie! Nie chcę usuwać przycisku programu z paska zadań, chcę by tam pozostał. Chcę ukryć okno programu funkcją Hide() zamiast minimalizować, a potem chcę je przywrócić klikając na przycisk (belkę) programu na pasku zadań. Czyli chcę stworzyć taki mechanizm jaki ma miejsce z minimalizacja i przywracaniem okna programu, ale zamiast minimalizacji chcę użyć Hide(). Taki mechanizm da się stworzyć gdy ukryjemy okno a przycisk z paska zadań zamienimy na ikonkę w zasobniku systemowym. Klikając na tą ikonkę można ponownie przywrócić okno.

[mckri]

Właściwie to nie wiem dlaczego się tak uparłes na to aby nie uzywać minimalizacji.
Problem wydaje sie trywialny. Chyba że nadal nie rozumiem o co chodzi.
W tym przykładzie zastosowałem komponent ApplicationEvent.

Kod: Zaznacz cały

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   Hide();  //ukrywam okno programu
   //Application->Minimize();  //z tym dziaÅ‚a lepiej
   ShowWindow(Application->Handle, SW_SHOW); //tutaj pokazuje belke programu w pasku start windows.
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ApplicationEvents1Restore(TObject *Sender)
{
  Show();  //pokazuje okno programu
}
//---------------------------------------------------------------------------


Zakładam, że przy korzystaniu z wersji Builder > 6 masz ustawione w głównym unicie programu (np Project1.cpp)

Kod: Zaznacz cały

Application->MainFormOnTaskBar = false;

[Cyfrowy Baron]

Teraz zrozumiałeś. Twoja metoda ma jedną wadę. Po ukryciu okno nie jest zminimalizowane, więc po kliknięciu na przycisk paska zadań pokazuje się co prawda, ale jest również minimalizowane. Można to tak naprawić:

Kod: Zaznacz cały

void __fastcall TForm1::Button2Click(TObject *Sender)
{
 Hide();
 ShowWindow(Application->Handle, SW_SHOW);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ApplicationEvents1Restore(TObject *Sender)
{
 Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ApplicationEvents1Minimize(TObject *Sender)
{
 Application->Restore();
 Show();
} 

Niestety powoduje to chwilowe migania okna, minimalizacja - przywracanie. By to zmienić, trzeba by wyłączyć w programie możliwość minimalizacji.

Rozważam to z ciekawości, do niczgo nie jest mi to aktualnie potrzebne.