delphi简单问题
IF THEN ELSE中多个条件怎么写，如：字符串S1，S2，S3，S4均要不为空。
怎么样把它写到IF中去？
请各位帮帮忙，谢谢！
if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then
begin
//...
end else begin
//...
end;
if (s1 <>'') and (s2 <>'') and (s3 <>'') then
begin
end;
if () and () and () then
if () or () or () then
jf
if (Trim(S1) <>'') and (Trim(S2) <>'') and (Trim(S3) <>'') and (Trim(S4) <>'') then
begin
//...
end else begin
//...
end;
建议特殊情况特殊操作
if not Sametext(s1+s2+s3+s4, '') then begin
end;
或者
if s1+s2+s3+s4 <> '' then begin
end;
if (s1 = '') or (s2 = '') or (s3 = '') or (s4 = '') then
begin
end
eles
begin
//均不为空执行体
end;
楼上几位的都挺好的，我接个分
相关问答：
VC++ 中， &变量名。 是什么意思。 Delphi中 和他一样的符号 是哪个、？
大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其灵活的指针运用上。因此，说指针是C语言的灵魂，一点都不为过。同时， ......
delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......
最近换了家公司，郁闷的是关于Delphi的问题，公司之前用的也是D版Delphi7企业版的。后来被送了律事函以后，就强制改用Delphi7个人版，剧说这个版本是免费版，或者说很便宜，如果查出来，就买个好了。这下可好。苦了� ......
各位高手赶快帮帮忙。
现在有一个delphi写的dll，函数中有PInteger的返回参数，在delphi中可以正常调用，但是我在vb里写的时候就不知道该怎么来调用了。
请看代码
以下是delphi中的函数定义和调用代码，能正常运� ......
如题， 点击Delphi的File菜单的Exit退出Delphi， Delphi部分关闭--即不能再操作Delphi，但任务栏和进程里，Delphi还在运行，没有真正的退出。是不是安装了jre改变了某些环境变量导致，请问高手如何解决？ 注：没安装 ......
