小白请教一个字符串操作问题
怎么得到一个字符串的第一个字符和最后一个字符，或者是我怎么得到一个字符串中的任意一个字符？
例如：字符串123456789 怎么得到１和9 或者是我怎么得到12345679中的任意一个数字的值？
[解决办法]
S := '123456789';
S1 := Copy(S , 3 , 1); //取第3个字符
或者
S[3]; //取第3个字符
或者
PChar(S)[2]
其他类推
[解决办法]
uses StrUtils;
MidStr
[解决办法]
MidStr('123456789', 1, 1);//1
MidStr('123456789', 9, 1);//9
MidStr('123456789', 6, 1);//6
[解决办法]
得到第i个字符：str[i]
得到最后一个字符： str[Length(str)]
[解决办法]
记得字符串使用ANSISTRING
[解决办法]
function getrandnum(len: integer): string;
var i: integer;
begin
Randomize;
result := charlist[random(25) + 1];
for i := 0 to len - 2 do
begin
result := result + charlist[random(35) + 1];
end;
end;
