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