delphi 常用属性+方法+事件+代码+函数
内容居中(属性)
alignment->tacenter mome控件
禁用最大化(属性)
窗体-> BorderIcons属性-> biMaximize-> False
让鼠标无法改变窗体大小(属性)
窗体-> Constraints属性 ->MaxHeight和MinHeight->设置相同限制鼠标改变窗体的高度
窗体-> Constraints属性->MaxWidth和MinWidth->设置相同就限制鼠标改变窗体的宽度
========================================================================
无法改变大小(事件)
procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
NewHeight: Integer; var Resize: Boolean);
begin
Resize:=false;
end;
怎样在关闭窗口之前加入确认对话框(事件)
在Form的OnCloseQuery 事件里加入以下代码:
if Application.MessageBox(Close it now?,Ask,MB_YESNO )=IDYES then
CanClose:=True
else
CanClose:=False;
delphi中禁用Ait+F4 (事件)
方法1.
OnCloseQuery中设置CanClose:=False;
方法2.
procedure TMainForm.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if (key=Vk_F4) and ([ssAlt]=shift) then //屏蔽Alt+F4键让程序不能被关闭
key:=0;
end;
==================================================================
字符串右查找(函数)
LastDelimiter()
如:
s:='abcdefg' ;
LastDelimiter(s,'ef'); {6}
数学中的取整(函数)
floor 和 ceil 是 math unit 里的函数,使用前要先 Uses Math。
trunc 和 round 是 system unit 里的函数,缺省就可以用。
floor 直接往小的取,比如 floor(-123.55)=-124,floor(123.55)=123
trunc 直接切下整数,比如 trunc(-123.55)=-123, floor(123.55)=123
ceil 直接往大的取,比如 ceil(-123.55)=-123, ceil(123.55)=124
round 计算四舍五入,比如 round(-123.55)=-124,round(123.55)=124
文件操作(函数) 是否存在\删除\提示\个性提示
1.FileExists(opendialog1.FileName)-----------------------------[查看文件是否存在]
2.showmessage('文件己存在') -----------------------------------[提示窗体]
3.Application.MessageBox('保存成功','!提示',MB_ICONWARNING) ---[个性提示]
4.erase(fi);---------------------------------------------------[删除文件]
5.SysUtils.DeleteFile(lj)--------------------------------------[强行删除文件]
6.DirectoryExists(opendialog1.FileName)------------------------[查看目录是否存在]
==========================================================
查看工程中的子窗体是否建立(方法)
方法1.
if Assigned(Form1) then
ShowMessage('Form1已创建'); // 如果Form1已经Free过了,这条判断语句返回的还是真
方法2.
if (Form1 = nil) then
ShowMessage('Form1没创建'); //不存在提示,存在不提示
方法3.
//判断窗体Name是否已经存在.
function TMainForm.FormIsExist(Name:string):Boolean;
var I:Integer;
begin
Result:=False;
if MainForm.MDIChildCount>0 then
begin
for I:=MainForm.MDIChildCount-1 downto 0 do
begin
if MainForm.MDIChildren[I].Name=Name then
begin
Result:=True;
Break;
end; //
end; //
end;
end;
delphi 常用属性+方法+事件+代码+函数的更多相关文章
- Delphi中TStringList类常用属性方法详解
TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的. 常规的用法大家都知道,现在来讨论它的一些高级的用法. 先把要讨论的几个属性列出来: 1.CommaText 2.Delim ...
- WebBrowser常用属性方法介绍
WebBrowser 常用属性方法 ■■方法 ============================== ▲GoBack 相当于IE的"后退"按钮,使你在当前历史列表中后 ...
- [转帖]HTML5 Audio/Video 标签,属性,方法,事件汇总
HTML5 Audio/Video 标签,属性,方法,事件汇总 <audio>标签属性: src:音乐的URL preload:预加载 autoplay:自动播放 loop:循环播放 co ...
- HTML5 Audio/Video 标签,属性,方法,事件汇总
HTML5 Audio/Video 标签,属性,方法,事件汇总 (转) 2011-06-28 13:16:48 <audio> 标签属性:src:音乐的URLpreload:预加载au ...
- HTML5 Audio/Video 标签,属性,方法,事件汇总 (转)
HTML5 Audio/Video 标签,属性,方法,事件 <audio> 标签属性:src:音乐的URLpreload:预加载autoplay:自动播放loop:循环播放contro ...
- js如何操作表格(常用属性方法汇总)
js如何操作表格(常用属性方法汇总) 一.总结 一句话总结: 二.表格相关的属性和方法 1.1 Table 对象集合 cells[] 返回包含表格中所有单元格的一个数组. 语法:tableObject ...
- express模块中的req,res参数的常用属性方法
express模块中的req,res参数的常用属性方法 const express = require('express'); const router = express.Router() rout ...
- DevExpress 行事历(Scheduler)的常用属性、事件和方法
一.TcxScheduler[TcxScheduler常用属性]1.Storage - 邦定一个Storage为Scheduler显示提供数据 2.DateNavigate.ColCount ...
- Delphi 常用属性说明(超长)
Delphi组件的常用事件Onclick——当单击时触发这个事件中的代码Onchange——当改变该组件内容时触发其中的代码Oncreate——当创建时触发这个事件中的代码Onclose——当关闭的时 ...
随机推荐
- Android ListView相关 fastScrollEnabled
1.android:fastScrollEnabled="true" 当数据量比较多的时候,右侧会出现一个可以拉动的滚动条,这样可以很快的拉动,如图:
- linux中class_create和class_register说明
http://blog.csdn.net/angle_birds/article/details/16802099 本文介绍linux中class_create和class_register的相关使用 ...
- [Unity菜鸟] Unity读XML
1. 在Unity中调试可行,发布成exe可行,发布成web不行 Application.dataPath 在Unity中调试是在“..Assets”文件夹下, 发布成exe文件是在“..yourNa ...
- SwapEffect 枚举(定义交换效果)
由于创建设备时要用到这个值,所以在这里总结一下,以免以后再找. 首先引自msdn: Copy 只能为构成单个后台缓冲区的交换链指定此交换效果. 无论交换链是有窗口的还是全屏的,运行库都保证 Devic ...
- DX 绘制位图
简单地学习了四个API: HRESULT CreateOffscreenPlainSurface( [in] UINT Width, // 宽度 [in] UINT Height, // 高度 [in ...
- 转载 .htaccess文件RewriteRule语法规则
详见: http://blog.csdn.net/scchary/article/details/40045807 # -- 位于行首时表示注释. [F] -- Forbidden( ...
- 【HDOJ】4393 Throw nails
水题,优先级队列. /* 4393 */ #include <iostream> #include <sstream> #include <string> #inc ...
- 学Android开发 这19个开发工具助你顺风顺水
学Android开发 这19个开发工具助你顺风顺水 要想快速开发一个Android应用,通常会用到很多工具,巧妙利用这些工具,能让我们的开发工作事半功倍,节省大量时间,下面大连Android开发培训小 ...
- 变量赋值(引用) php内核的实现(二)
<?php $a=1; $b=&$a; $c=2; $a=&$c; echo $a."\n"; echo $b; 2 1 结论: 首先保存 左值的内存地址, ...
- Glimpse
给自己程序配好Glimpse. Glimpse.Mvc 有问题 遇到稍微复杂点的内套多个PartialView,内存就爆了彪1.7g,不开Glimpse一点问题都没.另外Glimpse.Nlog也有问 ...