type tcustomsplitter = class(tgraphiccontrol)
{**
    @explan(说明)调整分割控件
**}
    function create(AOwner);
    begin
        inherited;
        Caption := "";
        color := 	0xEED2BC;        
        Width := 6;
        Height := 100;
    end 
    function SetAlign(a);override;
    begin
        inherited;
    end 
end