用什么方法判断一条字符串里的数字是多少，是123或是354(50分)

Y

yinnifeiyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #1

我想从一条字符串里提取出相应的数字是多少，比如‘167'怎样转化成数字型的1,6,7,请给
出代码，50大洋就给你

 

子

子陵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #2

没搞明白你的意思
如果将'167'转化成数字的167(一百六十七),用strtoint就可以
如果要转化成三个单数1,6,7.用下标就可以了
const
sTemp='167';
var
i:integer;
begin
i:=strtoint(sTemp)
//转化成数字型
for i:=1 to Length(sTemp) do
begin
showmessage(sTemp);//分别显示1,6,7
end;
end;

 

S

SanDao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #3

楼主请举个例子！（看不懂你的意思）

 

Y

yinnifeiyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #4

我要将'167'提出来，成为数字1,6,7，然后根据数字去选择数据库中相对应的记录。

 

S

SanDao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #5

在提出前字符串是什么样子?

 

I

Imfish

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #6

用子陵的可以呀，只需稍加变动！

 

R

renzq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #7

最根本的还是strtoint
字符串可以一个一个来读 比如 strtoint(string[1])

 

影

影 子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #8

你太懒了！
定义一个动态字节数组arr:array of byte，
设置长度SetLength(arr,Length(string));
循环赋值
for i := 1 to Length(string) do
arr := strtoint(string);

 

C

catbrother

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #9

的确是懒人一个[]

 

S

SanDao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #10

也许是你们明白了楼主的意思!
但我不明白你们怎么知道他是这个意思的!(不知道要把这些从怎样的字符串中提出来)
--------------
另外:
兄弟们可以不回答,但不应该随便骂人!(有的人灌水灌的太勤快了)

 

R

resun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-26

• #11

var
s:string;
s0,s1,s2,s3:integer;

begin
s:='167';
s0:=strtoint(s);
s1:=s0 div 100;//数字 1
s2:=s0 mod 100 div 10;//6
s3:=s0 mod 10
//7

end;

 

Y

yinnifeiyang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #12

我天，提了个小问题送分还挨骂[]
谢谢各位了！