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;
楼上几位的都挺好的，我接个分
相关问答：
已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
急用。联系QQ：8775262，谢谢。
需要进行DllImport的地方直接写DLLImport.方法名。
如：DLLImport.GlobalAddAtom(……);
文件：UShare.pas
Delphi(Pascal) code:
unit UShare;
interface
uses Windows, Me ......
hongqi162、windindance
此2人长期不在线，特别是windindance
更换有能力的人上
hongqi162还是经常上来转转的
引用
更换有能力的人上
其实也不是什么能力的原因，主要可能是时间问题吧
工作的还要上班，学� ......
我在网上找了个关于IEBHO的代码，然后按照哪个设置了，后来运行的时候出现
构建
[警告] Project2.dpr(14): File not found: 'MYbho.TLB'
[警告] Project2.dpr(16): File not found: 'MYbho.RES'
......
