17 wszysystem

尚未进行身份认证

我要认证

暂无相关简介

等级
TA的排名 30w+

解决UniDBTreeGrid在数据更新后自动折叠的问题

UniDBTreeGrid控件在数据更新之后,总是会自动折叠,我想要让它既更新了数据,又不自动折叠。解决的办法如下:UniDBTreeGrid -> ClientEvents ->1. UniEvents ->function beforeInit:function beforeInit(sender, config){ sender.expandedNodes=[];}2. ExtEvents ->functionstore.beforelo...

2020-10-25 00:03:46

解决低版本fastReport在高版本中出现乱码的问题

之前一直很苦恼低版本的fastReport报表文件在高版本中读出时出现乱码的问题。解决办法:1、首先用EditPlus 5软件打开报表文件,如果出现对话框说要用别的文件编码(字符集)打开,选择UTF-8打开。2、由于fastreport报表文件用的是XML格式保存,因此,打开后,在首句中加入:standalone="no"如图:3、重新在fastReport中打开报表,再保存就可以了。如果还不行,请查询文本框控件的字体字符集是不是默认的...

2020-08-25 10:49:03

解决UnimTabPanel选项卡控件设置某一页失效的问题

在程序中通过代码UnimTabPanel1.ActivePageIndex:=0;或者UnimTabPanel1.ActivePage:=UnimTabSheet1;切换UnimTabPanel选项卡控件页面失效。或者说只能第一次生效,第二次就不行了。解决办法:1、首先在UnimTabPanel1的Change事件中加入一行注释,什么内容都不重要;2、在需要改变选项卡的事件中写下如下代码:case UTP.ActivePageIndex of 0:UTP.ActivePage..

2020-08-25 10:25:35

advstringgrid自动合并列单元格方法:MergeColumnCells(ColIndex: Integer; MainMergeColumn: Boolean)的使用

advStringGridm网格控件提供了一个自动合并列方向上单元格的方法:MergeColumnCells(ColIndex: Integer; MainMergeColumn: Boolean)。这个方法有两个参数,第一个表示在在哪一列上进行合并操作,合并是有条件的,那就是单元格上的内容必须相同;第二个参数表示,这个合并列是否参考主合并列。当设置为true,则表示这是一个主合并列,无需参考...

2019-05-08 13:19:03

cxGrid动态创建列+为某列内嵌下拉框

一、动态创建列方法1:var i: Integer; Column: TcxGridDBColumn; cxView: TcxGridDBTableView; begin cxView := Self.Levels[0].GridView as TcxGridDBTableView; if cxView.DataController.DataSource &lt...

2018-03-02 22:49:53

kbmMW—实现主从关系表的方法

环境:delphi XE10.2.2+kbmMW5.02+uniDac7.02+FB3.0在日常应用中,我们经常会用到主/从(Master/Detail)关系表,如客户与订单、角色与权限等。在kbmMW中实现Mater/Detail关系表的方法有两种,各有优缺点。下面是我实现这两个方法的过程。首先,我对kbmMW是不了解的,并受到之前开发的影响,一直认为在客户端一个数据集控件(TkbmMW...

2018-03-02 15:05:55

kbmMW--客户端更新数据到服务器

环境:delphi XE10.2.2+kbmMW5.02+uniDac7.02+FB3.0  当客户端对数据进行了增加、更新、删除的操作,我们必须把这些操作返回到服务器端,并对后台数据库进行更新。kbmMW 可以很方便的实现这一功能,今天就做一个更新数据到服务器的例子。   还是在昨天的基础上,我们要把客户端的信息更新到服务器上,首先需要在服务器端的Tkbmqueryservice设置允许客户端更...

2018-03-02 10:58:23

KbmMW-多层数据库访问服务

环境:DelphiXE10.2.2+kbmMW5.02+unidac7.02+FireBird3.0打开我们以前的例子,在from里添加以下几个控件UniConn(TUniConnection):控件里面设置我们要访问的数据库配置;kbmIBMD(TkbmMWInterbaseMetaData):主要是用来控制生成访问数据库SQL的具体语法的,例如不同的数据库对字段、参数、表名的表达不完全一样,这...

2018-03-02 10:55:34

kbmMW--返回流到客户端

kbmMW--返回流到客户端环境:delphi XE10.2.2+kbmMW5.02在第一个简单的例子,服务器返回给客户端的是一个简单的变量,但是在日常的应用中,往往需要给客户端传输大量的数据,例如要返回流,在kbmMW 里面返回流也是比较方便的,下面我们就以给客户端返回一个照片为例,说明一下。还是在上次的例子服务里面,我们添加一下这个功能,首先要定义服务函数处理: function Perfor...

2018-03-02 10:47:54

kbmMW—制作一个简单服务

kbmMW—制作一个简单服务今天仿着delphi窑洞洞主的例子做一个kbmMW 简单服务,功能是客户端调用服务器端的过程,完成一个累加的功能,并且与洞主的内容作比较,看升级后kbmMW的异同。以下部分是洞主的内容。环境:DelphiXE10.2.2+kbm5.02首先我们建立一个空白的vclform 应用程序,并放置几个控件,如图所示:其中有三个控件,一个kbmMWSever1,一个kbmMWTC...

2018-03-02 10:41:12

uniDac 更新多表记录

对于从多个表中获得数据的数据集,默认情况下只有一个表可更新。您应该在UpdatingTable属性中指定要更新的表名,否则将会更新字段列表中的第一个字段的表。如果SetFieldsReadOnly选项设置为True(默认情况下),则自动生成的update SQL语句中未使用的字段将被标记为只读。使用Oracle、PostgreSQL和基于odbcbased的复杂查询提供程序(使用多个表、同义词、D

2018-01-08 22:27:06

uniDac 刷新单条记录

uniDac只刷新单行记录的功能,我想是怕返回整个数据集比较低率吧。要实现在更新一个记录后只刷新该记录行,需要用到三步:1、设置控件的TRefreshOptions属性为 [roAfterInsert,roAfterUpdate],即为新增后刷新,修改后刷新。2、设置SQLRefresh属性,该属性是通过一个SQL查询语句定位到刚才那个记录上。3、用RefreshRecord方法刷新。

2018-01-08 20:33:15

uniDac 连接FireBird数据库(绿色版/嵌入版/单机版)

网上有几个文章说到连接FB数据库的,基本都是一个出处,不过我尝试之后发现都不行,仔细看过后才发现。原来有一个地方少了个字母(下面代码红色那行)。下面是我自己写的,在D7+FB3+uniDac7.01中通过。代码:with UniConn_Do do  begin    ProviderName := 'interbase';//这里确定为interbase 但是可以支持firebi

2018-01-07 23:36:56

uniDac 我对uniDac的事务处理

我在用uniDac时发现一个很奇怪的问题,我用一个TUniConnection控件连接一个事务控件。在一个程序中有两个uniQuery,一个负责查询并得到数据uniQ_Show,一个用于对数据的插入和更新uniQ_Do。可是,我在用uniQ_Do对数据进行更新,并用事务控件进行提交后,竟然使uniQ_Show控件关闭了。真是很奇怪,我也不知道是什么原因,也不知道怎么解决。后来,我就再引入了另一

2018-01-07 23:06:31

unidac 用TuniQuery控件做数据的插入和更新

首先,uniQuery控件连接一个uniConnection控件,事务属性为默认。用一个表格wwGrid连接uniQuery。一、插入操作代码:tryif not A01F.uniConn_Do.InTransaction then    A01F.uniConn_Do.StartTransaction;with uniQ_D11 dobeginAppend;

2018-01-07 22:20:44
勋章 我的勋章
  • 持之以恒
    持之以恒
    授予每个自然月内发布4篇或4篇以上原创或翻译IT博文的用户。不积跬步无以至千里,不积小流无以成江海,程序人生的精彩需要坚持不懈地积累!
  • 勤写标兵Lv1
    勤写标兵Lv1
    授予每个自然周发布1篇到3篇原创IT博文的用户。本勋章将于次周周三上午根据用户上周的博文发布情况由系统自动颁发。