不能Ifthen 语句 ( 积分: 50 )

我

我为delphi疯狂

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-05

• #1

请问大家,在DELPHI 7中可以使用IfThen语句吗?为什么系统老是说未申明'ifthen',
例如Edit3.Text := IfThen(CheckBox1.Checked, Edit1.Text, Edit2.Text);

 

我

我为delphi疯狂

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-05

• #2

请问大家,在DELPHI 7中可以使用IfThen语句吗?为什么系统老是说未申明'ifthen',
例如Edit3.Text := IfThen(CheckBox1.Checked, Edit1.Text, Edit2.Text);

 

A

abookdog

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-05

• #3

没些语句的
因为Delphi是类型安全的
就算delphi内带了ifthen语句那么他也只能给出已知类型的,未知类型还是给不出的.
由于delphi并不支持宏语句,
所以就没给出实现
[red]但用用户完全可以自己实现的.[/red]

 

H

HunterTeam

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-05

• #4

自己写一个函数呗:
function IIF(B:boolean;Tj1,Tj2:Variant):Variant;
begin
if B=true then
Result:=tj1
else
Result:=Tj2;
end;

 

我

我为delphi疯狂

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-05

• #5

多人接受答案了。