我是新手,我现在有一字符串s,数为23.62,有一控件(就是显示数的那种),他有个value项,就是你写什么小数,就显示几,我应该怎么给value赋值?
最好成绩有源代码,谢谢!!!

解决方案 »

  1.   

    edit1.Text :=floattostr(23.56);你的控件显示就是
    控件.value:=floattostr(小数);
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
    i:string;
    begin
    i:=edit1.Text;
    isevensegmentanalog1.Value:=floattostr(i);end;end.
    编译不过区
      

  3.   

    isevensegmentanalog1 是个什么东西?
      

  4.   

    明显数据类型不匹配嘛你先确定isevensegmentanalog1.Value是string还是integer
    如果是string的话,那么直接这样就可以了
    procedure TForm1.Button1Click(Sender: TObject);
    begin
    isevensegmentanalog1.Value:=edit1.Text;
    end;如果是integer的话,那么就这样
    procedure TForm1.Button1Click(Sender: TObject);
    var
    i:string;
    begin
    i:=edit1.Text;
    isevensegmentanalog1.Value:=strtofloat(i);
    end;
    不过看样子呢,应该是integer的啦
    你调试调试吧
    学习delphi,搞清楚数据类型以及类型转换是基础的基础
    努力吧
      

  5.   

    老大,你的 i 是定义成字符串的啊,
    isevensegmentanalog1.Value:=i 就行了啊
      

  6.   

    是这个意思吗?iSevenSegmentAnalog1?
    起名字最好起的清楚一点
    反正就是类型转换的问题,你在试试看把