怎么样才能把字符串400变成十进制数值的400?(20分)

  • 主题发起人 主题发起人 thebluehouse
  • 开始时间 开始时间
T

thebluehouse

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么样才能把字符串400变成十进制数值的400?
 
strtoint('400');
 
var
str: String;
i: Integer;
begin
str:= "400";
i := StrToInt(str);
//i为400了
end;
 
是呀,这和系统相关?
 
确保一点
IntToStrDef(AString, -1)
 
Var
S:string;
A:integer;
reg.RootKey:=HKEY_CURRENT_USER;
if reg.OpenKey('controlpanel/desktop',false)then
S:=reg.Readstring('menushowdelay');
A:=StrToInt(S);
trackbar2.Position:=A;
Reg.Free;
为什么错了?
 
错不在 StrToInt,在: reg.OpenKey('Control Panel/Desktop', False)
 
StrToInt,没错的!!!!
 
Var
S:string;
A:integer;
reg.RootKey:=HKEY_CURRENT_USER;
if reg.OpenKey('controlpanel/desktop',false)then
begin
S:=reg.Readstring('menushowdelay');
A:=StrToInt(S);
trackbar2.Position:=A;
Reg.Free;
end;
 
接受答案了.
 
后退
顶部