AlphaControls 控件 TsCheckListBox 代替 TRzCheckGroup

AlphaControls 控件 TsCheckListBox 代替 TRzCheckGroup

     日常使用TRzCheckGroup,运用AlphaControls 控件后,需要使用TsCheckListBox 代替 TRzCheckGroup。

    二者外形和功能,基本一致。代码有所区别。

    TRzCheckGroup  

T:=False;
  for i:=0 to RzCheckGroup1.Items.Count-1 do
    if RzCheckGroup1.ItemChecked[i] then T:=True;
  if T then
  begin
    S2:='(';
    for i:=0 to RzCheckGroup1.Items.Count-1 do
    begin
      if RzCheckGroup1.ItemChecked[i] then
      begin
        S1:='(区域='+#39+RzCheckGroup1.Items.Strings[i]+#39+') or ';
        S2:=S2+S1;
      end;
    end;
    S2:=Copy(S2,1,Length(S2)-4)+')';
    S:=S+' and '+S2;
  end;
  

    TsCheckListBox

  T:=False;
  for i:=0 to sCheckListBox2.Items.Count-1 do
    if sCheckListBox2.Checked[i] then T:=True;
  if T then
  begin
    S2:='(';
    for i:=0 to sCheckListBox2.Items.Count-1 do
    begin
      if sCheckListBox2.Checked[i] then
      begin
        S1:='(护理等级='+#39+sCheckListBox2.Items.Strings[i]+#39+') or ';
        S2:=S2+S1;
      end;
    end;

AlphaControls是一款强大的Delphi和C++ Builder控件库,具有丰富的界面设计和功能。以下是AlphaControls的安装说明。 首先,我们需要下载AlphaControls。可以在官方网站上找到最新版本的AlphaControls,并下载安装程序。 下载完成后,运行安装程序。安装程序会引导我们完成安装过程。我们需要注意选择正确的Delphi或C++ Builder版本,并选择相应的安装路径。 安装程序会将AlphaControls的文件和组件复制到我们选择的安装路径下。一般情况下,AlphaControls会安装到Delphi或C++ Builder的组件目录中。 安装完成后,我们需要在Delphi或C++ Builder中进行一些设置才能正常使用AlphaControls。 首先,我们需要在IDE中添加AlphaControls的路径。打开Delphi或C++ Builder的环境选项,找到Library选项卡。在Library path中添加AlphaControls的路径。 接下来,我们需要在工具栏中添加AlphaControls控件控件栏按钮。在Delphi或C++ Builder的环境选项中的Palette选项卡中,点击"New..."按钮。选择AlphaControls控件库,添加控件栏按钮并保存设置。 完成以上设置后,我们就可以在Delphi或C++ Builder的设计界面中使用AlphaControls控件了。 我们可以在控件栏中找到AlphaControls控件,将其拖拽到窗体上。然后,通过属性面板进行进一步的设计和配置。 总结起来,AlphaControls的安装过程包括下载安装程序、运行安装程序并选择安装路径、进行环境设置以及在设计界面使用AlphaControls控件。遵循以上步骤,我们就可以成功安装和使用AlphaControls
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值