（31）uniGUI for C++ builder下UniDBGrid记录多选与复制

最新推荐文章于 2022-08-21 18:16:59 发布
最新推荐文章于 2022-08-21 18:16:59 发布
阅读量1.9k 收藏 3
点赞数
分类专栏： C++ Builder(uniGUI 电脑开发) 文章标签： unigui bcb c++ builder unidbgrid 多选
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/dlboy2018/article/details/86767879
版权

                                                                                    (中行雷威2019.2.6)

（同一个世界，同一个梦想，交流学习C++Builder XE10，传承c++builder的魅力！欢迎各地朋友加入我的QQ群484979943,进群密码“BCB”，同时也请将该群号广为宣传，希望能够广集各方高手，共同进步。如需下载开发工具及源代码请加入我的QQ群。）

【阅读倡议】

1、有问题请留言;

2、没问题请点赞;

3、看连载请加群;

4、下源码请加群;

【开发工具】

1、C++Builder10.2.3 tokyo

2、FMSoft_uniGUI_Complete_Professional_1.70.0.1485（正版）

3、本案例资源下载https://download.csdn.net/download/dlboy2018/10949772

4、也可访问我的QQ文件共享：A02-源代码  下载

本人主笔的国内第一本uniGUI教学案例代码已诞生，分为cbuilder和delphi两个版本，买代码送手册，需要的朋友可以加入我的QQ技术交流群484979943、860634510、299497712给我（群主）留言。资料简介：https://blog.csdn.net/dlboy2018/article/details/88923832
 
一、设计目标

UniDBGrid表格控件可以在最前面出现“√”，用来选择记录，本表格还支持多选，本文将演示如何实现记录多选和在两个表格之间互相挪动表格记录。官方demo在C:\Program Files (x86)\FMSoft\Framework\uniGUI\Demos\Desktop\GridMultiSelect（delphi版），官方demo用ClientDataSet作为数据源，本例子用uniDAC控件组访问oracle作为数据源。主要界面如下图：

二、功能设计

1、创建项目

d:\gridMultiSelect，创建项目standalone  exe模式，包含include和lib到“C:\Program Files (x86)\FMSoft\Framework\uniGUI\win32”。本例子使用oracle做为数据源，通过uniDAC控件组实现数据库访问，还要包含C:\Program Files (x86)\Devart\UniDAC for RAD Studio 10.2\Include\Win32头文件和C:\Program Files (x86)\Devart\UniDAC for RAD Studio 10.2\Lib\Win32库文件。关闭项目，再次打开。

2、数据库链接

在MainModule窗口下放置数据库链接控件UniConnection和OracleUniProvider控件，将UniConnection控件的ProviderName设为Oracle，LoginPrompt设为false。

void __fastcall TUniMainModule::UniGUIMainModuleBrowserClose(TObject *Sender)
{

//浏览器关闭时断开连接
UniConnection1->Close();
}
//---------------------------------------------------------------------------

void __fastcall TUniMainModule::UniGUIMainModuleCreate(TObject *Sender)
{
//链接数据库
String dbIp="127.0.0.1",dbUser="webframe",dbPass="webframe2018",dbPort="1521",dbSid="ORCL";
UniConnection1->Disconnect();
UniConnection1->ProviderName="Oracle";
UniConnection1->SpecificOptions->Add("direct=true");
//UniConnection1->SpecificOptions->Add("Charset=ZHS16GBK");
UniConnection1->Username=dbUser;
UniConnection1->Password=dbPass;
UniConnection1->Server=dbIp+":"+dbPort+":"+dbSid;
//ShowMessageN(UniConnection1->Server);
try
    {
    UniConnection1->Connect();
    }
catch(...)
    {
    Uniguidialogs::ShowMessage("连接数据库["+dbIp+"]失败！");
    //FormMain->Close();
    }

}
//---------------------------------------------------------------------------
数据源为atable1和atable2两个结构一样的表格。

DROP TABLE WEBFRAME.ATABLE1 CASCADE CONSTRAINTS;

CREATE TABLE WEBFRAME.ATABLE1
(
  USER_NAME  NVARCHAR2(10),
  USER_AGE   NVARCHAR2(10),
  USER_SEX   NVARCHAR2(10)
)
TABLESPACE USERS
RESULT_CACHE (MODE DEFAULT)
PCTUSED    0
PCTFREE    10
INITRANS   1
MAXTRANS   255
STORAGE    (
            INITIAL          64K
            NEXT             1M
            MINEXTENTS       1
            MAXEXTENTS       UNLIMITED
            PCTINCREASE      0
            BUFFER_POOL      DEFAULT
            FLASH_CACHE      DEFAULT
            CELL_FLASH_CACHE DEFAULT
           )
LOGGING 
NOCOMPRESS 
NOCACHE
NOPARALLEL
MONITORING;
 

 

DROP TABLE WEBFRAME.ATABLE2 CASCADE CONSTRAINTS;

CREATE TABLE WEBFRAME.ATABLE2
(
  USER_NAME  NVARCHAR2(10),
  USER_AGE   NVARCHAR2(10),
  USER_SEX   NVARCHAR2(10)
)
TABLESPACE USERS
RESULT_CACHE (MODE DEFAULT)
PCTUSED    0
PCTFREE    10
INITRANS   1
MAXTRANS   255
STORAGE    (
            INITIAL          64K
            NEXT             1M
            MINEXTENTS       1
            MAXEXTENTS       UNLIMITED
            PCTINCREASE      0
            BUFFER_POOL      DEFAULT
            FLASH_CACHE      DEFAULT
            CELL_FLASH_CACHE DEFAULT
           )
LOGGING 
NOCOMPRESS 
NOCACHE
NOPARALLEL
MONITORING;
 

 

3、主窗口

主窗口MainForm要包含UniMainModule窗口#include "MainModule.h"

在主窗口MainForm上放置两个UniDBGrid表格，两个UniDataSource，两个UniQuery，三个UniBitBtn控件。

1）UniDBGrid1属性设置：

DataSource=UniDataSource1

Options-》dgRowSelect=true （选择行）

Options-》dgCheckSelect=true（勾选）

Options-》dgMultiSelect=true（多选）

ReadOnly=true（只读）

WebOptions-》PageSize=25（页记录数）

2）UniDataSource1的属性设置：

DataSet=UniQuery1

3）UniQuery1的属性设置：

Connection=UniMainModule.UniConnection1

4）UniDBGrid2属性设置：

DataSource=UniDataSource2

Options-》dgRowSelect=true （选择行）

Options-》dgCheckSelect=true（勾选）

Options-》dgMultiSelect=true（多选）

ReadOnly=true（只读）

WebOptions-》PageSize=25（页记录数）

5）UniDataSource2的属性设置：

DataSet=UniQuery2

6）UniQuery2的属性设置：

Connection=UniMainModule.UniConnection1

 

4、主要代码

//---------------------------------------------------------------------------
#include <vcl.h>
#include <uniGUIVars.hpp>
#pragma hdrstop

#include "Main.h"
#include "MainModule.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "uniBasicGrid"
#pragma link "uniBitBtn"
#pragma link "uniButton"
#pragma link "uniDBGrid"
#pragma link "uniGUIBaseClasses"
#pragma link "uniGUIClasses"
#pragma link "DBAccess"
#pragma link "MemDS"
#pragma link "Uni"
#pragma resource "*.dfm"
//---------------------------------------------------------------------------
TMainForm *MainForm(void)
{
   return( (TMainForm *)UniMainModule()->GetFormInstance(__classid(TMainForm)));
}
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
        : TUniForm(Owner)
{
}
//---------------------------------------------------------------------------
void T71AFFD34A4414BB2B5EA38264ABFC349__RegisterFormClass() {
  Uniguivars::RegisterAppFormClass(__classid(TMainForm));
  Uniguiregclasses::CPPInit();
}

#pragma startup T71AFFD34A4414BB2B5EA38264ABFC349__RegisterFormClass
void __fastcall TMainForm::UniFormBeforeShow(TObject *Sender)
{
//查询表一
UniQuery1->Close();
UniQuery1->SQL->Clear();
UniQuery1->SQL->Add("select * from atable1");
UniQuery1->Open();
//查询表二
UniQuery2->Close();
UniQuery2->SQL->Clear();
UniQuery2->SQL->Add("select * from atable2");
UniQuery2->Open();

}
//---------------------------------------------------------------------------

void __fastcall TMainForm::UniBitBtn1Click(TObject *Sender)
{
//从左侧向右侧挪
for(int i=0;i<UniDBGrid1->SelectedRows->Count;i++)
    {
    UniQuery1->Bookmark =    UniDBGrid1->SelectedRows->Items[i];
    UniQuery2->Append();
    UniQuery2->CopyFields(UniQuery1);
    UniQuery2->Post();
    }
UniDBGrid1->SelectedRows->Delete();

UniQuery1->Refresh();
UniQuery2->Refresh();
}
//---------------------------------------------------------------------------

void __fastcall TMainForm::UniBitBtn2Click(TObject *Sender)
{
//从右侧向左侧挪
for(int i=0;i<UniDBGrid2->SelectedRows->Count;i++)
    {
    UniQuery2->Bookmark =    UniDBGrid2->SelectedRows->Items[i];
    UniQuery1->Append();
    UniQuery1->CopyFields(UniQuery2);
    UniQuery1->Post();
    }
UniDBGrid2->SelectedRows->Delete();

UniQuery1->Refresh();
UniQuery2->Refresh();
}
//---------------------------------------------------------------------------

void __fastcall TMainForm::UniBitBtn3Click(TObject *Sender)
{

//取表格的某个字段
String tmpStr="";
//方法一
//for(int i=1;i<UniQuery2->RecordCount+1;i++)
//    {
//    UniQuery2->RecNo=i;
//
//    tmpStr+=UniQuery2->FieldByName("user_name")->AsString;
//    }
//ShowMessage(tmpStr);

//方法二
for(int i=1;i<UniDBGrid2->DataSource->DataSet->RecordCount+1;i++)
    {
    UniDBGrid2->DataSource->DataSet->RecNo=i;
    tmpStr+=UniDBGrid2->DataSource->DataSet->FieldByName("user_name")->AsString;
    }
ShowMessage(tmpStr);
}
//---------------------------------------------------------------------------
 

 

 

 

 

【路在脚下】
关注
  • 0
    点赞
  • 踩
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
uniDBGrid实行多选表格行
大龙软件工作室
01-05 496
uniDBGrid本身是支持checkBox多选的，但必须是Boolean的字段才行，只要是Boolean类型的字段，显示在uniDBgrid中就是带CheckBox的界面。 网上大多数人推荐的方法是在构建查询串的时候，在查询串中添加一个虚拟的Boolean字段来实现多选记录。但一个系统必然有很多的查询串，都要去加个虚拟字段，维护上太麻烦。可以利用TclientDataSet的计算字段来实现多选，而且不需要修改查询串。首先在设计界面添加以下组件 设置Query1的SQLConntcion属性为SQLCon
uniGUI之主窗口折叠UI之UniTreeMenu(32-2)
最新发布
GuoGuoABC
04-01 748
目前发现菜单太多时右侧不能自动出现垂直滚动条，即太多的子菜单将超出屏幕范围，鼠标滚轮不能翻动菜单项，不太方便。在UniTreeMenu的clientEvents属性里的UniEvents里，左侧顶部选择Ext.list.Tree,然后在treeMenu.afterCreate里面添加代码如下，即可解决，效果还不错。[info]和[search],[home],[download],[trash],[refresh],[reply],[star],[user]有用，不是所有的都会显示出来。
unigui -unidbgrid 操作勾选.rar
07-28
unigui -unidbgrid 操作勾选.rar
unidbgrid列点击事件与check多选框冲突
11-08 738
procedure TMainForm.UniDBTreeGrid2AjaxEvent(Sender: TComponent;   EventName: string; Params: TUniStrings); begin   UniServerModule.logger.AddLog('事件：'+UpperCase(EventName));   UniServerModule.logger.A...
uniGUI for C++ builder下UniTreeMenu的创建与使用
01-06
一个详细演示在unigui+cBuilder下如何动态创建二级菜单和如何使用的演示代码
（21）uniGUI for C++ builder下如何使用IdFTP发送文件
09-08
详细介绍如何在uniGUI for C++ builder下使用IdFTP发送文件，带有详细源代码和文档。
uniGUI for C++ builder下UniCalendarPanel的功能与试用
11-28
详细介绍如何在uniGUI 1.50.0.1481for C++ builder10.2.3下使用UniCalendarPanel实现日程安排，带文档和源代码资源
uniGUI for C++ builder下如何实现AES加解密
06-08
本文(含源代码)将介绍在UniGUI程序下如何利用BCB混合编译delphi的AES加密算法实现C++下的AES加解密。对于加解密算法常用的有tomcrypt、crypto等，都支持很多主流加密算法，但是使用都有些复杂，而且是引用三方lib库...
unigui_unidbgrid可选中文字
03-21
unigui_unidbgrid可选中文字 unigui_unidbgrid可选中文字
delphi下实现dbgrid导出多选的行的数据保存为Excel
01-22
实现了DBGrid的三方控件带有多选框的导出， 防止出现科学计数法，实现导出Excel列的自适应。 可以关闭保存Excel时弹出的提示框（文件已经存在是否覆盖）
FMSoft_uniGUI_v0.99.50.1187_for_XE8_Full_Source
09-21
FMSoft_uniGUI_v0.99.50.1187_for_XE8_Full_Source
FMSoft_uniGUI_v0.99.50.1187_for_XE8_Full_Source_Downloadly.ir.rar
06-16
FMSoft_uniGUI_v0.99.50.1187_for_XE8_Full_Source_Downloadly.ir.rar
unigui unidbgrid 勾选默认全不选
05-31 1688
https://blog.csdn.net/rachel8023/article/details/44494155 https://blog.csdn.net/qq_29663071/article/details/50728429 1. var model = grid.getSelectionModel(); 2. model.selectAll();//选择所有行 3. model.s...
TMyUniDBGrid.SelectedField
ConquerorDavid的专栏
07-16 647
function TMyUniDBGrid.SelectedField: TField; begin   if ((CurrCol >= 0)  and (CurrCol (Columns.Count-1)))  then     Result := Columns[CurrCol].Field   else     Result:= nil; end;
Ext.grid.EditorGridPanel viewConfig 设置表格 UniDBGrid
04-25 829
extjs命令 必须在UniFormCreate事件里写 //可以复制单元格文字 UniDBGrid1.JSInterface.JSConfigObject('viewConfig', 'enableTextSelection', [True]); //显示斑马线 DBGrid1.JSInterface.JSConfigObject('viewConfig', 'stripeRows'...
对于C++ Builder 使用DevPress 控件中的TCXGrid 添加复选框 在勾选时会闪退
03-03 1367
TCXGrid 添加Checkbox 功能 勾选时闪退问题
dev组件-cxGrid控件使用
weixin_45682858的博客
08-21 295
1、GroupBySorting：点击排序并分组显示2、DataRowSizing：允许用户调行高。
c++builder字符串加密与解密
11-21
c builder是一种用于字符串加密与解密的算法。它使用简单的位移和替换操作来对字符串进行加密，然后再使用相反的操作来进行解密。加密和解密的过程是对称的，所以同一个算法可以用来加密和解密数据。 c builder算法的加密过程包括将字符串中的每个字符按照一定的规则进行位移或替换操作，从而生成一个加密后的字符串。解密的过程则是将加密后的字符串按照相反的规则进行操作，从而还原出原始的字符串。 这种算法的优点是实现简单，速度快，并且不需要额外的密钥来进行加解密操作。但是由于加密操作是固定的，所以对于较为复杂的数据或者对安全性要求较高的情况下，可能会存在一定的安全隐患。 总的来说，c builder算法适合对一些不太敏感的数据进行简单加密和解密操作，但对于重要的信息还是需要选择更为安全可靠的加密算法来保护数据的安全。

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值