[Delphi]有用的小函数IIF
2004-03-31 16:19
387 查看
某些情况下直接使用IIF可以使程序变得更加简洁,Delphi没有现成的,写一个也很简单:
function iif(Condition: Boolean; TrueReturn, FalseReturn: Variant): Variant;
begin
if Condition then
Result := TrueReturn
else
Result := FalseReturn;
end;
function iif(Condition: Boolean; TrueReturn, FalseReturn: Variant): Variant;
begin
if Condition then
Result := TrueReturn
else
Result := FalseReturn;
end;
相关文章推荐
- 【Gabbing Delva 第0篇】我的小铁锨(代序)
- Delphi的彩蛋 (好像Delphi5~Delphi7都可以)
- [Delphi]怎样访问Internet Explorer中的WebBrowser
- [Delphi]根据控件名称操作控件
- Delphi 调试方法
- Delphi8 中文帮助
- Delphi 8中文帮助-Delphi 8 for .NET是什么?
- 使用ACTIVEX和DELPHI开发串口通讯
- 用Delphi制作DLL小结
- 简单使用Delphi中的TO-DO List
- Delphi 文件结构
- 在delphi.net的VCL.net里使用Ado.net
- Delphi 8中文帮助-Delphi 8起始篇
- Rational Rose 技术交流(五)
- 用Delphi开发JNI(Java Native Interface)应用(一)
- 用Delphi开发JNI(Java Native Interface)应用(二)
- DELPHI和FORTRAN语言的混合编程(二)
- Delphi 与 FORTRAN语言的混合编程
- Delphi 8 for .Net印象
- Delphi实现对注册表的监视和扫描