摘要:
function XXXReverseString(const AText: string): string;var S, D: Pchar; i: Integer;Begin S := Pchar(AText); SetLength(Result, Length(AText)); D := Pchar(Result); for i := Length(AText) - 1 downto 0 do... 阅读全文
posted @ 2010-11-07 16:55
AppleAndPear
阅读(163)
评论(0)
推荐(0)
浙公网安备 33010602011771号