- 博客(59)
- 资源 (459)
- 收藏
- 关注
原创 DELPHI XE7安装Unidac6.2.7
UniDAC6.2.7下载地址:http://download.csdn.net/detail/wozengcong/9099561官方文档安装步骤:(后面附翻译:蓝色粗体字部分)Installing UniDAC for Embarcadero RAD Studio XE7 using make-filesPerform the follo
2013-09-30 12:43:23 9337 2
转载 查看ORACLE 数据库信息
-- 查看ORACLE 数据库中本用户下的所有表SELECT table_name FROM user_tables;-- 查看ORACLE 数据库中所有用户下的所有表select user,table_name from all_tables;-- 查看ORACLE 数据库中本用户下的所有列select table_name,column_name from user
2013-09-29 22:23:06 1116
转载 delphi获取文件或文件夹属性和修改属性
语句片段:function showAttr(path:string) : integer;var Attributes:word;begin Attributes := fileGetAttr(PANsiChar(path));if (Attributes and faHidden) = faHidden then //faHidden
2013-09-29 12:47:11 5559
转载 Delphi常用字符串函数
一、字符转换函数1、ASCII()返回字符表达式最左端字符的ASCII 码值。在ASCII()函数中,纯数字的字符串可不用‘’括起来,但含其它字符的字符串必须用‘’括起来使用,否则会出错。2、CHAR()将ASCII 码转换为字符。如果没有输入0 ~ 255 之间的ASCII 码值,CHAR() 返回NULL 。3、LOWER()和UPPER()LOWER()将字符串全部转
2013-09-28 22:40:07 2232
转载 Delphi 中的常用事件
原文地址:中的常用事件" style="text-decoration:none; color:rgb(7,67,135)">Delphi 中的常用事件作者:星云月序号事件描述1. OnActive焦点称到窗体或控件时发生2.
2013-09-28 22:38:37 3264
转载 PLSQL 中Merge into和Update的用法
这两天一直在处理关于SQL server存储过程转换到Oracle中,也发现一些oracle语句的区别。 在oracle 中有个语法:merge 用法如下:merge into 表1 using 表2 或者(select * from 表2)别名 on (表1.id=表2.id) when matched then update set 表1.列
2013-09-28 15:27:52 13485 1
原创 DelphiXE4 TBalloonHint组件的使用
本例相关图片: [delphi] view plaincopyunit Unit1; interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Im
2013-09-28 00:21:53 2304
转载 Delphi的Hint入门指导
Delphi中使用提示是如此简单,只需将欲使用Hint的控件作如下设置: ShowHint := True; Hint := ‘提示信息’; 不必写一行代码,相当方便。 但有时我们又想自己定制提示的效果,使其看起来更美观更具个人特色,没关系,Delphi完全有办法让你写出自己喜欢的Hint效果。 Delphi的Hint功能实现归类在Applicatio
2013-09-26 12:06:08 3011
原创 在delphi中用函数将空值转换成空字符
今天遇到一个报错:“could not convert variant of type(NULL) into type(OleStr) ,根据提示肯定是ADOQuery的结果集取到的字段值有NULL值,找了很久,终于找到解决方案:使用VarToStrDef函数转换即可,不需要if then 这么麻烦了str := VarToStrDef(DataSet.Fields[i].Value, '
2013-09-24 20:28:55 5467
转载 oracle的nvl和sql server的isnull
最近公司在做Oracle数据库相关产品,在这里作以小结:ISNULL()函数语法 ISNULL ( check_expression , replacement_value) 参数 check_expression 将被检查是否为 NULL的表达式。check_expression 可以是任何类型的。 replaceme
2013-09-22 20:41:59 1308
转载 DECODE函数和CASE WHEN 比较
一,DECODE函数 其基本语法为:Sql代码 DECODE(value, if1, then1, if2, then2, if3, then3,...ifn, thenn, else) 表示如果value等于if1时,DECODE函数的结果返回then1,...,如果不等于任何一个if值,则返回else。亦即:decode(条件,值1,
2013-09-22 20:23:17 1621
原创 快速得到本机ip地址和名字
Delphi 有一个位于 Indy Misc 的 VCL 控件 —— TIdIPWatch,可以用它来获取本机 IP 地址放个Tidipwatch控件在Form上,然后设置idipwatch1的historyenabled的属性设为false。然后可以添加一个Button按钮,在Onclick事件中添加语句self.Edit1.Text := self.IdIPWa
2013-09-22 19:34:51 1380
原创 UniDAC 的 RecordCount 属性注意事项
一直以来都是用UniDAC作为数据库查询组件,而一般的写法都是这样:?1234567891011121314UniQuery_sqlite.close;UniQuery_sqlite.SQL.Clear;UniQuery
2013-09-22 15:06:32 2238
原创 Delphi XE4 主窗体隐藏之后任务栏没有图标显示。
今天修改程序BUG的时候,发现登录窗口点击登录后,主操作窗口任务栏图标竟然消失了,换到虚拟机里面的DELPHI7测试同样代码正常,对比后发现program Project1;uses Vcl.Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2};{$R *.res}
2013-09-20 18:34:54 2973
原创 delphi checkbox改变checked时不让触发click事件〖模拟radiobutton功能〗
因为checkbox的checked的改变有三种方式,第一种是直接调用语句:checkbox.checked:=true/false;第二种是直接点击这个控件,当然前题是要有checkboxClick事件.第三种是state 表示复选框的当前状态.cbchecked 表示选中, cbunchecked表示未选中, cbGrayed表示变灰状态.(allo
2013-09-20 17:03:12 5521
原创 UniDAC连接ORACLE数据库封装代码
unit UnitUniDAC;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, MyMsgBox, cxGraph
2013-09-20 16:16:00 3984 1
转载 mysql + unidac 使用事务例子
//备注:mysql必须是使用innoDB引擎才支持事务功能,否则以下事务相关代码将失效。//SQL SERVER和Oracle还没试,明天回公司试了再发代码。procedure TForm1.btn1Click(Sender: TObject);var i, j: Integer;begin UniConnection1.Connect; try try
2013-09-20 16:03:16 2235
原创 DBGridEh使用UniDac默认不能排序和过滤的解决方案
以下是EhLib论坛找到的一个帖子中关于此问题解决方案的英文原文Copy EhLibUniDAC.pas file from \DataService\Others\ folder to the \Lib folderAdd EhLibUniDAC unit to the uses clause of any unit of your project.and adjust gr
2013-09-20 15:00:45 3653
转载 delphi实现十进制与十六进制之间的转化
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls; type TForm1 = class(TForm) Edit1: TEdit; E
2013-09-19 23:30:31 4035 1
转载 unidac直连oracle导入图片到表中
[delphi] view plaincopyvar UniConnection: TUniConnection; UniQuery: TUniQuery; begin UniConnection:= TUniConnection.Create(nil); UniQuery:= TUniQuery.Create
2013-09-19 20:00:49 2011 1
转载 如何在WORD2010中取消自动编号?
WORD2010的自动编号是一个很让人烦功能,WORD2010的自动编号会打乱整个WORD2010文档的布局,因此,很多人都想把这个功能关闭。在WORD2010中点击文件菜单,选择选项中校对下面的自动更正选项,找到键入时自动套用格式标签,去掉“自动项目符号列表”和“自动编号列表”两个选项前的勾,确定之后WORD2010就不会再为用户自动编号了。取消WORD2010自动编号喜欢分享
2013-09-17 21:21:41 1502 1
转载 delphi中窗体关闭事件FormCloseQuery与assigned函数的使用
Form窗体可以响应各种各样的时间,在Object Inspector的Events页面中罗列了一大堆,如下图:下面将要列出一些常用的事件。1、OnActivate当窗体被初始激活时,就会发生OnActivate事件,当初始创建窗体或者用户从一个窗体切换到另一个窗体时,就可能激活窗体,Application对象也有一个OnActivate事件,当用户从一个应用程序切
2013-09-15 20:56:43 3969
转载 DELPHI的MEMO组件
位于Standard选项卡上,它是对EDIT控件的扩展,可以对多行文本进行显示、输入 和编辑. Lines属性: 该属性实际上为TStrings类型的对象,用来存放Memo对象的文本 TStrings有一个缺省的属性Strings,它的定义为: property strings[index:integer]:string; 其中,Index表示字符串的索引值,
2013-09-14 17:33:03 8025 1
转载 电驴提示“该内容尚未提供权利证明,无法提供下载”之解决办法详解
最近在电驴上下载东西时总是提示“该内容尚未提供权利证明,无法提供下载”,让人很恼火,其实这个问题很容易就能解决,现在给出四种办法,供各位驴友选择,请勿灌水,谢谢合作!【方法一】在检索到的网址中添加".gdajie",注意添加位置是在verycd之后. 比如我要下载《数字图像处理》这本书原检索地址:http://www.verycd.com/topics/2923809/点开显示“该
2013-09-14 17:14:40 863
转载 DELPHI常用组件常见属性说明
DELPHI常见属性说明:ALIGN 设置组件对齐(同其父容器)方式BORDERSTYLE 设置组件边框形状CAPTION 设置组件标题CTL3D 设置组件边框是否为3D模式,若BORDERSTYLE设置为BSNONE则此属性无效COLOR 设定组件背景颜色CURSOR 设定鼠标经过组件时光标所显示的形状ENABLED 设定组件是否能使用,当设为FALSE时组件会呈
2013-09-14 17:11:47 1350
转载 在DbGridEh中显示表中表
操作时写的代码并不多,主要问题是需要将所有的数据读内存表不太合适,在修改上应该可以将数据源改为动态。使用的重点是设置DbGridEh1的RowDetailPanel打开,再将DbGridEh2放入,设置MemTableEh2的MasterFields和DetailFields,接入数据源,好,出锅!使用这个功能要注意一点,MasterDBGridEh的DataSet必须是MemtablEh
2013-09-13 23:05:57 2608 1
转载 Delphi 在dbgrideh中表格输入数据时有效性的检查(转)
在数据库系统设计中经常要用到在表格中进行数据录入,如何判断在数据导入时的数据有效性呢?下面介绍几种常用的方法与大家交流。方法一:Dbgrid是与Table,在Table的Column的OnSetText和OnValidate事件中处理。 1、在OnSetText中判断数据的合法性,如果不合法,在OnValidate处理,如果不合法则abort2、抛出一个异常Raise,即可保证
2013-09-13 23:04:30 2297
转载 Delphi 如何判断在DBGridEh中某格输入数据是否符合约束
两种方法:1、如果要实现复杂的判断,可以用字段的OnValidate事件,写法如下:procedure ClientDataSetValidate( Sender: TField);var tpEvent:TFieldNotifyEvent;begin if Sender.AsFloat > 57 then begin ShowMessage('值不符事
2013-09-13 23:03:52 2713
转载 Delphi DbgridEh表格内容显示的状态
varMyCol: TColumnEh;beginwith DBGridEh_DWUser dobeginColumns.Clear;MyCol := Columns.Add;MyCol.FieldName := 'USER_CODE';MyCol.Title.Caption := '用户编码';MyCol.Width := 120;MyCol.ReadOn
2013-09-13 23:03:15 2571
转载 Delphi DbGridEh实现表格没有内容的渐变效果
OptionsEh = dghExtendVertLines 就会有这个效果, 去掉就会没有这个效果
2013-09-13 23:02:36 1522
原创 自定义消息对话框,支持DELPHI7~XE5
unit MyMsgBox;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;{------------------------------------------------------
2013-09-13 22:53:41 2638
原创 delphi DBGrideh部分常用功能使用说明
1、表格数据颜色设置方法:a、单条颜色设置:在原来基础上面将最后一句代码suiDBGrideh1.DefaultDrawColumnCell(Rect, DataCol, Column, State);修改为TDBGridEh(Sender).DefaultDrawColumnCell(Rect, DataCol, Column, State);b、斑马线设置:在dbgirde
2013-09-13 22:06:48 5149
转载 DBGridEh全部属性设置详解
可惜做好的表格传不下来,只好粘成纯文本了属性子选项 值 说明Allowedoperations[alopInsertEh,alopUpdateEh,alopDeleteEh,alopAppendEh]允许操作类型:插入、更新、删除、追加Allowedselections[gstRecordBookmarks,gstRectangle,gstColumns,g
2013-09-13 20:17:37 7942
原创 delphi获取汉字拼音首字母〖各版本通用〗
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Edit1: TEdit; Edit
2013-09-13 09:28:11 5783 1
转载 “在对应所需名称或序数的集合中,未找到项目”问题的解决方法
在BCB或Delphi中,使用ADOQuery进行数据库的操作,经常会遇到“在对应所需名称或序数的集合中,未找到项目”的问题。这个问题是由于ADOQuery中使用了当前表中没有的字段造成的。出错原因:1.在ADOQuery中使用了Filter属性,并且设置Filter的值。在使用同一个ADOQuery进行另一个表的操作时,此Filter的值还是存在的,系统不会自动清除,于是出现了上
2013-09-13 00:12:10 10595
原创 DELPHI对ADO封装(入门版)
应用场景简介:Delphi XE4(含第三方插件DBGRIDEH和自定义消息框MsgBox)+ORACLE 11G R2环境下,登录窗口点击〖登录〗,隐藏FormLogin,弹出FormMianOperation,在主操作窗口,有3个选项卡,每个选项卡下面都有1个DBGRIDEH和各自的按钮事件,至少都有查询和更改操作,为了达到松藕效果,去掉登录的的TADOConnection,TADOQue
2013-09-12 10:45:25 2206
转载 Delphi异常处理try except语句和try finally语句用法以及区别
Delphi异常处理try except语句和try finally语句用法以及区别 一直写程序都没管他们,也尽量很少用,今天终于想把他给弄个明白,在网上找来,记下!主要是前面小部分,后面的是详细说明(很啰嗦!)一、异常的来源 在Delphi的应用程序中,下列的情况都比较有可能产生异常。 (1)文件处理 (2)内存分配
2013-09-11 19:53:31 1157
转载 Delphi中用ADO控件连接数据库例子
概述:一、说明最近在写个“数据库管理系统框架程序”,其中封装了几个连接数据库的函数,觉得挺好用,拿出来与大家分享下,希望能对大家有点用处。我以连接oracle和access为例,其余数据库连接在此基础上稍加修改,便可使用。二、连接oracle1、源码{功能:连接ORACLE数据库参数:sServerName ORACLE服务名,sUserNa
2013-09-11 16:55:57 4195
转载 修复打开Excel提示,“您尝试打开的文件的格式与文件扩展名指定的格式不一致,打开前请验证文件示被损坏且来源可信,是否立即打开该文件?”
在注册表中增加一下键值即可。在“开始菜单/运行”中输入regedit,打开注册表。选择HKEY_CURRENT_USER / Software / Microsoft / Office / 12.0 / Excel / Security 在 编辑 菜单上指向 新建,然后单击 DWORD 值。 键入 ExtensionHardening,然后按 ENTER。 双击Extens
2013-09-11 09:31:47 4883 1
原创 Ehlib 的 DBGridEh 控件导出到Excel的三种封装过程/函数
必须uses DBGridEhImpExp, EhlibADO, DBGridEh第一种:procedure TForm2.dbgridehtoexp(lsdbgrideh: tdbgrideh; Title: string); //lsdbgrideh传入dbgrideh变量;Title保存标题var ExpClass: TDBGridEhExportClass;
2013-09-10 23:23:22 2625
按照制定时间运行程序(RunAsDate) 1.3 绿色汉化版
2016-12-15
sql-optimizer-for-sql-server_1001官方试用版+安装手册+使用教程
2016-12-15
AlphaControls v11.22 Stable released(D5&XE10.1) (x86&x64) DCUs.rar
2016-12-15
AlphaControls v11.21 Stable (D5~D10.1) (x86&x64) DCUs
2016-12-15
EhLib 9.0 Build 9.0.033 Full Source〖含源码和DEMO〗
2016-12-15
SQLPrompt_7.3.0.775〖含注册机〗(支持低版本和最高版本SQL2016+VS2015)
2016-12-14
AlphaControls v11.15 Stable (D5~D10.1) (x86&x64) DCUs
2016-09-18
SQLPrompt_7.3.0.513〖含注册机〗(支持低版本和最高版本SQL2016+VS2015)
2016-09-18
SQLPrompt_7.2.1.267〖含注册机〗(支持低版本和最高版本SQL2016+VS2015)
2016-05-14
AlphaControls v11.00 Stable (D5~D10.1) (x86&x64) DCUs
2016-05-14
AlphaControls v10.29 Stable (D5~D10.1) (x86&x64) DCUs
2016-05-14
AlphaControls v10.28 Stable (D5~D10) (x86&x64) DCUs
2016-05-14
AlphaControls v10.27 Stable (D5~D10) (x86&x64) DCUs
2016-03-22
AlphaControls v10.26 Stable (D5~D10) (x86&x64) DCUs
2016-03-22
UniDac 6.2.10〖XE10〗 全dcu版本,小白勿下
2016-03-08
AlphaControls v10.25 Stable (D5~D10) (x86&x64) DCUs
2016-02-13
SQLPrompt_7.1.0.306〖含注册机〗(支持低版本和最高版本SQL2016+VS2015)
2016-02-12
AlphaControls v10.24 Stable (D5~D10) (x86&x64) DCUs
2016-02-04
Devexpress VCL V15.2.3帮助文档〖CHM格式〗
2016-02-03
DxAutoInstaller-2.1.5For Devexpress VCL(DevExpressVCL15.2.2)
2016-02-02
UniDac 8.0.1〖D7,2007,10.1,10.2,10.3〗一键安装版已XX版
2019-09-10
DevExpress VCL V19.1.2 FullSource〖D7~D10.3Rio〗内含安装工具
2019-09-08
DevExpress VCL V18.2.5 FullSource〖D7~D10.3Rio〗内含安装工具
2019-07-18
DevExpress VCL V18.2.8 FullSource〖D7~D10.3Rio〗内含安装工具
2019-07-18
DxAutoInstaller 2.2.rar
2019-07-18
DevExpress VCL V18.2.1 〖D7~D10.3rio〗含安装工具
2019-07-18
Project导出EXCEL表工具(插件)
2018-08-27
Project 2013中文版项目管理 从新手到高手
2018-08-14
AlphaControls v13.04 Beta released(D5&XE10;.2) (x86&x64;) DCUs
2018-03-27
AlphaControls v13.03 Beta released(D5&XE10;.2) (x86&x64;) DCUs
2018-03-22
AlphaControls v13.02 Beta released(D5&XE10;.2) (x86&x64;) DCUs
2018-03-10
AlphaControls v13.01 Beta released(D5&XE10;.2) (x86&x64;) DCUs
2018-02-28
SQLPrompt_7.5.1.1000〖含注册机〗(支持低版本和最高版本SQL2016+VS2015)
2018-02-20
DevExpress VCL V16.2.5 FullSource〖D6~D10.2〗
2018-02-06
DxAutoInstaller-2.1.9 For Devexpress VCL
2018-02-06
UniDac 7.0.1〖D7~XE10.2〗源码版下载
2017-04-07
AlphaControls v12.00 Beta released(D5&XE10;.1) (x86&x64;) DCUs
2017-02-21
AlphaControls v11.25 Stable released(D5&XE10.1) (x86&x64) DCUs
2017-02-07
AlphaControls v11.24 Stable released(D5&XE10.1) (x86&x64) DCUs
2017-02-07
rar文件AlphaControls v11.23 Stable released(D5&XE10.1) (x86&x64) DCUs
2017-02-06
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人