我想在某一个字符串选择第几位的字符为0或1应当怎么样写才可以??? ( 积分: 50 )

F

fujingkai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-10-12

• #1

比如111111000100011110011111111中第12位为几

 

引

引力

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-10-12

• #2

function ShowValue(TempInt : integer, TempStr : string) : string;
var
i,n : integer;
MyStr : string;
begin
n := TempInt;
MyStr := TempStr;
i := length(MyStr);
if i > n then
begin
ShowMessage(MyStr[n-1]);
end else
begin
ShowMessage('指定的位数超过范围');
end;
end;
是这意思么。

 

H

hhjjhhjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-10-12

• #3

Copy(str,index,n)：从任意位置，截取n个字符
Copy(str,12,1)

 

引

引力

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-10-12

• #4

呵呵，用Copy好多了。

 

A

ANiDelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-10-13

• #5

const S = '111111000100011110011111111';
begin
ShowMessage(S[12]);
end;

 

F

fujingkai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-10-16

• #6

你们的解答我从中知道了怎样做了才能达到我的要求，但我想问一问S[12]这个函数是怎么一回事．