string or pchar

[chons]

小弟在编程过程.遇到一个问题要识别一个数是不是16进制的数.
var
strRGB:string[6]
begin
for i:=0 to 5 do
begin
strRGB[i]:=copy(edit1.text,i+1,1);//怎么把字符串给分离开?
//这样可以吗?
case strRGB[i] of //*
A:hex2dec:=10;
B:
...
F:hex2dec:=15;
else hex2dec:=strRGB[i];
end;
但按F9后.报错说*处STRING和PCHAR不对应.请问该怎么办?

[chechy]

string是从第1位开始，而PChar是从第0位开始。
首先你的字符串就越界了。
可以这样：
for i := 1 to 6 do
StrRgb[i] := Edit1.Text[i];
...

[ch81]

你试试下面的。
procedure TForm1.Button1Click(Sender: TObject);
var
strRGB:string[6];
var hex2dec:integer;
var i:integer;
begin
for i:=1 to 6 do
begin
strRGB[i]:=edit1.Text[i];
case strRGB[i] of //*
'A':hex2dec:=10;
'B':hex2dec:=11;
'C':hex2dec:=12;
'D':hex2dec:=13;
'E':hex2dec:=14;
'F':hex2dec:=15;
else hex2dec:=StrToInt(strRGB[i]);

end;
ShowMessage(IntToStr(hex2Dec));
end;
end;

[valhalla]

stringhe和Pchar的格式不一样
Pchar纯粹指向一个字符串
string第一位是字符串的长度，所以string[6]有7位

[XXLong]

我要挣分！Sorry!

[XXLong]

up

[XXLong]

up

[bill_lasker]

对于pChar和String我现在还是搞不清，看了联机帮助，还是不行

[seewell]

我也迷糊了,关注,提前

[水之手]

String；String[n]/ShortString；PChar三者格式是不同的，
强烈建议看《Delphi 5 开发人员指南》，看了之后你就一清二楚了。

[a_fee]

string的第一个字符是string[1]
在实际的堆栈里前面还有内存大小，引用记数，字符个数。

[yousp]

copy函数好象只处理pchar类型的

[say]

同意楼上！
edit1.text是string吧,用pchar(string)转换一下试试。
我也很迷糊，赫赫~~~~~~~~

[say]

哦，看错了，是处出错吗？
用string ->PChar : PChar(string)、 PChar ->String :Strpas(pchar)试试吧
我也不清楚了#-）

[say]

up