我的程序有一行語句是這樣的:combobox3.Items.Append(datamodule1.depart.fieldbyname'depart_name').value);在昨天就是好好的,今天運行卻揭示"invali variant type conversion",請問這是怎麼回事?

應該是那個記錄的值是 null 罷 你試試 combobox3.Items.Append(datamodule1.depart.fieldbyname('depart_name').AsString); 看看成不成。

combobox3.Items.Append(datamodule1.depart.fieldbyname('depart_name').asString); (慢了点，好想删掉) 發表人 - mustapha.wang 於 2003/06/06 09:28:09

------
江上何人初见月，江月何年初照人

var ss:string;
begin
  ss:= datamodule1.depart.fieldbyname('depart_name').asString;
  if ss='' then ss=' '; //空字串加入TComboBox,當下拉到此item會有Error
                        //建議'' 改 ' '
  combobox3.Items.Append(ss);
  .
  .
  .

cmj 兄說得沒錯，讚。    你也可考慮在空字串時不加入 ComboBox,可將 cmj 兄的碼改成 :    

var ss:string;
begin
  ss:= datamodule1.depart.fieldbyname('depart_name').asString;
  if ss <> '' then  //空字串加入TComboBox,當下拉到此item會有Error
    combobox3.Items.Append(ss);
  .
  .