delphi怎么让它把命令执行完了自动重新起动程序
执行完后加一句application.Terminate，
然后调用ShellExecute(Handle, 'open', PChar(你程序的路径), nil, nil, SW_SHOW);
Delphi(Pascal) code:
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('重启程序');
WinExec(PChar(P ......
delphi 如何实现网站刷IP的操作
var
Form1: TForm1;
Nid:integer ;
implementation
{$R *.dfm}
procedure TForm1.Button2Click(Sender: TObject);
begin
if opendialog1.Execute then
memo1.Lines.LoadfromFile(opendialog1.FileName);
begin
if memo1.Lin ......
delphi7.0 用ado连接后台的Sql 数据库，当发现数据库无法连接上（数据库不存在等异常），需要等待的时间比较长，
try
adoconnection.active := true;
except
on E:exception do
begin
dosomething or reconnect to db.
end;
运行这个过程的时候 ......
delphi下的Image怎么可以由用户随意改变大小
将Image的parent置为一个可让用户调整大小的对象 如form
Image的align:=alClient; stretch:=true;
引用
将Image放在一个panel上，通过panle来改变image大小
用鼠标拖动来改变大小的增强型Panel
http://winu.cn/space-14160-do-blog-id-11 ......
1.控制其播放
2.判斷是否最后一頁。
delphi可以内嵌组件 你看下他的ocx
引用
delphi可以内嵌组件 你看下他的ocx
能不能详细点啊？
activeform
頂一下，哈哈
......
各位大侠
您们好：
我在调试 Delphi 三层架构 应用层的时候。遇到这样一个问题。设置的断点不会起作用。我的作法如下：
1）在应用层需要设置断点的地方设置断点，运行应用层程序。
2）打开客户端，调用应用层程序，发现断点不起作用（显示红点），而是重新开启了应用层程序。 ......
最新文章 : delphi