E-COM-NET
首页
在线工具
Layui镜像站
SUI文档
联系我们
推荐频道
Java
PHP
C++
C
C#
Python
Ruby
go语言
Scala
Servlet
Vue
MySQL
NoSQL
Redis
CSS
Oracle
SQL Server
DB2
HBase
Http
HTML5
Spring
Ajax
Jquery
JavaScript
Json
XML
NodeJs
mybatis
Hibernate
算法
设计模式
shell
数据结构
大数据
JS
消息中间件
正则表达式
Tomcat
SQL
Nginx
Shiro
Maven
Linux
formcreate
截获异常,并在运行时不报错
TObject; E: Exception);begin //ShowMessage('aaaaa'); //弹出异常信息end; procedure TMainForm.
FormCreate
cqujsjcyj
·
2009-10-26 17:00
异常
delphi BYTE 转字符串
BYTE转字符串procedureTForm3.
FormCreate
(Sender:TObject);begin Self.Paint;end;functionByteToHex(Src:Byte):String
pgnet
·
2009-10-07 21:00
利用注册表 将程序设置为开机启动项目
可以在
FormCreate
中进行设置 uses.....
shuilan0066
·
2009-09-18 17:00
c
Delphi 隐藏窗口表单
我一开始以为,将表单设置为隐藏,可以在表单创建事件中即
FormCreate
(Sender:TObject)去设置 因此,我在这个procedureTForm.
FormCreate
(Sender
shuilan0066
·
2009-09-18 16:00
BCB 中OLE关闭Excel进程
在
FormCreate
的时候就创建了ExcelApplication,但是后来关闭的时候,进程中还是存在EXCEL.EXE,摸索了半天,是因为定义了三个万能对象,ExcelApp,WorkBook,Sheet
jinling1441
·
2009-09-16 23:00
Excel
不规则窗体小技巧
mbLeft)thenbeginReleaseCapture;Self.Perform(WM_SYSCOMMAND,$F012,0);end; 2.创建圆角矩形窗体 procedureTForm1.
FormCreate
dropme
·
2009-08-31 17:00
button
系统菜单上添加自定义的菜单项
WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; constidMyFunc = $f200; procedure TForm1.
FormCreate
cqujsjcyj
·
2009-05-13 15:00
自定义
AdvStringGrid使用方法(2)
procedure TForm1.
FormCreate
(Sender: TObject);begin AdvStringGrid1.FixedRows:=2; AdvStringGrid1.SaveFixedCells
shuiying
·
2009-01-12 18:00
Delphi2009的GIF顯示
uses GIFImg; procedure TForm1.
FormCreate
(Sender: TObject); begin // 先在窗体上放一个 TImage 组件:Image1
liang1022
·
2008-11-30 09:00
C++
c
C#
程序启动时不显示主窗体
Delphi中实现:程序启动时不显示主窗体 在程序中(工程文件或窗体的
FormCreate
()里...)加入如下语句即可实现: Application.ShowMainForm:=False;
ZHOUJIAOSHOU
·
2008-11-14 08:00
数据库查询进度条
procedureTForm1.
FormCreate
(Sender:TObject);begin ADOQuery1.ExecuteOptions:=[eoAsyncFetch];//设为异步读取end
genispan
·
2008-10-23 23:00
数据库
Integer
dataset
delphi小知识,相当基础
1:生成非矩形窗口利用win32API函数setwindowrgn可以将窗口定义为任何形状,以下是将窗口定义为园角矩形的例子:procedureTForm1.
FormCreate
(Sender:TObj
dongyonggan
·
2008-09-03 16:00
Delphi 类似实现QQ多窗口显示任务栏上
procedure TForm2.
FormCreate
(Sender: TObject);begin SetWindowLong(Handle,GWL_EXSTYLE,(GetWindowLong(handle
bigpower521
·
2008-08-26 11:33
窗口
qq
Delphi
任务栏
Delphi 类似实现QQ多窗口显示任务栏上
procedureTForm2.
FormCreate
(Sender:TObject);beginSetWindowLong(Handle,GWL_EXSTYLE,(GetWindowLong(handle
bigpower521
·
2008-08-26 11:33
QQ
Delphi
任务栏
Delphi基础篇
delphi ord()
答:procedureTForm1.
FormCreate
(Sender:TObject);vara:string;begina:='啊';ShowMessage(IntToStr(ord(a[1])))
liquanhai
·
2008-06-01 04:00
Delphi
[转]Delphi下拉列表框
//载入 procedure TForm1.
FormCreate
(Sender: TObject); var PID: PInteger; i: integer; begin with ComboBox1
heiheben
·
2008-04-09 10:00
Delphi
如何在一个窗体中嵌入另一个窗体
Form1usesunit2;procedureTForm1.
FormCreate
(Sender:TObject);begin form2:=TForm2.Create(Panel,self); form2
bigpower521
·
2008-04-01 08:58
职场
嵌入
窗体
休闲
Delphi+MSComm控件串口收发程序
//Delphi+MSComm控件串口收发程序 //
[email protected]
procedure TForm1.
FormCreate
(Sender: TObject); begin
javatoyou
·
2008-03-26 13:00
Delphi
让自己做的程序在开机后自动启动
举例:procedureTForm1.
FormCreate
(Sender:TObject);varmyname:string;constK='\Software\Mi
sally
·
2007-10-25 15:09
职场
Delphi
休闲
Delphi设置全局快捷键
type TForm1 = class(TForm) procedure
FormCreate
(Sender: TObject); procedure FormDestroy(Sender: TObject
konglx
·
2007-06-02 09:00
Delphi
动态连接数据库
dephi连接方法:procedure TloginForm.
FormCreate
(Sender: TObject);varcurrentPath,str,path:String;begin path:
rimoer
·
2007-04-25 18:00
数据库
用TImage,TcxImage显示来自数据库的图片jpeg
procedure TForm1.
FormCreate
(Sender: TObject); var MyStream:Tmemorystream; MyJPEG:TJpegImage;
wapysun
·
2007-03-24 20:00
image
木马自我拷贝法[Delphi]
这种方法的原理是程序运行时先查看自己是不是在特定目录下,如果是就继续运行,如果不是就把自己拷贝到特定目录下,然后运行新程序,再退出旧程序.打开Delphi,新建一个工程,在窗口的Create事件中写代码:procedureTForm1.
FormCreate
txf2004
·
2006-08-09 11:00
windows
Delphi
木马自我拷贝法[Delphi]
这种方法的原理是程序运行时先查看自己是不是在特定目录下,如果是就继续运行,如果不是就把自己拷贝到特定目录下,然后运行新程序,再退出旧程序.打开Delphi,新建一个工程,在窗口的Create事件中写代码: procedure TForm1.
FormCreate
xzknet
·
2006-08-09 11:00
windows
Delphi
delphi编程实现检测声卡存在
为了完善系统的容错性,就必须用到一些检测系统的功能,其中检测声卡是否存在就是一个问题,下列程序帮你忙,首先需要在uses部分加入mmsystem,接着在窗体创建时检测声卡:procedureTForm1.
FormCreate
wbryfl
·
2006-08-07 11:00
编程
Integer
Delphi
Delphi6 实现文本框的自动完成功能
functionSHAutoComplete(hwndEdit:HWnd;dwFlags:DWORD):HResult;stdcall;external'Shlwapi.dll';procedureTForm1.
FormCreate
tanaya
·
2006-08-02 13:00
function
Delphi
产生不重复随机数的简便算法
varaa : array[1..36] of string[2]; //aa数组为需要随机排列的数组,{先把1..36按顺序给aa数组赋值}procedure TForm1.
FormCreate
(Sender
牵着老婆满街逛
·
2006-04-17 17:00
把控件的Hint显示在StatusBar上
在構造函數或
FormCreate
中:Application->OnHint=ShowHint;ShowHint為自定義函數:void__fastcallShowHint(TObject*Sender
aniven
·
2005-12-19 16:00
CSDN问答:用WEBBROWSER怎么复制粘贴不能用了
在窗体的OnCreate事件中加入如下代码:OleInitialize(nil); 在OnClose事件中加入代码:OleUninitialize; procedure TForm1.
FormCreate
lovnet
·
2005-06-28 10:00
C++
c
C#
CSDN文答:怎样使TWebbrowser中的复制粘贴生效
在窗体的OnCreate事件中加入如下代码:OleInitialize(nil); 在OnClose事件中加入代码:OleUninitialize; procedure TForm1.
FormCreate
lovnet
·
2005-06-14 19:00
WebBrowser
有关透明窗口的显示
第1种半透明窗口//----------------------------------------------------------------void__fastcallTForm1::
FormCreate
aniven
·
2005-03-23 13:00
窗口设置为透明
void __fastcall TForm1::
FormCreate
(TObject *Sender) { long lRt=GetWindowLong(Handle,GWL_EXSTYLE
linkboy
·
2005-03-12 22:00
窗口
职场
设置
休闲
窗口设置为透明
void __fastcall TForm1::
FormCreate
(TObject *Sender) { long lRt=GetWindowLong(Handle,GWL_EXSTYLE
linkboy
·
2005-03-12 22:00
窗口
职场
设置
休闲
在窗体创建时显示窗体
procedureTForm1.
FormCreate
(Sender:TObject);begin Visible:=True;//把窗体显示出来 ShowMessage('窗体已经显示出来了');end
cjsh
·
2004-08-21 11:00
上一页
1
2
3
4
5
6
下一页
按字母分类:
A
B
C
D
E
F
G
H
I
J
K
L
M
N
O
P
Q
R
S
T
U
V
W
X
Y
Z
其他