05 2013 档案
摘要:Dephi XE 编译后执行文件的路径怎么改在右侧树形结构,的工程目录下,有个Build Configurations,下面的Debug 和 Release上右键,选Edit...,在弹出的对话框中的最后一个选项即是 Output Directory 是Exe目录 Unit Output directory 是 dcu目录
阅读全文
摘要:Delphi开发DLL1.一般工程文件的头标用program关键字,而DLLs工程文件头标用library 关键字。不同的关键字通知编译器生成不同的可执行文件。用program关键字生成的是.exe文件,而用library关键字生成的是.dll文件; 2.假如DLLs要输出供其它应用程序使用的函数或过程,则必须将这些函数或过程列在exports子句中。而这些函数或过程本身必须用export编译指令进行编译。 根据DLLs完成的功能,我们把DLLs分为如下的三类:1.完成一般功能的DLLs;2.用于数据交换的DLLs;3.用于窗体重用的DLLs。一 Dll的制作一般分为以下几步:1 在一个D..
阅读全文
摘要:Delphi AnimateWindow用法 淡入淡出窗口在OnShow加入弹出式窗口事件: procedure TForm1.FormShow(Sender: TObject);begin ANimateWindow(Handle,200,AW_SLIDE+AW_HOR_NEGATIVE);end; 关掉窗口滑动事件在OnClose加入: procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);begin ANimateWindow(Handle,200,AW_SLIDE+AW_HOR_POSITIVE+AW
阅读全文
摘要:http://blog.csdn.net/zhnglicho/article/details/6760912 ini 文件是基于文本类型的格式文件,用于存储程序初始化和配置数据。 .ini文件是有段(Sections)和键(key)组成的,每个文件可以有 n个段(每个段有方括号括起来),每个段可以有m个键,大致格式如下: [secontion] Ke...
阅读全文
摘要:动态链接库是一个能够被应用程序和其它的DLL调用的过程和函数的集合体,它里面包含的是公共代码或资源。由于DLL代码使用了内存共享技术,在某些地方windows也给了DLL一些更高的权限,因而DLL中可以实现一些一般程序所不能实现的功能,如实现windows的HOOK、ISAPI等。同时,DLL还为不同语言间代码共享提供了一条方便的途径。因而DLL在编程时应用较为广泛,本文将介绍如何在 Delphi 中建立和使用DLL。 一.DLL 库内存共享机制 从使用效果看,DLL和unit 很像,它们都可以被别的工程模块所调用,但二者在内部的实现机制上确存在着差别。如果一个程序模块中用uses语句引...
阅读全文
摘要:版本标识:VER10 : Turbo Pascal 1VER20 : Turbo Pascal 2VER30 : Turbo Pascal 3VER40 : Turbo Pascal 4VER50 : Turbo Pascal 5VER60 : Turbo Pascal 6VER70 : Turbo Pascal 7 / Borland Pascal 7VER80 : Delphi 1VER90 : Delphi 2VER100 : Delphi 3VER110 : ?VER120 : Delphi 4VER130 : Delphi 5VER140 : Delphi 6VER...
阅读全文
摘要:Delphi 的编译指令(2): 条件语句的更多用法1. $IFDEF 等同于 $IF DEFINED(...) :它们的结束分别是: $ENDIF、$IFEND; 例子中的 VER200 是 Delphi 2009 的标识.begin{$IFDEF VER200}ShowMessage('这是 Delphi 2009');{$ENDIF}{$IF DEFINED(VER200)}ShowMessage('这是 Delphi 2009');{$IFEND}end;2. $IFNDEF 等同于 $IF NOT DEFINED(...) :它们的结束分别是: $EN
阅读全文
摘要:Delphi 的编译指令(1): $DEFINE、$UNDEF、$IFDEF、$ELSE、$ENDIF一个程序从无到有的过程是这样的: 编辑代码 -> 预处理 -> 编译(成dcu等) -> 链接(为exe等).什么是预处理?譬如 VCL 中有很多代码是兼容 Linux 的, 在 Windows 下就需要在编译之前预处理掉那些 for Linux 的代码.1、判断操作系统:其中的 "MSWINDOWS" 和 "LINUX" 就是 Delphi 预定义的 "条件标识符".begin{$IFDEF MSWINDOWS}S
阅读全文
摘要:DELPHI的编译指令 可以检测到这种改变, (1) Shift+F9 或 Project -> Build all project. (2) Run Without Debugging Shift+ Ctrl + F9---------------------------------------------------------------------------------使用列子: procedure TForm1.Button1Click(Sender: TObject);begin{$IFDEF _ProVersion} ShowMessage(''专业版&#
阅读全文
摘要:cxGrid中列的GridMode属性 Lookup字段记录很大, GridMode=false时打开时很慢, GridMode = true 时非常快,但筛选、排序、汇总都不能用 gridmode=true 后,就无法自动实现排序. gridmode=false 模式下,数据全加载了,数据多地时候
阅读全文
摘要:16、SaveDialog1确认文件存不存在的办法?答:procedureTForm1.SaveDialog1CanClose(Sender:TObject;varCanClose:Boolean);beginifFileExists(SaveDialog1.FileName)then//如果文件已经存在ifMessageDlg('文件已经存在,保存吗?',mtConfirmation,[mbYes,mbNo],0)<>mrYesthenButton2.Click//如果选择了覆盖,则退出,否则,重新让用户选择文件end;======================
阅读全文
摘要:历史上最全的delphi技巧集锦之1分类:delphi2008-11-16 22:00------------------------------------------------删除dbgrid中选定数据的方法:beginadotable1.Delete;adotable1.first;若要追加和修改信息:adotable1.Append;adotable1.post;------------------------------------------------将数据写入库:procedureTclassmanageform.SaveToTable;beginClassmanageFor
阅读全文
摘要:CxGrid的使用说明cxgrid分组自动展开cxgrdbtblvwGrid1DBTableView1.DataController.Groups.FullExpandcxgrid取得默认字段cxgrdbtblvwGrid1DBTableView1.ClearItems;cxgrdbtblvwGrid1DBTableView1.DataController.CreateAllItems;(1)动态设置显示格式procedure SetDisplayFormat(ACtrlData: TClientDataSet; TbView: TcxGridDBTableView);var i: integ
阅读全文
摘要:cxGrid 知识点设置 TableView.OptionsView.HeaderAutoHeight 为 True 时栏目标题高度自动调整网格上选择了记录,当焦点移走时,看不到选择的记录,解决办法:修改 TableView 的属性,OptionsSelection->HideSelection 设为 False遍历选中记录:with ATableView.DataController dobeginVOldFocusedRecordIndex := FocusedRecordIndex;for VIndex := 0 to ATableView.Controller.SelectedR
阅读全文
摘要:技巧二:在内置右键菜单的后面增加菜单项 首先应在Form上加一个cxGridPopupMenu控件 以启用右键菜单 UseBuildInPopupMenus设为True procedure TFormItemList.FormCreate(Sender: TObject); var AMenu: TComponent; FMenuItem, FSubMenuItem: TMenuItem; begin AMenu := nil; if cxGridPopupMenu.BuiltInPopupMenus.Count = 0 then ...
阅读全文
摘要:如何在win7下安装和配置Android Studio下载地址:http://developer.android.com/sdk/installing/studio.html#download如果出现启动不了的问题进入Android Studio安装目录 E:\software\AndroidStudio\bin,运行studio.bat出现原来是没有设置JAVA的环境变量!No.1 在系统变量里点击新建,变量名填写JAVA_HOME变量名JAVA_HOME变量值C:\ProgramFiles\Java\jdk1.7.0_21No.2在系统变量里点击新建变量名填写CLASSPATH变量名CLA
阅读全文
摘要:Android 开发网站http://blog.csdn.net/tangren03/article/category/905893玻璃城市http://www.cnblogs.com/ChinaEHR/p/3355973.html
阅读全文
摘要:Android Studio使用教程(二)以下是本次Google I/O大会发布的IDE Android Studio使用教程第二篇: 在Android Studio使用教程(一)中简要介绍了Android Studio的基本使用,包括安装、新建工程、工程结构以及主题设置。今天接着讲第二篇,主要包括如下内容:从Eclipse导入工程到Android StudioEclipse工程与Android Studio的区别真机运行以及常用快捷键需要重申一下,我所有的操作与版本是基于Mac系统,在Windows上的同学基本类似(作为一个技术人员,这些应该都不是问题),下面就分主题开始吧:一、从Eclip
阅读全文
摘要:Android Studio使用教程(一)今年的Google全球开发者大会虽然没有新的Android系统和设备,但是还是推出了一些不错的产品,Android Studio就是其中之一。这个基于Intellij IDEA开发的Android IDE让很多人眼前一亮,其实时编写布局文件实时预览并适配多屏的功能可以说让苦于界面布局开发的人看到了希望。代码自动提示、运行响应速度、都比Eclipse来的要好。但这次推出的版本毕竟是预览版,所以改进的控件还有很大,大家也不要吐槽不好或难用,有空间,所以才有进步。Google也是将版本号置为0.1而非1.0,可见其改进空间之大,我们可以先试用,等待完善版的不
阅读全文
摘要:http://www.torhumar.com/android-studio.html
阅读全文
摘要:似乎DFW们都不是很关心控件的新版本使用和老版本的区别,在BBS里基本看到的都是FR2.5版本的使用经验,实在是有点郁闷。干脆这第一个笔记就拿来列举经常用的FR3.18的经验吧。。。补充的话:看来有不少人来看偶的笔记。希望各位能不只是看,最好能把自己的经验心得也发布在对这笔记的评论中。也许我的做法或者学习的方法不入高手的法眼,但我相信本着“积土成山”的执着,这份资料将会越来越完善。。。引用以前说过的话,我们本身并不重要,重要的是经验的积累和知识的传承。。。再补充句废话:我不想让各位记住我是作者啥的,所以所有的这些“废话”完全可以在转载的时候去掉,还最根本的笔记面貌。而且诸君若不愿意贴连接只愿意
阅读全文
摘要:一、使用TfrxReport 组件工作 1、加载并存储报表 默认情况下,报表窗体同项目窗体构存储在同一个DFM文件中。多数情况下,无须再操作,因而你就不必采用特殊方法加载报表。如果你决定在文件中存储报表窗体或者是数据库的Blob字段(他提供了非常大的弹性,你能够在非编译程序中修改),你必须使用“TfrxReport”提供的加载和存储方法。 function LoadFromFile(const FileName: String; ExceptionIfNotFound: Boolean = False): Boolean; 从一个给定名字文件中加载报表。如果第二个参数等于“True”并且文件没
阅读全文
摘要:TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的。TStringList 常用方法与属性:var List: TStringList; i: Integer;begin List := TStringList.Create; List.Add('Strings1'); {添加} List.Add('Strings2'); List.Exchange(0,1); {置换} List.Insert(0,'Strings3'); {插入} i := List.IndexOf('Strings1'); {第一次出
阅读全文
摘要:消息,就是指Windows发出的一个通知,告诉应用程序某个事情发生了。例如,单击鼠标、改变窗口尺寸、按下键盘上的一个键都会使Windows发送一个消息给应用程序。消息本身是作为一个记录传递给应用程序的,这个记录中包含了消息的类型以及其他信息。例如,对于单击鼠标所产生的消息来说,这个记录中包含了单击鼠标时的坐标。这个记录类型叫做TMsg,它在Windows单元中是这样声明的: type TMsg = packed record hwnd: HWND; / /窗口句柄 message: UINT; / /消息常量标识符 wParam: WPARAM ; // 32位消息的特定附加信息 ...
阅读全文
摘要:使用TcxDBLookupComboBox需要设置以下属性: 1、DataBinding.DataSource:数据感知控件的数据源。 2、DataBinding.DataField:数据感知控件的连接字段。 3、properties.ListSource:TcxDBLookupComboBox下拉
阅读全文
摘要:出现的问题:在编译delphi程序时出现提示为:[Error] MyUnit.pas(LL): Undeclared identifier: 'NNNN'其中:MyUnit.pas源文件的名称.LL第几行.NNNN提示的标识名.原因:编译器不能识别'NNN'这个标识。这可能是拼写错误或找不到定义文件造成。解决方法:常见的错误是由于拼写错误造成,例子如下: var number: Integer; begin numbr := 1;变量定义为number,但使用时写成了numbr,将变量改正就可以。另一种是代码正确,但要用到的单元没有包含进去。如: try . .
阅读全文
摘要:Windows下搭建Android开发环境来自Tree一、 相关下载(1) java JDK下载:进入该网页:http://java.sun.com/javase/downloads/index.jsp如下图:选择 Download JDK 只下载JDK,无需下载jre.(2)eclipse下载进入该网页:http://www.eclipse.org/downloads/如下图:我们选择第一个(即Eclipse IDE for java Developers)(3)下载Android SDK进入该网页http://developer.android.com/sdk/index.html选择下载
阅读全文
摘要:如何去掉Delphi自动生成的~.pas等临时文件一、Delphi7二、Delphi2010
阅读全文
摘要:Delphi快捷键大全在过程、函数、事件内部, SHIFT+CTRL+向上的方向键 可跳跃到相应的过程、函数、事件的定义.相反,在过程、函数、事件的定义处,SHIFT+CTRL+向下的方向键 可跳跃到具体过程、函数、事件内部CTRL+ SHIFT + C:编写申明或者补上函数.如:procedure TT.A(AA: string); //函数申明安下:CTRL+ SHIFT + C后,会写上procedure TT.A(AA: string);beginend;SHIFT+CTRL+E 显示 EXPLORERcrtl + shift + n (n=1,2,3,4......)定义书签crtl
阅读全文
摘要:SQL的重复记录处理大全查找所有重复标题的记录: SELECT * FROM t_info a WHERE ((SELECT COUNT(*) FROM t_info WHERE Title = a.Title) > 1) ORDER BY Title DESC 一查找重复记录 1。查找全部重复记录Select * From 表 Where 重复字段 In (Select 重复字段 From 表 Group By 重复字段 Having Count(*)>1)2。过滤重复记录(只显示一条)Select * From HZT Where ID In (Select Max(ID) F
阅读全文
摘要:如果webbrowser由你创建如果网页内容可知用263举个例子procedure TForm1.FormCreate(Sender: TObject);begin b := false; webbrowser1.Navigate('http://www.263.net');end;procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);begin b := True;end;procedure TForm1.Button
阅读全文
摘要:Borland DataSnap(MIDAS)三层架构编程中,DataSetProvider的Option属性DataSetProvider的Option属性看看远端数据模块里的DataSetProvider的Option属性是否设置正确!Provider控件的Options属性值是一个集合,用于设置有关打包和传递的选项,像显示哪些字段、允许哪种更新方式等等。1.poFetchBlobsOnDemand:若包含此项,则表示数据包中不包括BLOB字段。不过,如果客户端的TclientDataSet控件的FetchOnDemand属性设为True,那么客户端还是能自动地请求这些数据值;否则,客户端
阅读全文
摘要:有一行代码的三层,功能肯定非常的简单,但是,再简单,我们也三层了,学习一个东西,需要从入门开始就有兴趣,如果入门就给吓怕了,哪么后来何来信心学习呢?现在就让我们开始吧,不只是没有华丽的词语,而是连用词都不专业,因为,我也只是一个入门者。 我所用的版本为:Embarcadero® Delphi® 2010 Version 14.0.3593.25826 一、让我们 file->new->other ,再选 datasnap server ,或者F6,输入 datasnap如图,我们有两个可选项datasnap server:选择这一项,我们得到的将是一个独立EXE
阅读全文
摘要:A类互联网网址: 7位网络号 24位主机号 01111111.11111111.11111111.11111111 --->01111111 = 127 0..127 0..255 0..255 0..255 0.0.0.0 -- 127.255.255.255B类互联网网址: 14位网络号 16位主机号 10111111.11111111.11111111.11111111 --->10111111 = 191 128..191 0..255 0..255 0..255 128.0.0.0 -- 191.255.255.255C类互联网网址: 21位网络号 8位主机号 11011
阅读全文
摘要:SqlServer中得到当前日期(convert函数,getdate函数)当前日期SELECT CONVERT(VARCHAR(30),GETDATE(),111)SqlServer中得到当前日期(convert函数,getdate函数)函数GETDATE()的返回值在显示时只显示到秒。实际上,SQL Sever内部时间可以精确到毫秒级(确切地说,可以精确到3.33毫秒)。 ..类型0,9,和13总是返回四位的年。对其它类型,要显示世纪,把style值加上100。类型13和14返回24小时时钟的时间。类型0,7,和 13返回的月份用三位字符表示(用Nov代表November).对表11.1中所
阅读全文
摘要:1.理论只要两个表的公共字段有匹配值,就将这两个表中的记录组合起来。个人理解:以一个共同的字段求两个表中符合要求的交集,并将每个表符合要求的记录以共同的字段为牵引合并起来。语法FROM table1 INNER JOIN table2 ON table1 . field1 compopr table2 . field2INNER JOIN 操作包含以下部分:部分说明table1, table2要组合其中的记录的表的名称。field1,field2要联接的字段的名称。如果它们不是数字,则这些字段的数据类型必须相同,并且包含同类数据,但是,它们不必具有相同的名称。compopr任何关系比较运算符:
阅读全文
摘要:cxGrid数据录入一、数据录入1 在TcxGridDBTableView中,设定属性 NewItemRow.Visible = True2 在cxgrid中输入数据怎样回车换行 在TcxGridDBTableView中 将属性OptionsBehavior.FocusFirstCellOnNewRecord = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True就可以了.如果愿意也可以添加其自带的操作按钮,OptionsView.Navigator = True随后在N
阅读全文
摘要:procedure CaptureScreen(Const FileName: string);var BitsPerPixel: Byte; pD3D: IDirect3D9; pSurface: IDirect3DSurface9; g_pD3DDevice: IDirect3DDevice9; D3DPP: TD3DPresentParameters; ARect: TRect; LockedRect: TD3DLockedRect; BMP: TBitmap; i, p: Integer;begin BitsPerPixel := GetDeviceCaps(Can...
阅读全文
摘要:delphi 三层架构简单例子(经测试成功)所谓三层:(1) 客户端(2) 服务器端(3) 数据库 在数据访问时,使得客户端必须通过服务器来访问数据库。提高了系统的安全性。 在Delphi中可以使用Socket或者Dcom来连接他们相互间的通讯。如果使用Scocket在系统使用时必须提供Scocket连接器,而Dcom则不用。客户端和服务器的连接需要Broker来联系。环境为winxp sp2 + delphi 7 + db7.(MSSQL2000)创建过程:1、请不要新建application.file-new-activex-activex library,file --new--othe
阅读全文
摘要:DBGrid 应用全书http://blog.csdn.net/aroc_lo/article/details/3188500在 Delphi 语言的数据库编程中,DBGrid 是显示数据的主要手段之一。但是 DBGrid 缺省的外观未免显得单调和缺乏创意。其实,我们完全可以在我们的程序中通过编程来达到美化DBGrid 外观的目的。通过编程,我们可以改变 DBGrid 的表头、网格、网格线的前景色和背景色,以及相关的字体的大小和风格。 以下的示例程序演示了对 DBGrid 各属性的设置,使 Delphi 显示的表格就像网页中的表格一样漂亮美观。
阅读全文
摘要:基于Delphi的接口编程入门为什么使用接口? 举个例子好了:有这样一个卖票服务,电影院可以卖票,歌剧院可以卖票,客运站也可以卖票,那么我们是否需要把电影院、、歌剧院和客运 站都设计成一个类架构以提供卖票服务?要知道,连经理人都可以卖票,很显然不适合把经理人也包括到卖票服务的继承架构中,我们需要的只是一个共通的卖票服 务。于是,卖票的服务是个接口,电影院、歌剧院什么的只要都遵循这样一个服务定义就能很好地相互交互和沟通(如果须要的话)。 如何在Delphi中使用接口 1、声明接口IMyInterface = interface(IInterface) //说明(1)['{63E072DF
阅读全文
摘要:首先将pagecontrol的ownerdraw设为true再在它的onDrawTab事件里写如下代码:var TmpRect: TRect;begin with PageControl1.Canvas do begin Brush.Color := $00E6F6F8; Font.Color := clblack; FillRect(Rect); TmpRect := Rect; OffsetRect(TmpRect, 0, 3); DrawTex...
阅读全文
摘要:delphi执行查询语句时的进度条怎么做procedure TForm1.FormCreate(Sender: TObject);begin ADOQuery1.ExecuteOptions := [eoAsyncFetch];//设为异步读取end;//ADOQuery的OnFetchProgress事件procedure TForm1.ADOQuery1FetchProgress(DataSet: TCustomADODataSet; Progress, MaxProgress: Integer; var EventStatus: TEventStatus);begin ProgressB
阅读全文
摘要:Fastreport使用经验(转) 在Delphi程序中访问报表对象最基本的方法就是frxReport1.FindObject。然后把返回的对象强制转换成它的类型,当然,在报表中必须真的有这么个东东。如改变一个Tfrxmemoview的内容,可以这样写TfrxMemoView(frxReport1.FindObject('memo1')).Text:='jade';还可以用TfrxReportPage的FindBand方法,这个方法的参数是Band类,如报表抬头就可以直接使用这个方法,因为抬头一个页中只有一个,如果有多个同样的类。则不能使用这种方法。如果要使用T
阅读全文
摘要:cxgrid 双击 获取所点击行的内容创建view的 optionsselection->cellselect 设置为false ,才能触发双击事件案例:procedure TForm_Child_Archive.cxGrid1DBTableView1CellDblClick( Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);begin3 ////取得
阅读全文
摘要:我有一个问题请教:我在BDEQUERY中使用其FILTER属性进行条件筛选时一切正常,但相同的条件拿到ADOQUERY中使用就出现错误,具体情况如下:1、BDEQUERY和ADOQUERY指向同一个数据库,其中的SQL语句相同;2、筛选条件如果是以下类型的情况都正确: (字段1= 'AAA ') (字段1= 'AAA ') OR (字段1= 'BBB ') (字段1= 'AAA ') AND (字段2= 'TTT ')3、但当出现此类情况时就会出错: ((字段1= 'AAA ') OR (字段1=
阅读全文
摘要:Delphi 2007 代码补全、语句提示的快捷键是什么?CTRL+SPACE 代码补全,很好用的(先改了输入法热键) CTRL+SHIFT+C 编写申明或者补上函数 CTRL+SHIFT+↑(↓) 在过程、函数、事件内部, 可跳跃到相应的过程、函数、事件的定义(在INTERFACE和IMPLEMENTATION之间来回切换) CTRL+SHIFT+G 插入GUID CTRL+J (弹出DELPHI语句提示窗口,选择所需语句将自动完成一条语句)代码模板 CTRL+K+E(F) 标识符变小(大)写 CTRL+K+O(N) 选中的变小(大)写 CTRL+O+U 切换选择块的大小写 SHIFT+鼠标
阅读全文
摘要:Delphi中使用存储过程介绍Delphi + MS SQL Server是目前最为流行的管理信息系统开发环境和工具。Delphi的强大数据库操作控件极大地减轻了开发人员的工作量,在这些控件中,最常用的有 TQuery、TTable、TADOQuery、TADOTable、TADODataSete等,这些控件执行查询操作时有一个共同的特点,即将所有数据库记录从服务器取回客户端,再根据查询的条件进行筛选。很明显,如果有大量的数据在服务器与客户端之间传递,就会降低程序执行的速度,影响应用程序的性能。针对这种情况,MS SQL Server数据库和Delphi开发工具都提供了存储过程来解决这类问题。
阅读全文
摘要:在IDE中输入控件的名称+. 就会弹出代码完成提示,会列出该控件的所有属性、方法等,也许你对代码完成就是这样的印象,其实它还有一些好用的功能,只不过由于它的激活快捷键也是ctrl+space,与我们的中英输入法切换快捷键冲突才没有显露出来,我强烈建议大家把中英输入法切换快捷键改为其它,以使用完整的代码完成功能,下面是一些代码完成功能的演示动画,看看,很酷吧!呵呵,再实现接口时接口定义的方法可以直接过来了,真好用。处理消息时也很方便,消息的定义自动就上去了这功能没见过吧,很有趣也可以直接定位到方法的实现代码引用单元时也不用死记硬背了,也可以选了
阅读全文
摘要:Delphi编程地一些小程序1、用Enter键代替Tab键在实际的程序开发中我们经常有这样的要求,用户不喜欢用Tab键,他希望用Enter键来代替。我们应该什么做呢?首先:设定Form的KeyPreview属性为True。其次:把Form上的所有Button的Default属性设为False。最后:在Form的onKeyPress事件中添加如下代码:procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then begin Key := #0; Perform(Wm_NextDlg..
阅读全文
摘要:Python - 开始使用Python编程Python is a programming language that lets you work more quickly and integrate your systems more effectively. You can learn to use Python and see almost immediate gains in productivity and lower maintenance costs.在我使用Ubuntu做为我的操作系统以来,根据我的体会上面说的没错。功能强大,简单灵活的脚本语言。即使你使用windows搭建Pyt
阅读全文
摘要:Python 编程艺术1. Python 编程艺术享受高效无误且充满乐趣的编程2. def hello(): print hello world!3. 什么样的函数返回 None?4. 没有消息就是最好的消息5. 对许多有经验的程序员来说True / 1 并不是执行成功的意思6. None 是最好的沉默 虽然 0 也不错,然而在 Python 中默认的返回值是 None7. 函数不能既返回结果 又返回错误8. 瘆人的设计“如果 open() 返回 errno”try: fileobj = open(filename)# 虽然 open 能返回错误,但不能保证所有都捕获了啊# 所以还是 catc
阅读全文
摘要:sql 2005基础语法总结目录基础查询...4Select语句查询....41.查询单列数据...42查询所用列数据...43.查询指定的列数据...44.在查询时使用别名...5简单条件查询....51.相等条件查询...52.不等于条件查询...53.大于或小于条件查询...54.查询数值区间数据...55.And运算符查询(最好不多于3个...56.OR运算符(不要过多)...57.And运算符与or预算福组合查询(and优先级高于or)...6模糊查询....61.(%【不计字符个数】,_【一个字符】通配符)...62.[]通配符进行模糊查询...6日期查询....61.查询指定日期
阅读全文
摘要:数据库SQL 基础(总结)请注意,我们在例子中的条件值周围使用的是单引号。SQL 使用单引号来环绕文本值(大部分数据库系统也接受双引号)。如果是数值,请不要使用引号。文本值:这是正确的:SELECT * FROM Persons WHERE FirstName='Bush'这是错误的:SELECT * FROM Persons WHERE FirstName=Bush数值:这是正确的:SELECT * FROM Persons WHERE Year>1965这是错误的:SELECT * FROM Persons WHERE Year>'1965'2.
阅读全文
摘要:【数据库】数据库基础一、SQL语句(1)Select 查询语句 语法:SELECT [ALL|DISTINCT] <目标列表达式> [AS 列名][,<目标列表达式> [AS 列名] ...] FROM <表名> [,<表名>…] [WHERE <条件表达式> [AND|OR <条件表达式>...] [GROUP BY 列名 [HAVING <条件表达式>]] [ORDER BY 列名 [ASC | DESC]] 解释:[ALL|DISTINCT] ALL:全部 DISTINCT:不包括重复行 <目标列表
阅读全文
摘要:Windows界面设计标准1.1.Windows界面设计标准1.1.1.易用性l界面元素的名称、标签应该易懂,用词准确,避免使用模楞两可的字眼,要与同一界面上的其他元素易于区分,能望文知意最好。理想的情况是用户不用查阅帮助就能知道该界面的功能并进行相关的正确操作作。•disable而不是not visible。•完成相同或相近功能的按钮用GoupBox框起来,常用按钮要支持快捷方式。•完成同一功能或任务的元素放在集中位置,减少鼠标移动的距离。• 按功能将界面划分局域块,用GoupBox框括起来,并要有功能说明或标题。•界面要支持键盘自动浏览按钮功能,即按Tab键的自动切换功能。•界面上首先应.
阅读全文
摘要:sql 同时实现行转列和列转行 select Name,序号,类型,[1月]=MAX(case when Month=1 then Value end),[2月]=MAX(case when Month=2 then Value end),[3月]=MAX(case when Month=3 then Value end)from (select Name,Month,'序号'=1,'类型'='吃饭',Meet as Value from aaaunion allselect Name,MONTH,'序号'=2,'类型&#
阅读全文
摘要:Delphi控制输入为数字或字母Delphi 控制输入为数字或字母if not (Key in ['0'..'9', 'a'..'z', 'A'..'Z', #8, #13]) thenbegin Key := #0; ShowMessage('请输入数字或字母');end;
阅读全文
摘要:Delphi中动态加载Image控件图片的方法作者:海豚王子procedure TForm1.Button1Click(Sender: TObject);var jpg: TJPEGImage; // 要use Jpeg单元begin // 显示jpg大图片的方式 jpg := TJPEGImage.Create; jpg.LoadFromFile(getcurrentdir() + '\pic.jpg'); Image1.Picture.Bitmap.Assign(jpg); // 因为 img 控件是基于bmp的 jpg.Free;end;procedure TForm1.
阅读全文
摘要:TClientDataSet的使用技巧本文从以下几个方面阐述TClientDataSet的使用,希望对你有所帮助.1.动态索引procedure TForm1.DBGrid1TitleClick(Column: TColumn);beginif (not column.Field is Tblobfield) then//Tblobfield不能索引,二进制ClientDataSet1.IndexFieldNames:=column.Field.FieldName;end;2.多层结构中主从表的实现设主表ClientDataSet1.packetrecord为-1,所有记录设从表ClientD
阅读全文
摘要:SQL触发器作者:海豚王子一、创建一个简单的触发器触发器是一种特殊的存储过程,类似于事件函数,SQL Server? 允许为 INSERT、UPDATE、DELETE 创建触发器,即当在表中插入、更新、删除记录时,触发一个或一系列 T-SQL语句。触发器可以在查询分析器里创建,也可以在表名上点右键->“所有任务”->“管理触发器”来创建,不过都是要写 T-SQL 语句的,只是在查询分析器里要先确定当前操作的数据库。创建触发器用CREATE TRIGGERCREATE TRIGGER 触发器名称ON 表名FOR INSERT、UPDATE 或 DELETEAST-SQL 语句注意:触
阅读全文
摘要:Delphi编程防止界面卡死的方法作者:海豚王子1.循环里面防止界面卡死的方法可以使用Application.ProcessMessages; 例如下列方法: var n:Integer;begin for n := 0 to 10000 dobegin Edit1.Text := IntToStr(n); end; end; 在程序里执行的时候,界面肯定会卡死的,但如何防止界面出现卡的情况呢,加入Application.ProcessMessages即可,修改后的代码为: var n:Integer;begin for n := 0 to 10000 dobegin Application.
阅读全文
摘要:CxGrid用法使用cxGrid有一些时间了,在这里总结一下使用cxGrid的一些方法,希望给刚开始接触cxGrid的人一些帮助。1.简单介绍:cxGrid右下方的cxGrid1Level1是表示Grid表的层,cxGrid可以有多层,这相当于集合了PageControl的功能,而cxGrid1Level1右边的cxGrid1DBTableView1相当DBGrid一样。右击cxGrid1可以添加cxGrid1Level2,右击cxGrid1Level2,可以选择Create View , Add level 或者Delete Level。Add level可以增加子Level,Create
阅读全文
摘要:FastReport几个使用技巧1.FastReport中如何共用TFrxreport及TfrxDBDataSet一个程序中,不管多么大的程序,只要打印或预览时是模式的,则完全可以共用一个TFrxreport变量及几个TfrxDBDataSet。只不过,要注意完成一个报表程序的步骤,主要是下面几步1)清除报表,得到一个全新的报表内容。 Frxreport1.clear。2)设置要使用的TfrxDBDataSet的别名,如果不需要可以省略这一步,但一般最好不同的报表用不同的别名。 注意这一步要在加载报表文件之前,因为一般设计报表文件时已经包含了别名信息。 frxDBDataSet1.Use...
阅读全文
摘要:cxGrid使用技巧http://www.cnblogs.com/colincode/category/257535.html
阅读全文
摘要:FastReport经验1.FastReport中如果访问报表中的对象?可以使用FindObject方法。TfrxMemoView(frxReport1.FindObject(’memo1′)).Text:=’FastReport’;2.FastReport中如何使用上下标?设置frxmemoview.AllowHTMLTags := True;在Text输入如下上标:mm<sup>2</sup>下表:k<sub>6</sub>举一反三,你还可以使用其他HTML标记。3.FastReport中如何打印总页数?设置两次报表后加入引号内内容 “第[P
阅读全文
摘要:FastReport报表控件使用技巧总结1.FastReport中如何访问报表中的对象?可以使用FindObject方法。TfrxMemoView(frxReport1.FindObject('memo1')).Text:='FastReport';2.FastReport中如何使用上下标?设置frxmemoview.AllowHTMLTags:= True;在Text输入如下上标:mm<sup>2</sup>下表:k<sub>6</sub>举一反三,你还可以使用其他HTML标记。3.FastReport中如何打印
阅读全文
摘要:Fastreport使用经验(转)新版本1.FastReport中如果访问报表中的对象?可以使用FindObject方法。TfrxMemoView(frxReport1.FindObject(’memo1′)).Text:=’FastReport’;2.FastReport中如何使用上下标?设置frxmemoview.AllowHTMLTags := True;在Text输入如下上标:mm<sup>2</sup>下表:k<sub>6</sub>举一反三,你还可以使用其他HTML标记。3.FastReport中如何打印总页数?设置两次报表后加入引号
阅读全文
摘要:ExpressLayoutControl2http://www.docin.com/p-159817277.html
阅读全文
摘要:delphi下实现ribbon界面的方法(一)office 2007和2010是现在大多数人经常使用的办公软件,几乎每天都在使用。因此,在软件中如果使用类office的界面样式,客户用着非常习惯,而且学习曲线低,office界面特有的可以收起工具栏的性质,也增大了用户的界面内容,因此,非常受广大用户的喜欢。 那么我们能不能也作出这么好的界面呢?答案当然是肯定的。这种界面的样式叫ribbon,中文名称叫丝带。在VS2010中,VC++和wcf都给ribbon的开发提供了非常好的支持,vc++下更是提供了一个完整的向导,可以作出非常漂亮的界面。但是由于。net下开发的应用程序,因为发布时需要,ne
阅读全文