Domů

Balík srandakódů (1)

Minule jsme si ukazovali, jak využít některých komponent Delphi třeba k ovládání kamarádova počítače. Dnešní díl se bude věnovat některým tipům, jak server vaší síťové aplikace vylepšit. :)


 Asi nejdůležitější příkaz, který k podobným hračičkám využijemem nejvíce se jmenuje FindWindow. Podle zadaných parametrů vrací handle okna nebo některých ovládacích prvků oken jiných aplikací. Handle se pak dá využít k manipulaci s oním ovládacím prvkem, jako je například skrytí.

  FindWindow(ipClassName, ipWindowName);

kde ipWindowName znamená text na titulku okna apod. a ipClassName znamená nejspíše typovou třídu prvku, ale to jsem nikdy nepoužil a vlastně ani netuším, k čemu to je. :)

 Když jsem mluvil o skrývání, další šikovný příkaz k tomu určený je ShowWindow.

  ShowWindow(hWnd, nCmdShow);

kde hWnd je handle okna nebo prvku, který jsme získali právě s pomocí FindWindow a nCmdShow je to, co chceme s tímto oknem provést.
 nCmdShow může nabývat těchto hodnot:

• SW_HIDE
  Skryje okno nebo ovládací prvek.
• SW_MAXIMIZE
  Maximalizuje okno.
• SW_MINIMIZE
  Minimalizuje okno.
• SW_RESTORE
  Obnoví původní zobrazení prvku nebo okna.
• SW_SHOW
  Zobrazí okno nebo ovládací prvek.
• SW_SHOWDEFAULT
  Zobrazí okno ve standartní velikosti a pozici.
• SW_SHOWMINIMIZED
  Zobrazí okno minimalizované.
• SW_SHOWMAXIMIZED
  Zobrazí okno maximalizované.
• SW_SHOWMINNOACTIVE
  Zobrazí okno v minimalizované podobě, ale neaktivuje ho.
• SW_SHOWNA
  To nevím přesně k čemu je, ale řekl bych, že je to stejné, jako SW_SHOW, ale zobrazené okno se nestane aktivním.
• SW_SHOWNOACTIVATE
  Zobrazí okno ve své naposledy použité poloze a neaktivuje ho.
• SW_SHOWNORMAL
  Stejné jako SW_RESTORE.

Tak jak lze tedy například skrýt okno poznámkového bloku?

  ShowWindow(FindWindow(nil, 'Bez názvu - Poznámkový blok'), SW_HIDE);

Snadné, že?


Příští díl se podíváme, jak se dají skrýt nekteré ovládací prvky Windows jako třeba tlačítko Start. :)