高手来吧,送你分的同时,我学习.....

Question

我在将数据库里的信息写入CHART控件里,代码如下:while not Eof do
     begin
       with ListView1.Items.Add do
        begin
           Caption:=Fields[0].AsString;
           kh := Caption;
           SubItems.Add(Fields[1].AsString);
           number := SubItems.Text;
        end;
        Series1.Add(number,kh);  //---这里错误,请帮帮我改改好么
        Next;
     end;其中 kh 和 number 都是 string.运行后提示报错信息如下:Incompatible bypes:'Double'and'String'
请高手帮帮我好么,急~~~

Answer 1

With Series1 do
Begin
    Add(  40, 'Pencil' , clRed ) ;
    Add(  60, 'Paper',  clBlue ) ;
    Add(  30, 'Ribbon', clGreen ) ;
end;

Answer 2

明显第一个参数是double型嘛，非要用string？！

Answer 3

查一下Series1.Add方法的2个参数类型，用DoubleToStr()转换一下

Answer 4

看一下数据转换的Delphi 帮助：Convert --Example Delphi

Answer 5

Series1.Add(DoubleToStr(number),kh);我改成这样后,还是出错,描述是这样的:Undeclared identifier:'DoubleToStr'

Answer 6

Series1.Add(StrToFloatDef(number,0),StrToFloatDef(kh,0));

Answer 7

改成楼上的代码后,提示这样的错误:Incompatible bypes:'String' and 'Extended'

Answer 8

FloatToStr
or
StrToFloat

Answer 9

改为 StrToFloat 后,运行后弹出一个对话框,如下:Project Project1.exe raised exception class EConvertERROR with message ''250
' is not a valid floating point value' . Process stopped. Use Step or Run to continue.
这是对话框里的内容,是怎么回事?

Answer 10

你showmessage一下你代码里StrToFloat里面传的值吧,我怀疑包含了非数字字符

Answer 11

jiangshi99(僵尸先生99) 请帮帮我,showmessage怎么弄具体些好么,我没有学过,我是给人家弄的

Answer 12

showmessage(number);//?
showmessage(kh);//?
Series1.Add(StrToFloatDef(number,0),StrToFloatDef(kh,0));

Answer 13

哪位高手能给我留个QQ么,我在QQ向你请教一下这个问题,好么