AlphaControls 主窗口TsPageContr 子窗口sFramer 实现主从窗口调用高分辨率子窗口
AlphaControls TsFrameBar 控件 实现C/S窗口内嵌高分辨率窗口 介绍如何实现高分辨率窗口。下面介绍另一种AlphaControls 主窗口TsPageContr 子窗口sFramer 实现调用高分辨率窗口的实现,
一、将TsForm,改TsFrame
注意,全屏尺寸:1550,860。
建立TsFrame的办法:参见 AlphaControls 控件 TFrame的灵活运用
Delphi TForm 转 TFrame
二、主窗口使用TsPageContr,菜单使用TsFrameBar
1、TsFrameBar建立菜单
2、子菜单
参见:
AlphaControls 控件 TsFrameBar 创建下拉式多级导航菜单
三、主窗口调用子窗口
procedure TBarPanel_2.sSpeedButton08Click(Sender: TObject);
begin
ShowIn:=True;
MainFrm.CreateTabSheet_Frame_Bar(TDJPG_Frame,1550,860,'照护等级评估','1008');
end;
参数1550,860指定窗口的宽度和高度,指定小窗口下,滑块拉动的范围。
四、效果
主窗口调用多个子窗口: