
delphi7中的基本语言
云中雁012345
路漫漫其修远兮
吾将上下而求索
展开
-
delphi7中的数组和记录类型
program Project1;{$APPTYPE CONSOLE}uses SysUtils;{ 基本语法学习 }{ 数组类型}type TArr = array[0..10,0..9] of Integer; {定义一个记录型} Trec = record name:string[10]; sex:string[2]; age:Integer;原创 2013-12-10 11:50:25 · 3425 阅读 · 0 评论 -
delphi socket使用心得
下面的代码中包含了一个消息接收器,当消息接收器收到消息后,将socket,收到的消息,状态,封装成对象,保存到tstringlist中,stringlist.strings[0]里面保存了对象的ID(也就是命令的序号,从1..X);然后放一个定时器,定时器1S中去查看命令列表;把第一条命令的stringlist.strings[0]设置为‘0’,如果定时器检查到第一条的这个标志是0,则退出,不处理原创 2016-02-24 15:37:07 · 2256 阅读 · 0 评论 -
在FastReport2.8中打开frf文件,选择另存为fr3文件,这时FastReport4是不能打开该文件的。按下述步骤调整:
在FastReport2.8中打开frf文件,选择另存为fr3文件,这时FastReport4是不能打开该文件的。按下述步骤调整: 使用记事本打开该fr3文件。1.将所有 Tfr 替换为Tfrx2.将所有 Memo.text 替换为Text3. 替换为空4.控件中文改英文(主要是“标题”,“主项数据”,“合计”等)5.如使用TfrxRoundRec原创 2015-11-21 14:42:15 · 4905 阅读 · 1 评论 -
环境互换
echo offclsreg delete HKCU\Software\Borland /fecho 1.启动 3000+ 开发环境echo 2.启用 ERP3 开发环境echo 请输入你的选择并按回车结束set /p a=clsif "%a%"=="1" goto aif "%a%"=="2" goto b:areg import D:\regedi原创 2015-07-08 16:54:10 · 487 阅读 · 0 评论 -
abort与Exit的区别
对于一个用C++写的程序,被加载至内存后运行,最终走向死亡。程序的死亡大致有三种:自然死亡,即无疾而终,通常就是main()中的一个return 0;自杀,当程序发现自己再活下去已经没有任何意义时,通常会选择自杀。当然,这种自杀也是一种请求式的自杀,即请求OS将自己毙掉。有两种方式:void exit(int status)和void abort(void)。他杀,同现实不同的是,程序原创 2014-08-21 11:01:13 · 1084 阅读 · 0 评论 -
Raize控件的GradientColorStyle的MSOFFICE属性怎么设置的
Use GradientColorStyle to specify how gradient color values are obtained for the control.DescriptionGradientColorStyle properties are active when the control's VisualStyle property is set to v原创 2014-05-19 00:56:53 · 860 阅读 · 0 评论 -
如何打开.DB文件
各位大虾,如何在Delphi中打开 ".DB"扩展名的数据库文件? [问题点数:100分,结帖人sunon] 不显示删除回复 显示所有回复 显示星级回复 显示得分回复 只显示楼主 收藏sunonsunon等级:结帖率:100%楼主发表于:原创 2014-02-12 09:55:21 · 3236 阅读 · 0 评论 -
delphi7中的局部变量和全局变量
局部变量时声明在function或procedure里面的,不可以初始化全局变量是声明在implemention后面的。可以初始化,但前提条件是不能同时声明多个变量;全局变量默认的出师值为0;局部变量默认的初始值根据类型的不同而不同;原创 2014-01-15 15:02:53 · 2495 阅读 · 0 评论 -
delphi中如何给工程文件重新命名
如果想改exe可执行文件的名字,直接打开文件夹进行修改;如果想修改工程文件的名字,直接打开dpr文件,打开如下:program pxb;uses System;{$APPTYPE CONSOLE}var s:string = '2^20100230210'; str: string;begin str:=Copy(s,Pos('^',s)+1 ,Le原创 2014-01-10 09:20:17 · 4485 阅读 · 0 评论 -
delphi7中的动态窗体创建
TModalResult代表模式窗口的返回值Constant ValueMeaningmrNone 0 None. Used as a default value before the user exits.mrOk idOK The user exited with OK button.mrCancel idCancelThe user exit原创 2014-01-08 09:35:06 · 1622 阅读 · 0 评论 -
delphi7中的指针
1.指针分为3中,一种是普通的,一种是无类型的,一种是标准的(系统预定义的);下面直接以案例来说明他们的用法;原创 2013-12-10 10:36:01 · 1623 阅读 · 0 评论 -
delphi7 经过测试的 md5 加密解密
研究了1天。一直对不上。最后是字符集的问题。 给点分吧:源代码下载地址:请查看我上传的资源。 在里面找 md5 delphi7点击打开链接原创 2016-02-27 12:36:34 · 5710 阅读 · 0 评论