这个语句该怎么写?(20分)

  • 主题发起人 主题发起人 noyamm
  • 开始时间 开始时间
N

noyamm

Unregistered / Unconfirmed
GUEST, unregistred user!
str:String;
我如何判断str的第一个字符是S或T?
 
Copy(str,1,1)='S'
Copy(str,1,1)='T';
 
if Length(str) > 0 then
begin
case Str[1] of
'S' : begin
end;
'T' : begin
end;
else
begin
end;
end;
end;
end;
 
你就判断 str[1]的值是什么就行了呀
 
if Length(str) > 0 then
begin
if str[1]='T'then
begin
///等于T
end
else if str[1]='s' then
begin
//等于S
end;
end
else
//字符串为空
//
 
我自己的办法也简单:)
if pos('S',str)=0 then
...
 
后退
顶部