Delphi备忘录——基本语句】的更多相关文章

选择语句: 1.If-Then-Else选择语句: If (表达式) Then Begin 语句块; End Else If(表达式) Then Begin 语句块; End; Else Begin 语句块; End; 2.Case-Of-Else多分支控制语句: Case (表达式) Of 情况常量值1:语句; 情况常量值2:语句; 情况常量值3:语句; -- 情况常量值n:语句; Else: 语句; End; 循环语句 1. While-do循环 While (表达式) do 语句 End;…
方法一(利用adoconnection.exe(sqlstate)): adoconnection1.begintrans;//开始事务try adoconnection1.execute(sqlstr1); adoconnection1.execute(sqlstr2); ... adoconnection1.execute(sqlstrN); adoconnection1.commitrans;//提交事务 showmessage('操作成功');except adoconnection1.…
打开文件失败的容错提示语句 try if OpenDialog1.Execute then begin MyList.Clear; MyList.LoadFromFile(OpenDialog1.FileName); end; except on E:EReadError do ShowMessage('打开文件失败'); end; //防止程序假死 Application.ProcessMessages; //删除记录时提示的语句 try with TADOQuery.Create(nil)…
try//尝试执行{SomeCode} except//出错的时候执行, Except有特定的错误类型 {SomeCode} end; try//尝试执行{SomeCode} finally//无论如何都强制执行{SomeCode} end; 例:tryAge:=StrToInt(Edit1.Text);ShowMessage(Format('生于%d年',[YearOf(Now)-Age]));excepton EConvertError doshowmessage('输入编辑框的不是一个有效…
原文地址:delphi try except语句 和 try finally语句用法以及区别作者:1865898133 一直写程序都没管他们,也尽量很少用,今天终于想把他给弄个明白,在网上找来,记下!主要是前面小部分,后面的是详细说明(很啰嗦!) 一.异常的来源 在Delphi的应用程序中,下列的情况都比较有可能产生异常. (1)文件处理 (2)内存分配 (3)Windows资源 (4)运行时创建对象和窗体 (5)硬件和操作系统冲突 二.异常的处理 (1)try…except…end; 在try…
Delphi是一个可视化的编程工具,ADO编程也是这样,所以话不多言,直接通过代码.截图和语言来说明. 我的数据库是Oracle,为了测试,先建一个表:create table practice(uno varchar(8), uname varchar(20));  这个表比较简单,只有两个字段. 我的Oracle数据库是安装在虚拟机上的(操作系统是Redhat),所以需要先在服务器上配置好,另外需要在Windows上进行相关的配置(监听程序配置和本地网络服务名配置).否则后面就没有办法配置数…
http://www.cnblogs.com/del/archive/2008/07/08/1237856.html 非常遗憾 Delphi 的 case 语句不支持字符串, 但我觉得这也可能是基于效率的考量;如果非要在 case 中使用字符串, 也不是不可以变通, 这里提供了五种方法. 本例效果图: 代码文件: unit Unit1; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Contr…
1.引号配对:  这是在Delphi使用SQL语句时容易出错的地方,由于delphi规定在字符串中用两个西文的单引号“''”表示一个“'”,在拼装语句的时候就容易疏忽遗漏.  Delphi里有个函数QuotedStr能够在字符串的头尾加上一个西文的单引号['],这个函数的定义:function QuotedStr(const s: string):string;  因此,如果要在一个语句中拼装入字符串类型的变量就可以用到这个函数. 2. 区别不同的写法  由于各个数据库的厂商对标准SQL都有各自…
一.什么是窗口类  在Windows中运行的程序,大多数都有一个或几个可以看得见的窗口,而在这些窗口被创建起来之前,操作系统怎么知道该怎样创建该窗口,以及用户操作该窗口的各种消息交给谁处理呢?所以VC在调用Windows的API(CreateWindow或者CreateWindowEx)创建窗口之前,要求程序员必须定义一个窗口类(不是传统C++意义上的类)来规定所创建该窗口所需要的各种信息,主要包括:窗口的消息处理函数.窗口的风格.图标. 鼠标.菜单等.其定义如下: typedef struct…
今天学习第一模块的最后一课课程--函数: python的第一个函数: 1 def func1(): 2 print('第一个函数') 3 return 0 4 func1() 1 同时返回多种类型时,将是返回一元组: 1 def func2(): 2 '],{'五':'六','七':8}#返回多种数据类型 3 data=func2() 4 print(data) 2 函数参数的调用: 1,位置调用:编写时需要一一对应,如果少了,或是多少都会出错! 1 def func3(x,y): 2 z=x+…