一个很简单的问题 (15分)

  • 主题发起人 主题发起人 dreamblue
  • 开始时间 开始时间
D

dreamblue

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
var
str:string;
flag:boolean;
begin
str:='';
flag:=inputquery('请输入过滤条件','过滤条件',str);
if flag then
try
adotable1.filtered:=false;
adotable1.filter:=str;
adotable1.filtered:=true;
except
showmessage('过滤条件错误,无法执行');
adotable1.filtered:=false;
end;
end;

请问为何要给str赋空值,str:=''
好象我去掉这一行也可以,但我还是想知道为何要这样做。
 
这一句可以不要。
但是作为一个程序员,给一个变量符初值是一个好习惯!
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
923
SUNSTONE的Delphi笔记
S
后退
顶部