<< Delphi 10.4.1 vydáno | MiTeC Project Maker >>

Custom VCL Title Bar v Delphi 10.4

vložil Radek Červinka 27. září 2020 15:58

Od Delphi 10.4 je součástí VCL možnost jednoduše implementovat svůj titulek okna s vlastními prvky tak jak to má Chrome, Delphi IDE nebo jiné aplikace.

TitleBar_VCL

Základem je rozšíření TForm o TForm.CustomTitleBar a přidání komponenty TTitleBarPanel. Pokud použijete jen první variantu, máte možnost měnit barvy,výšku, zarovnání, ikony a to je tak vše. Teprve přidáním TTitleBarPanel na formulář a nastavením Form.CustomTitleBar.Control na tento panel můžete dosáhnout podobného efektu jako na obrázku nahoře z dema "Public\Documents\Embarcadero\Studio\21.0\Samples\Object Pascal\VCL\Titlebar".

Tímto způsobem se dá přidat např. editbox pro vyhledávání, nebo celé menu.

TitleBar_VCL

(pozn. to žluté je jen znázornění TabOrder z CnPack)

Zároveň přidáním panelu máte možnost obsluhovat OnPaint.

V docwiki nebo helpu je celkem dobře popsané Custom Title Bar for VCL Forms

Podpora pro aplikace je od Windows 7.

4c90af47-c623-4797-ba64-4421c972887a|10|4.8

Tagy: VCL

Související příspěvky

Verze Delphi (TP1 → 10.4.2)Delphi XE6, postřehy z praxe pohledem JaroB Proč je Embarcadero Delphi a ne Borland?Delphi odkazy Embarcadero - Certifikační program pro Delphi Delphi XE - první dojmy

Komentáře

20.10.2020 9:52:25 #

Bohužiaľ, ako mnoho nových vecí od EMBT, aj TTitleBarPanel sa zaradil do zoznamu "nedopečených" komponentov, ktorý spôsobuje mnoho problémov pri jeho použití a jeho dizajn je na prd, keďže časť funkčnosti sa prenáša na TForm.
https://en.delphipraxis.net/topic/3531-ttitlebarpanel-and-vcl-styles/

Peter

20.10.2020 11:07:33 #

Vincent je notoricky stezovatel. TTitleBarPanel si muzes dat prece kamkoliv, nemusis ho mit na formu, muzes ho vytvaret dynamicky. Ohledne kombinace MainMenu nevim, uz davno ho nepouzivam v tech aplikacich, kde chci mit moderni vzhled, nahrajil jsem to za neco ve smyslu Ribbon.

Jak jinak by jsi to navrhl, kdyz se ti to nelibi?

radekc

Komentování ukončeno