Delphi 一个小问题！！ (错在哪里呢？？)

Question

我在对课程信息进行模糊查询时 由于combobox3, combobox4里的数据是integer
我就这样写
procedure..............
var l_plan_hour,l_study_grade:string;
begin
  l_plan_hour:=strtoint(combobox3.text);   //变量赋值
  l_study_grade:=strtoint(combobox4.text);
...........
程序执行的时候报错   'is not a valid integer value'  这是怎么回事啊？？

Answer 1

你定义的l_plan_hour,l_study_grade为string型
而strtoint是转化为integer型数据的
当然出错啦~~改为：
  l_plan_hour:=combobox3.text;   //变量赋值
  l_study_grade:=combobox4.text;

Answer 2

procedure..............
var l_plan_hour,l_study_grade:integer;
begin
  l_plan_hour:=strtoint(combobox3.text);   //变量赋值
  l_study_grade:=strtoint(combobox4.text);
...........
程序执行的时候报错   'is not a valid integer value'  这是怎么回事啊？？
不好意思啊  我定义的是integer 写错了  再帮帮忙吧！

Answer 3

在您现在程序执行的错误来看
当TComboBox里的值不是数字时就会产生现在出现的这个异常
不是有效的Integer数据
您可以这样处理
var 
  l_plan_hour,l_study_grade:string;
begin
 try 
  l_plan_hour:=strtoint(combobox3.text);   //变量赋值
  l_study_grade:=strtoint(combobox4.text);
 except
  ShowMessage('类型不匹配！');
 end;
end;
再不行就Q我吧。39209814

Answer 4

l_plan_hour,l_study_grade:string;
改为
l_plan_hour,l_study_grade:Integer;

Answer 5

l_plan_hour,l_study_grade:string;
begin
  l_plan_hour是字符串
 strtoint(combobox3.text);把字符串变成了整形，怎么可能附值
应该改成   l_plan_hour：=combobox3.text；

Answer 6

你将字符型fdasfsdafd转化成整形肯定会出错，类型不匹配，要是字符型123转化成整形就不会有问题

Answer 7

var l_plan_hour,l_study_grade:string;
    plan_hour,study_grade:integer;
begin
  l_plan_hour:=combobox3.text;   //变量赋值
  l_study_grade:=combobox4.text;
  plan_hour:=strtoint(l_plan_hour);
  study_grade:=strtoint(l_study_grade);这样得到的是整型了，应该没问题,  如果这样做strtoint(combobox3.text);肯定会报错；

Answer 8

你的 l_plan_hour,l_study_grade是字符型的
直接赋值就可以了！

Answer 9

類型不匹配,combobox里的值是甚麼呀?如果combobox里的值是string就會錯了

Answer 10

我是說是除了數字以外的string

Answer 11

delphi中常会出现这样的问题,有的时候也不是类型的问题,我总是使用variant类型,什么问题也没有:)