TForm i TApplication |
2.08.1999 |
- Tworzenie formy bez paska tytułowego.
Pasek tytułowy formy możesz usunąć poprzez ustawienie BorderStyle na bsDialog i "subclassing" funkcji CreateParams. Wewnątrz tejże funkcji wyczyścisz bity WS_CAPTION w Params.Style.
Krok 1: Dodaj deklarację CreateParams do klasy formy:
private:
void __fastcall CreateParams(TCreateParams &Params);
Krok 2: Wpisz kod funkcji:
void __fastcall TForm1::CreateParams(TCreateParams &Params)
{
TForm::CreateParams(Params); //wywołuje klasę bazową
Params.Style &= ~WS_CAPTION; //teraz czyści bity WS_CAPTION
}
Uwaga: WS_CAPTION jest zdefiniowany w \INCLUDE\WINRESRC.H jako:
#define WS_CAPTION 0x00C00000L /* WS_BORDER | WS_DLGFRAME */
Uwaga: Jeżeli potrzebujesz formy z możliwością zmiany rozmiarów i bez paska tytułowego, zmień CreateParams w ten sposób:
void __fastcall TForm1::CreateParams(TCreateParams &Params)
{
TForm::CreateParams(Params); //wywołuje klasę bazową
Params.Style &= ~WS_DLGFRAME;
Params.Style |= WS_POPUP;
}
Tutaj BorderStyle ustaw na bsSizeToolWin.
|