2013-04-14 19 views
6

Xategory'deki TCategoryPanel ve TCategoryPanelGroup sınırlarını nasıl kaldırabilirsiniz? tcategorypanel border öğesini kaldır

bu denendi ve işe yaramadı: TCategoryPanel için

type 
    TCategoryPanel = class (Vcl.ExtCtrls.TCategoryPanel) 
protected 
    procedure CreateParams (var Params: TCreateParams); override ; 
end ; 

procedure TCategoryPanel.CreateParams (var Params: TCreateParams); 
begin 
    Inherited ; 
    Params.Style:= Params.Style and not WS_BORDER; 
end ; 
+0

buldum. Panelin görünüşe göre bvNone'a ayarlı ve çalıştığı bir eğik olmayan BevelOuter var. Grup için bir sınır ayarı aradı, ancak bir tane yok. – uPrompt

cevap

7

Eğer bvNone korunan mülkiyet BevelOuter ayarlamanız gerekir.

TCategoryPanelGroup için CreateParams numaralı bağlantıdaki kenarlığı gerçekten kaldırabilirsiniz. böylece gibi:

Params.Style := Params.Style and (not WS_BORDER); 

Bu şuna benzer: Masası'ndan birini kaldırmak değil PanelGroup nasıl

enter image description here

+1

Bir sebepten dolayı, bunun hala (WS_BORDER değil) ile çalışmak için bunu alamıyorum Ama bu sınırla yaşayabilirim. Panel 3d beni öldürüyordu. Teşekkürler. – uPrompt

+0

Gördüğüm kadarıyla –

+0

başardığımı kanıtlamak için bir ekran görüntüsü ekledim ... TStyleManager bunu geçersiz kılar mı? – uPrompt