- 博客(22)
- 收藏
- 关注
RSS订阅转载 转_delphi 中几种多线程操作
主线程又程为UI线程。进程和线程的主要差别在于它们是不同的操作系统资源管理方式。进程有独立的地址空间，一个进程崩溃后，在保护模式下不会对其它进程产生影响，而线程只是一个进程中的不同执行路径。线程有自己的堆栈和局部变量，但线程之间没有单独的地址空间，一个线程死掉就等于整个进程死掉，所以多进程的程序要比多线程的程序健壮，但在进程切换时，耗费资源较大，效率要差一些。但对于一些要求同时进行并...
2015-11-17 11:10:00
145
转载 cxSpreadSheetBook控件使用
cxSpreadSheetBook控件使用：1、新建工程，拖入四个Button，cxSpreadSheetBook、dxComponentPrinter、dxPSEngineControlle控件，窗口如图：2、对四个Button录入代码：unit Unit1;interfaceuses Windows, Messages, SysUtils, Varia...
2015-10-30 16:47:00
624
转载 利用cxSpreadSheetBook电子表格控件完成复杂性的报表例子
如果报表复杂，可以利用cxSpreadSheetBook电子表格控件来生成报表。下面例子是装载数据同时设置电子表格格式：procedure TAO_RepShowData.LoadRepData;var CurCursor: TCursor;begin CurCursor := Screen.Cursor; //光标...
2015-07-26 10:48:00
245
转载 判断Vaule是不是数字
function IsNumberic(Vaule:String):Boolean; //判断Vaule是不是数字vari:integer;beginresult:=true; //设置返回值为 是（真）Vaule:=trim(Vaule); //去空格 for i:=1 to length(Vaule) do //准备循环 begin...
2015-07-26 10:09:00
166
转载 学习Spreadsheet常用属性
Spreadsheet常用属性标题栏可视Spreadsheet1.TitleBar.Visible=true标题栏背景颜色Spreadsheet1.TitleBar.Interior.Color="Green"标题栏标题内容Spreadsheet1.TitleBar.Caption=...
2015-07-06 11:12:00
719
转载 cxSpreadSheetBook控件使用
因为项目需要读取excel的数据，并且可以进行编辑、而且需要进行界面样式的调整，所以进行这个控件的研究。cxSpreadSheetBook是一个Excel控件，可以读取Excel的数据，并且可以进行控件的单元格进行控制，可以实现合并单元格、设置单元格宽度、设置单元格的字体大小、字体样式、设置单元格文字是否居中等等。下面是技巧1：首先定义单元格样式TStyleVal...
2015-04-24 14:19:00
333
转载 Delphi TRzCheckTree的使用
1. 判断状态: if RzCheckTree1.Selected.StateIndex = 2 then //则为选中状态 else if RzCheckTree1.Selected.StateIndex = 1 then //则为未选中状态 else if RzCheckT...
2015-04-24 14:13:00
427
转载 常用的delphi 第三方控件
1、 Devexpress VCL 这个基本上覆盖了系统界面及数据库展示的方方面面，是做桌面系统必备的一套控件， 支持win32 及win64。 2、AutoUpgrader 这个是自动更新的一个小控件，适合桌面程序自动更新，但是自从2007 年后，就没有更新了。 3、Devart 公司出品的UniDAC,ODAC,SDAC,IBDAC, 这几个是目...
2015-04-01 16:22:00
373
转载 双线双ip很好，网通用户访问网通线路，电信用户访问电信线路
很多人会选用导入静态路由表，这个办法看似完美，其实问题很多。 1、电信用户如果被解析到网通的ip上，服务器根据路由表会返回电信线路，但用户请求的是网通ip，所以用户什么也得不到，就好像你从一楼买了东西，商场却在二楼给你出货了，而且不告诉你要去二楼拿。 2、就算被正确解析了，但是如果是教育网用户，服务器会因为路由表里没有ip记录而不会返回任何东西。 3、ip不断的都在变化，也有新增...
2015-04-01 16:11:00
110
转载 导入的实至就是让CXCRID所关联的DATASET能打得开EXCEL报表，并在CXCRID中显示出来...
导入的实至就是让CXCRID所关联的DATASET能打得开EXCEL报表，并在CXCRID中显示出来吗？如果是主样的话，可这样试试的varxlsName:string;beginOpenDialog1.Filter:='*.XLS|*.XLS';OpenDialog1.DefaultExt:='XLS';ifOpenDia...
2015-03-30 14:36:00
60
转载 TDBGridEh导出成*.xls文件
procedure DBGridToExcel(dbGrid: TDBGridEh ; fname: string);const msoScaleFromTopLeft = $00000000; msoScaleFromMiddle = $00000001; msoScaleFromBottomRight = $00000002; msoTrue = $FFFFFFFF; ms...
2015-03-06 14:26:00
160
转载 如何判断读取的文件是最后一个文件
functionsearchFile(path:string):Integer;varSearchRec:TSearchRec;found,fileCount:Integer;beginfileCount:=0;found:=FindFirst(Path+'\*.*',faAnyFile,searchRec);//查找第一个文件whilefound=0dobegin...
2015-03-05 16:51:00
139
转载 转：Delphi数据库技术中Disablecontrols和Enablecontrols的功能
Delphi数据库技术中Disablecontrols和Enablecontrols的功能 2010-12-06 10:48:43| 分类： delphi技术 | 标签：disablecontrols enablecontrols |字号大中小 订阅 一般来说，用来扫描整个数据库表并修改每个记录的某一个字段的程序如下所示：with Table DobeginDisableCo...
2015-03-05 16:47:00
125
转载 关于内存控件TdxMemData的编程设计思路
TdxMemData控件可以把DataSet数据库保存在内存中，并显示在TdxDBGrid上，而通过dxmdt1.FieldByName('字段').value得到当前光标所在值。通过while遍历 整个数据集中的值。如此可以在内存中先操作数据然后再用sql语句提交到数据库， 通常对一条记录都有增删改的操作，内部的操作可以这样实现：增删改按钮下只是操作内存中的数据，当真正保存按钮...
2015-03-05 16:44:00
162
转载 经由过程Remobject组件存储图片
办事端:TROBinMessage，TROIndyHTTPServer 供给办事接口: IBinaryMidService = interface [""{51904085-6D27-4EDA-A55D-A9EE21686894}""] function Add（Const ANum:A...
2015-03-05 16:42:00
80
转载 delphi通过函数名动态调用函数的方法
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TMyCacl = class(TObject) public { Public...
2015-03-03 16:37:00
152
转载 关于内存控件TdxMemData的编程设计思路_学习
TdxMemData控件可以把DataSet数据库保存在内存中，并显示在TdxDBGrid上，而通过dxmdt1.FieldByName('字段').value得到当前光标所在值。通过while遍历 整个数据集中的值。如此可以在内存中先操作数据然后再用sql语句提交到数据库，通常对一条记录都有增删改的操作，内部的操作可以这样实现：增删改按钮下只是操作内存中的数据，当真正保存按钮时才...
2015-03-03 16:33:00
158
转载 学习——录一下经常用到方法
//判断是否是数字functionIsNumeric(sDestStr:string):Boolean;//简写多余汉字functionSimplifyWord(sWord:string;iMaxLen:Integer):string;//读写取注册表中的字符串值functionReadRegStr(sDWName,KeyName:string;SvrBZ:TS...
2015-03-03 16:30:00
112
转载 CBX&RIA模块与模块互通
一、 单元中添加udmclxBaseAppx二、 设置对象、全局变量1、 第一个AO中添加GlobalVars：如：GlobalVars.AddObject(‘AO_PagingDemo’,Self); //把自已放进去，它可以被其他所有AO引用。 GlobalVars.Values[‘a_Var’]=’test’; //设置变...
2015-03-03 16:27:00
106
转载 TStrings类的一些高级的用法
TStrings是一个抽象类，在实际开发中，是除了基本类型外，应用得最多的。常规的用法大家都知道，现在来讨论它的一些高级的用法。先把要讨论的几个属性列出来：1、CommaText2、Delimiter & DelimitedText3、Names & Values & ValueFromIndex先看第一个：CommaText。怎么用呢？用代码说话：const...
2015-03-03 16:25:00
185
转载 精妙sql语句_学习
说明：复制表(只复制结构,源表名：a 新表名：b) SQL: select * into b from a where 1<>1 说明：拷贝表(拷贝数据,源表名：a 目标表名：b) SQL: insert into b(a, b, c) select d,e,f from b; 说明：显示文章、提交人和最后回复时间 SQL: sel...
2015-03-02 16:36:00
57
转载 把数据库blob字段用FoxitReaderSDK1显示PDF
procedure TAO_EWordPdf.ShowDoc;var Adapter: iStream;//TStreamAdapter; DataLoader: TMemoryStream;beginif not cdsGetDocDOC_DATA.IsNull then //判断数据字段不为空 begin DataLoader := TMemor...
2015-03-02 16:08:00
250
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人