有关 Form 的一些代码的标准写法
有关 Form 的一些代码的标准写法时间:2009-10-23 21:00:05来源:网络 作者:未知 点击:44次
有关 Form 的一些代码的标准写法--------------------------------------------------------------------------------
有关 Form 的一些代码的标准写法--------------------------------------------------------------------------------
创建一个Form
创建一个Form的实例用: SomeForm:=TSomeForm.Create(Application);
而不要用: TApplication.CreateForm(TSomeForm,SomeForm);
因为 TApplication.CreateForm() 会检查 MainForm 是否为 nil,如果是的话,便把新创建的 Form 作为主 Form。
打开一个模式Form
打开一个模式Form的标准写法是:
ModalForm:=TModalForm.Create(Application);
try
if ModalForm.ShowModal=mrOK then
{ do something}
finally
ModalForm.Free;
end;
打开一个无模式Form
打开一个无模式Form的标准写法是:
SomeForm:=TSomeForm.Create(Application);
SomeForm.Show;
并在Form的OnClose事件中将此Form释放掉:
procedure TSomeForm.FormClose(Sender:TObject; var Action:TCloseAction);
begin
Action:=caFree;
end;
防止出现一个Form的多个实例
if not Assigned(SomeForm) then // 也可写为 if SomeForm=nil then
SomeForm:=TSomeForm.Create(Application);
SomeForm.Show;
并在Form的OnClose事件中将此Form释放掉:
procedure TSomeForm.FormClose(Sender:TObject; var Action:TCloseAction);
begin
Action:=caFree;
end;
同时在Form的OnDestroy事件中将此Form变量设为nil:
procedure TfrmMaterial.FormDestroy(Sender: TObject);
begin
SomeForm:=nil;
end;
本篇文章来源于:开发学院 http://edu.codepub.com 原文链接:http://edu.codepub.com/2009/1023/16750.php
有关 Form 的一些代码的标准写法相关推荐
- 【避免if else标准写法】阿里P7级别(年薪40w-70w)是如何避免用if else写代码
不会吧还有人用if else和switch case?三目运算符? 不会吧? 不会吧?大佬都是全都不用的!以JAVA为例 条件判断语句的四种写法,茴字的四种写法大家不会不知道吧 1.正常人写法: pr ...
- Delphi程序员代码编写标准指南
Delphi 6 程 序 员 代 码 编 写 标 准 指 南 一.序言 二.通用源代码格式规则 2.1 缩格 2.2 页边空格 2.3 Begin-End 配对 2.4 代码文件中通用符号含义 三.O ...
- Delphi代码编写标准指南
分享一下我老师大神的人工智能教程!零基础,通俗易懂!http://blog.csdn.net/jiangjunshow 也欢迎大家转载本篇文章.分享知识,造福人民,实现我们中华民族伟大复兴! · 日月 ...
- 单例模式的标准写法、注意事项、作用及测试
最新最准确内容建议直接访问原文:单例模式 主要介绍单例模式的标准写法.注意事项.作用.测试,以Java语言为例,下面代码是目前见过最好的写法: public class Singleton {priv ...
- $.ajax()参数详解及标准写法
1.url: 要求为String类型的参数,(默认为当前页地址)发送请求的地址. 2.type: 要求为String类型的参数,请求方式(post或get)默认为get.注意其他http请求方法,例如 ...
- 09_$.ajax()参数详解及标准写法
1.url: 要求为String类型的参数,(默认为当前页地址)发送请求的地址.2.type: 要求为String类型的参数,请求方式(post或get)默认为get.注意其他http请求方法,例如p ...
- 软件需求文档格式的标准写法
软件需求文档格式的标准写法 1.引言 1.1 编写目的 • 阐明开发本软件的目的: 1.2 项目背景 • 标识待开发软件产品的名称.代码: • 列出本项目的任务提出者.项目负责人.系统分析 ...
- SQL学习(二)之四大查询语句以及标准写法
SQL四大查询语句--增删改查 增-INSERT INSERT INTO 表 (字段列表) VALUES(值列表) INSERT INTO `user_table` (`ID`, `username` ...
- STM32 软件模拟 IIC 代码,标准库、HAL库可用
1 #ifndef _IIC_H 2 #define _IIC_H 3 4 #include "stdio.h" 5 #include "stm32f1xx_hal.h& ...
最新文章
- java map 教程_Java Map接口
- 单片机数据转换php,51单片机之数据转移指令MOV、MOVX、MOVC等
- NYOJ 682 初学者的烦恼
- 18.12.09-C语言练习:兔子繁衍问题 / Fibonacci 数列
- win10无法更改计算机设置,Win10“无法保存ip设置,请检查一个或多个设置并重试”的解决方法...
- 【渝粤教育】国家开放大学2019年春季 2767养猪技术 参考试题
- 深入显出谈Java的发展历程及语言特点
- win2008服务器维护费用,win2008 服务器安全检查步骤指引(日常维护说明)
- 安装使用 superset
- mysql如何容器化_MySQL容器化详细教程
- Jmeter数据库mysql测试说明
- python参考手册 第二章
- 任正非:无法退休的老人
- 最全的英语收藏夹(精品)
- 前后落差大用什么词语_形容前后反差大的词语
- 计算机毕业设计Android手机校园外卖订餐APP(源码+系统+mysql数据库+Lw文档)
- html图片缩小属性,CSS属性实现同比例缩小图片
- 如何在华为云软件开发云上运行Python
- Word中的滚动文本框是如何制作(可以)
- 外企iOS开发的笔试题