Delphi未了情

delphi Try except on e:Exception do

exceptone:Exceptiondo//判断单位转换率tryum_rate:=vp_mstr.F('vp_um_rate_d').AsFloat/vp_mstr.F('vp_um_rate_m').AsFloat;ifum_rate1)thenabortelseif(vp_mstr.F('vp_um').AsString<>vp_mstr.F('part_um').AsString)and(
魔鬼操盘手训练营·2020-08-09 22:28

Delphi异常处理总结

Delphi异常处理总结以前写delphi程序一直不注意异常处理，对其异常处理机制总是一知半解，昨天程序中的一个bug，让我对异常有了更深入的认识，必须要对可能产生异常的地方进行异常处理，否则可能给程序造成灾难
落幕年代·2020-08-09 21:03

当发生异常时，怎样能不让‘delphi的异常提示框出现’而出现自己的‘异常提示框’？

===========================================不要用f9直接运行,这样出不来自己的提示,要执行exe文件对我有用[0]丢个板砖[0]引用举报管理top精华推荐:delphi2007
javazhuanzai·2020-08-09 21:39

增强Delphi程序安全性的几个想法,提高反破解能力

“破解”在今天已经大行其道，作为开发者用得较多的Delphi，由于有其实现的特殊性，破解方式与MFC大不相同,但是在DEDE出现以后,Delphi程序的破解就变得容易起来.结合本人在开发与破解中的经验,
hydonlee·2020-08-09 21:30

delphi中nil的用法

delphi中nil的用法和C++中的NULL一样的意思，指空值，它和0值不一样～～nil就是空指针～～指针表示的就是内存的一个地址～～（数据存放位置）～～nil就表示空地址～～例如:说对一个TImage
seagull327·2020-08-09 21:43

Delphi异常处理与调试

Delphi异常处理与调试3.1Delphi异常处理3.1.1异常处理的意义所谓异常，可以理解为一种特殊的事件。当这种特殊的事件发生时，程序正常的执行流程将被打断。
seagull327·2020-08-09 21:43

Delphi——FindFirst学习

Delphi——FindFirst学习FindFirst在SysUtils中声明原型为FucntionFindFirst(constPath:String;Attr:Integer;VarF:TSearchRec
god00·2020-08-09 20:46

尚未调用 CoInitialize

调用了com,ole函数库前就要coinitialize,因为在应用程序中，delphi会自动在initialize单元加上对co...函数的调用，在dll中要自己调用。
genispan·2020-08-09 20:58

delphi DataModule1 使用方法

数据显示页面：unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,Grids,DBGrids,DB,ADODB,StdCtrls,DBCtrls,ExtCtrls;typeTForm1=class(TForm)DBGrid1:TDBGrid;Button1
潇湘博客·2020-08-09 20:55

利用DELPHI中Canvas绘图

Delphi中也有一个与CDC相类似的类Tcanvas,它封装了Delphi中的绘图函数。我们可以把Delphi和VC中相同或相近的方法做个有趣的比较。（一）Can
学海方舟·2020-08-09 20:40

Delphi 中自定义异常及异常处理的一般方法

delphi中异常定义如下：TCustomException=class(Exception)privatepublicconstructorCreate(constMsg:string);end;在一般的编程中
一剑平江湖·2020-08-09 20:34

Delphi 文件查找函数

{---------------------------------------文件查找函数SearchFile参数说明:sFileName:要查找的文件名称sRootDir:指定在哪个目录中查找bFileOnly:是否只查找文件bRecurse:是否查找子目录返回值:FileList:查找结果列表----------------------------------------}functionS
cuiweigk19423·2020-08-09 20:52

delphi关闭程序有几种方法

delphi关闭程序有几种方法？在Delphi中，对于的关闭有free,close,closeQuery,Destroy,Terminate,halt等，它们的区别是什么？是不是还有别的关闭方法？
豫新·2020-08-09 20:25

delphi tyr except截获错误异常类名并替换例子

 procedureTForm1.Button1Click(Sender:TObject);begin try  adoquery1.Post; except  //showmessage('有重复数值或者空白行或其它错误，请检查！');  //adoquery1.Cancel;   onE:exceptiondo  //这里返回e.mesage系统自己提示信息,下面也可替换掉    begin 
皮卡·2020-08-09 20:48

Delphi 设置启动项

usesRegistry;procedureTForm1.Button1Click(Sender:TObject);constsKey_MACHINE:array[0..7]ofstring=('SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon\Userinit','SOFTWARE\Microsoft\Windows\CurrentVers
aTian2009·2020-08-09 19:01

Delphi 得到文件夹大小

functionTForm1.getdirsize(dir:string;subdir:boolean):longint;varrec:TSearchRec;found:integer;beginresult:=0;ifdir[length(dir)]0)and(rec.Name[1]'\'thendir:=dir+'\';found:=findfirst(dir+'*.*',faAnyFile,
aTian2009·2020-08-09 19:01

delphi 删除指定文件夹下所有文件

functionTForm1.DeleteDirectory(NowPath:string):Boolean;//删除整个目录varsearch:TSearchRec;ret:integer;key:string;beginifNowPath[Length(NowPath)]'.')and(search.namefadirectory)thenbegindeletefile(NowPath+sea
aTian2009·2020-08-09 19:01

delphi 使用INF文件

转自http://blog.csdn.net/g_min/article/details/3874764Ifyouneedtoinstallan"inf"fileusingDelphi,youcouldusethenextcode
aTian2009·2020-08-09 19:01

delphi 图片保存，装载

TABLE1：STUDENT，图片的字段为PIC，关键字段NUM有2个数据集TAdoquery.ADOQuery1.sql.text:='select*fromstudent'ADOPIC.sql.text:='selectnum,picfromstudentwherenum=:num'-----------------------------------------装载图片functionTFo
aTian2009·2020-08-09 19:01

Delphi Package无痛使用

作者：DevenTzu日期：Sep-3-2001相信很多使用Delphi的人都有想过将自己的应用系统分割成好几个Package,这样的好处是可以只更新单一的Package(.BPL)就可以了,而且.BPL
一枚老猿·2020-08-09 19:22

Delphi异常处理try except语句和try finally语句用法以及区别

一、异常的来源在Delphi的应用程序中，下列的情况都比较有可能产生异常。
几百人在爱·2020-08-09 18:32

delphi中try的用法1

try...except..end;查询异常tryedHH.Visible:=False;ListBox.Visible:=notedHH.Visible;listBox.Clear;I:=0;whilenotEofdobeginSendToExeLog('H11');listBox.Items.Add(IntToStr(ZSBID)+''+ZNAME);setlength(myPP,i+1);m
weixin_34167819·2020-08-09 18:46

【转载】Delphi异常处理try except语句和try finally语句用法以及区别

Delphi异常处理tryexcept语句和tryfinally语句用法以及区别一直写程序都没管他们,也尽量很少用,今天终于想把他给弄个明白,在网上找来,记下!
weixin_30710457·2020-08-09 17:35

delphi try except语句 和 try finally语句用法以及区别

try//尝试执行{SomeCode}except//出错的时候执行,Except有特定的错误类型{SomeCode}end;try//尝试执行{SomeCode}finally//无论如何都强制执行{SomeCode}end;例:tryAge:=StrToInt(Edit1.Text);ShowMessage(Format('生于%d年',[YearOf(Now)-Age]));excepton
seagull327·2020-08-09 17:23

delphi下文件查找findfirst

FindFirst是用来寻找目标目录下的第一个文件，FindFirst函数在delphi帮助下的定义:functionFindFirst(constPath:string;Attr:Integer;varF
aTian2009·2020-08-09 17:21

Delphi DataModule使用方法

数据显示页面：unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,Grids,DBGrids,DB,ADODB,StdCtrls,DBCtrls,ExtCtrls;typeTForm1=class(TForm)DBGrid1:TDBGrid;Button1
aTian2009·2020-08-09 17:49

delphi中Try...Except 语句和Try...Finally 语句

在Try...Except语句中可以进行抛出异常和处理异常的工作。Try...Except的一般形式如下：tryStatements1;exceptonException1doHandleStatements1;onException2doHandleStatements2;⋯onExceptionNdoHandleStatementsN;elseStatements2;end.对于有些操作，在异
aTian2009·2020-08-09 16:57

delphi 合并多个excel

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,OleServer,ComObj,Clipbrd,Buttons,ShellAPI;//务必加入ComObjtypeTForm1=class(TForm)btn3:TButton;btn
黑贝是条狗·2020-08-09 16:47

Delphi 使用HLP文件制作系统的帮助文档

Delphi应用程序能够方便地应用帮助系统。下面介绍应用程序动态地运行帮助系统的方法。2、HLP文件的结构：HLP（MicrosoftH
爱在丽江leslex·2020-08-09 16:14

Webbrowser内存泄漏解决方案（修改OleCtrls.pas）

Delphi使用Webbrowser引起内存泄漏的原因是在OleCtrls.pas单元GetIDispatchProp和GetIntegerProp函数于对COM对象引用计数的错误处理上。
xiejianjun·2020-08-09 16:34

java 异常、断言和日志

Java中的异常处理与C++和Delphi中的异常处理十分类似。
Q2294365315·2020-08-09 14:37

delphi 合并两个 Wav 文件流的函数

合并两个Wav文件的函数实例一unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls;typeTForm1=class(TForm)Button1:TButton;procedureButton1Click(Sender:TObject);e
weixin_33699914·2020-08-09 14:34

关于 Delphi 中流的使用(9) 分割与合并文件的函数

varForm1:TForm1;implementation{$R*.dfm}//分割文件的函数{参数1是要分割的文件名;参数2是要风格文件的大小,单位是KB}{分割后的文件名扩展名用序号替换}functionSplitFile(constFileName:string;Size:Cardinal):Boolean;varfStream:TFileStream;{原始文件}toStream:TMe
weixin_30802171·2020-08-09 13:37

delphi 中 使用 TIdHTTP 提交Post数据

varfhttpRequest:TIdHTTP;PostData:TStringStream;tmpStr:String;beginfhttpRequest:=TIdHTTP.Create(nil);withfhttpRequestdobeginProtocolVersion:=pv1_1;AllowCookies:=True;ProxyParams.BasicAuthentication:=Fa
李正己·2020-08-09 13:10

Delphi警告 [dcc32 Hint] H2161 Warning: Duplicate resource

在使用Delphi编译是出现如下的警告[dcc32Hint]H2161Warning:Duplicateresource:Type10(RCDATA),IDPLATFORMTARGETS;File***
李正己·2020-08-09 13:10

使用indy 9发送邮件支持SSL选项，gmail测试通过

选项，Gmail,yahoo等，indy9.0的idsmtp组建不能直接支持SSL发送，从indy的官方网站（http://www.indyproject.org）上查询了资料，需要进行下面的设置1、在delphi7
李正己·2020-08-09 13:10

delphi 剪贴板操作，读取剪贴板内容

//全局变量NextClipHwnd:HWND;//剪贴板观察链中下一个窗口句柄procedureTForm1.FormShow(Sender:TObject);begin//获得剪贴板观察链中下一个窗口句柄，并将句柄注册到剪贴板观察链中NextClipHwnd:=SetClipBoardViewer(Handle);end;procedureTForm1.FormClose(Sender:TOb
李正己·2020-08-09 13:10

DBGridEh多国语言支持

EhLib多国语言支持，在9.0版本之前，使用的跟Delphi官方推荐的一样，使用Resourcestring和dfm实现多国语言。
李正己·2020-08-09 13:10

Delphi 下的Base64编码和解码

functionBase64Encode(s:string):string;//base64编码varbase64:TIdEncoderMIME;tmpBytes:TBytes;beginbase64:=TIdEncoderMIME.Create(nil);trybase64.FillChar:='=';tmpBytes:=TEncoding.UTF8.GetBytes(s);Result:=ba
李正己·2020-08-09 13:10

Delphi 简单的文本文件操作

Delphi操作文件的方法有好多种，包含ini文件，二进制文件，文本文件。这里介绍代码最少的文本文件的操作。
李正己·2020-08-09 13:10

Delphi 自带的字符串分割函数split

下面介绍Delphi自带的字符串分割函数，根据你的需要来使用。
李正己·2020-08-09 13:10

Delphi中GetCurrentDir使用注意事项

Delphi中的GetCurrentDir,取得当前路径,但是在使用的时候会有一个误区。
娃娃鸭·2020-08-09 13:32

《java核心技术卷Ⅰ》第七章：异常、断言和日志

Java中的异常处理与C++或Delphi中的异常处理十分类似。本章的第1部分先介绍Java的异常。在测试期间，需要进行大量的检测以验证程序操作的正确性。
水木今山·2020-08-09 11:56

合并Dev BPL教程

download.csdn.net/user/rfjbco，共用个包，下载后解压,程序目录已带有DxAutoInstaller2.DxAutoInstaller最新版下载地址http://developer.team/delphi
qq_18932003·2020-08-09 10:30

Delphi开发Windows服务程序

Delphi开发Windows服务程序教程开发步骤:1、New->Other->ServiceApplication2、现在一个服务程序的框架已经搭起来了，打开Service1窗口，有几个属性说明一下：
onebigday·2020-08-09 10:27

Delphi BPL包的运用

一、关于包（package）（一）编译ＥＸＥ文件的两种模式通常编译一个DELPHI应用程序时，生成一个EXE文件，也就是一个独立的WINDOWS应用程序。这个EXE文件，它有两种编译方式。
lyhoo163·2020-08-09 09:52

Delphi学习总结

经过近两周的学习，基本掌握了Delphi开发的方法和步骤，经过做一个“仓库管理系统”，基本上理解并掌握Delphi和数据库的关系，及数据库和一些组件的实现方法。
lishan1998·2020-08-09 09:08

用Delphi制作BPL包

用Delphi制作BPL包2007-6-21背景GCM3构造时间长的问题由来已久。伴随着时间的流逝，系统功能越来越强大，模块越来越多，目前仅GCM一项，需要编译的客户端dll达389个之多。
落幕年代·2020-08-09 09:15

delphi中关于bpl发布时将vcl60.bpl，vcldb60.bpl......等多个bpl 打包成一个bpl的方法=====转帖收藏

关于bpl发布时将vcl60.bpl，vcldb60.bpl......等多个bpl打包成一个bpl的方法。或者说：不需要vcl60.bpl情况下18.5K的exe照常可以运行。或者说：Buildwithruntimepackages的时候只使用自己的包，其他的都是静态链接入EXE新建一个包，将lib下相应的dcu文件add进去。然后其他的基于rtl60和这个bpl就可以了。我做了个demo,大家
henreash·2020-08-09 08:21

Delphi 流分割与合并文件的函数

//分割文件的函数{参数1是要分割的文件名;参数2是要风格文件的大小,单位是KB}{分割后的文件名扩展名用序号替换}functionSplitFile(constFileName:string;Size:Cardinal):Boolean;varfStream:TFileStream;{原始文件}toStream:TMemoryStream;{分文件}p,i:Integer;{p记录当前指针位置;
hellour·2020-08-09 08:49
上一页 46 47 48 49 50 51 52 53 下一页
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他