小弟初学,迷惑很多,请高手帮助。 SaveDialog1.execute 是什么意思啊。特别是execute在Delphi中是什么意思啊! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 就是“执行”的意思,SaveDialog1.execute 这句话应该是打开一个保存对话框吧QQ33524826 大哥,看看帮助好了,这个指如save对话框选择ok执行的话返回true 你把下面的代码拷回去,覆盖当前新建工程的所有代码,再运行几遍就会明白了!=============================unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, DBXpress, DB, DBClient, MConnect, SqlExpr;type TForm1 = class(TForm) Button1: TButton; SaveDialog1: TSaveDialog; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin SaveDialog1.Execute; if SaveDialog1.FileName<>'' then showMessage('你选择了保存为:['+ SaveDialog1.FileName+'] 文件及路经');end;end. 还有,在当前新建工程的form1中拖动建立一个默认的“Button1”,并设置盖按钮的单击事件为Button1Click。 execute是执行不返回值的操作,比如:在sql中execute是执行不返回值的操作,如updata,insert 等 说白了,就是说指明是否选定了某个文件,是否执行了操作,如果执行了,返回值就为true;注意:Delphi中 If SaveDialog1.execute then ...... 相当于 If SaveDialog1.execute=true then ...... 学过VB吗? 就是 if not(savedialog1.filename<>"") then ...... InterBase数据库是否支持图片的存取? 简单的类声明判断正误 我要从头学习!望推荐好书!! 数据库问题! 真的有点厌倦了这样的生活…… 关于ADOStoredProc的奇怪的问题,200分奉上!在线等待! Delphi5和Delphi6分别连接Excel问题 切换输入法的小程序,应用在触摸屏系统中,有诸多问题想请教,请高手们进来看看 如何避免TWebBrowser不弹出错误对话框? delphi的前景? 正在看《inside VCL》有个问题问一下 如何做一个坐标图
QQ33524826
这个指如save对话框选择ok执行的话返回true
覆盖当前新建工程的所有代码,
再运行几遍就会明白了!
=============================
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls, DBXpress, DB, DBClient, MConnect, SqlExpr;type
TForm1 = class(TForm)
Button1: TButton;
SaveDialog1: TSaveDialog;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
SaveDialog1.Execute;
if SaveDialog1.FileName<>'' then
showMessage('你选择了保存为:['+
SaveDialog1.FileName+'] 文件及路经');
end;end.
在当前新建工程的form1中拖动建立一个
默认的“Button1”,并设置盖按钮的单击事件
为Button1Click。
比如:在sql中execute是执行不返回值的操作,如updata,insert 等
If SaveDialog1.execute=true then ...... 学过VB吗? 就是 if not(savedialog1.filename<>"") then ......