`
znhyz1
  • 浏览: 155042 次
  • 性别: Icon_minigender_1
  • 来自: 天津
社区版块
存档分类
最新评论
文章列表
function GetPYIndexChar( hzchar:string):Char; begin case WORD(hzchar[1]) shl 8 + WORD(hzchar[2]) of $B0A1..$B0C4 : result := 'A'; $B0C5..$B2C0 : result := 'B'; $B2C1..$B4ED : result := 'C'; $B4EE..$B6E9 : result := 'D'; $B6EA..$B7A1 : result := 'E'; $B7A2..$B8C0 : re ...
function GetComputerName:String; //获取计算机名称 var wVersionRequested : WORD; wsaData : TWSAData; p : PHostEnt; s : array[0..128] of char; begin try wVersionRequested := MAKEWORD(1, 1); //创建 WinSock WSAStartup(wVersionRequested, wsaData); //创建 WinSock GetHostName(@s,128); ...
var i: Integer; Column: TcxGridDBColumn; cxView: TcxGridDBTableView; begin cxView := Self.Levels[0].GridView as TcxGridDBTableView; if cxView.DataController.DataSource <> nil then if cxView.DataController.DataSource.DataSet <> nil then begin cxView.ClearIte ...
一、数据录入 1、 在TcxGridDBTableView中,设定属性 NewItemRow.Visible = True   2 、在cxgrid中输入数据怎样回车换行     在TcxGridDBTableView中设置属性 OptionsBehavior.FocusFirstCellOnNewRecord = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True   就可以了.如果愿意也可以添加其自带的操作按钮,OptionsView.Nav ...
Delphi连接Oracle有很多种方式,但大多要在客户机上安装Oracle那庞大的客户端,比较的不方便,使用ODAC控件连接Oracle则免去了这等麻烦.ODAC也是Oracle公司开发的控件.有for Delphi 6- Delphi 2007的版本,最新的ODAC版本已经到了ODAC 11.1.0.6.21版本了,不过对于我们来说,版本不一定要最新的,够用最好,不是么? Oracle 数据访问组件 (ODAC), 全称:Oracle Data Access Components, Oracle 数据存取组件(ODAC) 库为Borland Delphi,C++ Builder 以及 Ky ...
Delphi控件RzSizePanel的打开与关闭的方法 RzSizePanel1.CloseHotSpot; //关闭 RzSizePanel1.RestoreHotSpot;//打开   

Delphi 显示图片

      我們知道BLOB在数据库的表中实际上是以二进制数据的形式存放的。由于BLOB的特殊性,一般的程序都无法处理它。比如,如果在一张表中存在BLOB, 当用數據顯示控件打开它时,BLOB列将只显示BLOB字样。至于该列中实际存的是什么数据是一般的數據顯示控件无法知到的。如果在我们编制的程序中,用 DBGrid控件打开一个有BLOB字段的表,效果也一样。我们的程序无法直接显示、编辑以及插入BLOB字段。可见,常规的方法是不能满足要求的。       既然我們知道數據以二進制形式存放,那麼就可以通过内存流来完成。使用内存流,可减少磁盘操作,從而大大提高运行效率。程序的實現代碼如下(以Delph ...
这片文章转自CSDN某博客,以前用Free和freeAndNil比较多,但没细分析过。看完以后觉得对自己也很有启发。博主也是转自别处,我当了一次二传手。 ------------------------------------------------------------------------------------------------------------------------------ 最近在集成ZJ的模块的时候,发现当窗体关闭的时候,频繁的弹出内存访问错误,实在是烦躁啊,看了下代码,虽然很惨,但也没发现创建对象需要释放的问题,最后看到窗体关闭的时候,执行了一大段代码,考虑 ...
一、IDHTTP的基本用法   IDHttp和WebBrowser一样,都可以实现抓取远端网页的功能,但是http方式更快、更节约资源,缺点是需要手动维护cook,连接等 IDHttp的创建,需要引入IDHttp procedure InitHttp(); begin http := TIdHTTP.Create(nil); http.ReadTimeout := 30000; http.OnRedirect := OnRedirect; http.Request.Accept := 'image/gif, image/x-xbitmap, im ...
function GetComputerNameEx: string; //获取本机名称 var ComputerName: PChar; size: DWord; begin GetMem(ComputerName, 255); size := 255; // 获取计算机名称 if GetComputerName(ComputerName, size) = False then begin result := ''; FreeMem(ComputerName); Exit; end; resul ...
在cxGrid的GridView属性设置事件onGridCustomDrawIndicatorCell,事件关键代码如下:   procedure TfrmHidden_Trouble.GridCustomDrawIndicatorCell( Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGridIndicatorItemViewInfo; var ADone: Boolean); var AIndicatorViewInfo: TcxGridIndicatorRowItemViewIn ...
1、控件ClientDataSet的属性IndexFieldNames      这个属性是按照正序排序,多个排序用;号隔开。例如:ID;NAME。 2、控件ClientDataSet的属性IndexDefs      这个属性可以设置正序和逆序。直接点击...新建一索引(如cdsIndex),在索引Fiels属性输入要排序的字段(如ID或ID,NAME),然后在件ClientDataSet的属性IndexName填入新建的索引(如cdsIndex)。若想倒叙还得将索引中的属性Options-->ixDescending值设置为True。
硬盘全新安装windows2008(实践证明XP用此种方法也更加方便): 1、下载windows 2008ISO镜像(RC或RTM),用虚拟光驱拷贝至非C盘(如D:\2008) 2、复制D:\2008文件夹中的Boot、EFI、sources文件夹和bootmgr至C盘根目录下 3、复制D:\2008\boot下Bootsect.exe至C盘根目录下 第2部需取得管理员权限 4、管理员身份运行cmd,输入c:\bootsect.exe/nt60 c:并回车(最好复制,中间有空格) 5、重启系统自动进入安装界面,点左下角的修复计算机repair my computer) 6 ...
Subversion安装、配置与使用 一、Subversion的安装与测试 Subversion的配置方式有很多种,同时也可以配置不同的操作系统之上,本文我讲解的是Subversion 1.6.15 for Apache2.2.17在Windows下的安装,通过与Apache的集成,Subversion可以采用Web Htt ...
/bin 二进制可执行命令 /dev 设备特殊文件 /etc 系统管理和配置文件 /etc/rc.d 启动的配置文件和脚本 /home 用户主目录的基点,比如用户slyar的主目录就是/home/slyar,可以用~slyar表示 /lib 标准程序设计库,又叫动态链接共享库,作用类似windows里的.dll文件 /sbin 系统管理命令,这里存放的是系统管理员使用的管理程序 /tmp 公用的临时文件存储点 /root 系统管理员的主目录(呵呵,特权阶级) /mnt 系统提供这个目录是让用户临时挂载其他的文件系统。 /lost+found 这个目录平时是空的,存储系统非正常关机而留下的“碎片” ...
Global site tag (gtag.js) - Google Analytics