字符串函数问题？？？急急急！！！我送100分！！

Question

字符串是00'11''05
另一个是00'12''03
在delphi 里面怎么判断啊！！！
我试了好多遍都不行啊。帮帮忙忙吧！！！全天在线

Answer 1

在DELPHI中要实现'的话，应用''''表示
00'11''05就是'00'+''''+'11'+''''+''''+'05',试试看吧

Answer 2

str1:='00''11''''05';
str2:='00''12''''03';
if str1>str2 then
begin
end
else
begin
end;

Answer 3

你可以先用POS取。然后可以用INTTOSTR()转换后再判断。

Answer 4

我觉得以上的方法都可以！
关键要知道delphi中用''''来代替“ ' ”

Answer 5

str1:='00''11''''05';
str2:='00''12''03';
在delphi中处理字符串，两个单引号标识一个单引号。

Answer 6

to:chenchongpan(苍松) 
是''表示',''''是表示'''('字符串）
str1:='00'+''''+'11'+''''''+'05';
str2:='00'+''''+'12'+''''''+'03';
然后比较。。

Answer 7

DELPHI的这个表示法实在是繁人!!
要是用PB的话
很简单:str="'00''11''''05'"这样就搞定了. delphi就想将人搞死在这里面.
烦!!!!!

Answer 8

if StrToInt(copy('001105',3,4))>StrToInt(copy('001121',3,4)) then
  begin  ...
  end;

Answer 9

直接比就可以了：
var
  S1,S2:String;
begin
  S1:='00''11''''05';//字符串00'11''05
  S2:='00''12''''03';//字符串00'12''03
  if S1>S2 then
  //00'11''05大于00'12''03
  else
  //00'11''05不大于00'12''03
end;

Answer 10

直接比就可以了
S1:='00''11''''05';//00'11''05
S2:='00''12''''03';//00'12''03
if S1>S2 then
//00'11''05大于00'12''03

Answer 11

procedure TForm1.Button1Click(Sender: TObject);
var
  String1, String2 : string;
  I : Integer;
begin
  String1 := '00''11''''05';  // Your string 1 == 00'11''05
  showmessage(string1);
  String2 := '00''12''''03';  // Your string 2 == 00'12''03
  showmessage(string2);
  I := CompareStr(String1, String2);  { the value of I is < 0 }
  if I <> 0 then
    MessageDlg('The strings are not equal', mtWarning, [mbOK], 0)
end;