想问一个不知是否国家机密级的问题? ( 积分: 10 )

  • 主题发起人 主题发起人 cxb110
  • 开始时间 开始时间
C

cxb110

Unregistered / Unconfirmed
GUEST, unregistred user!
?谢谢,教指人高请?吗拳极太打会的真生先涛锦胡席主家国的们我,问请
 
var
i:integer;
s,s1:String;
begin
s:='?谢谢,教指人高请?吗拳极太打会的真生先涛锦胡席主家国的们我,问请';
for i:=0 to Length(s) do
s1:=s1+MidStr(s,Length(s)-i,1);
end;
 
!人高是然果
 
.....信太不
 
!ihpleD会他说据
 
!管我归不情事个这
 
PRE做在他见看我次上
 
showmessage(reversestring('?谢谢,教指人高请?吗拳极太打会的真生先涛锦胡席主家国的们我,问请'));
 
其实方竹和我的方法都是错的,得不到正确结果
 
;dne
;)1,i-)s(htgneL,s(rtSdiM+1s=:1s
od )s(htgneL ot 0=:i rof
;'请问,我们的国家主席胡锦涛先生真的会打太极拳吗?请高人指教,谢谢?'=:s
nigeb
;gnirtS:1s,s
;regetni:i
rav
!啊行不像好码代段这
 
function WideReverseString(const AText: WideString): WideString;
var
I: Integer;
P: PWideChar;
begin
SetLength(Result, Length(AText));
P := PWideChar(Result);
for I := Length(AText) do
wnto 1 do
begin
P^ := AText;
Inc(P);
end;
end;
 
上海自来水来自海上
 
美国没国美(指国美电器)
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部