http://delphi.ktop.com.tw/topic.php?topic_id=33034 在這篇中，TOutlookAplication元件的應用範例我下載完了， 經過BCB 6.0(XP) compiler之後.... 出現了以下的error.... [C Error] Unit3.cpp(53): E2034 Cannot convert 'bool' to 'tagVARIANT' [C Error] Unit3.cpp(53): E2342 Type mismatch in parameter 'Descending' (wanted 'tagVARIANT', got 'bool') [C Error] Unit3.cpp(189): E2034 Cannot convert 'int' to 'tagVARIANT' [C Error] Unit3.cpp(189): E2342 Type mismatch in parameter 'Type' (wanted 'tagVARIANT', got 'int') [C Error] Unit3.cpp(200): E2034 Cannot convert 'bool' to 'tagVARIANT' [C Error] Unit3.cpp(200): E2342 Type mismatch in parameter 'Descending' (wanted 'tagVARIANT', got 'bool') [C Error] Unit3.cpp(201): E2034 Cannot convert 'bool' to 'tagVARIANT' [C Error] Unit3.cpp(201): E2342 Type mismatch in parameter 'Descending' (wanted 'tagVARIANT', got 'bool') [C Error] Unit3.cpp(213): E2034 Cannot convert 'char *' to 'tagVARIANT' [C Error] Unit3.cpp(213): E2342 Type mismatch in parameter 'Modal' (wanted 'tagVARIANT', got 'char *') 不知道是哪邊有問題呢？ 初次接觸 TOutlookAplication元件...請各位大大指點。 謝謝各位大大。

chlin：先聲明我只是於BCB 6.0(XP) compiler之後無Error，
因為我沒安裝MS-Outlook。請依下面錯誤自行修正！
藍字修正成紅字部分！
[C   Error] Unit3.cpp(53): E2034 Cannot convert 'bool' to 'tagVARIANT'
[C   Error] Unit3.cpp(53): E2342 Type mismatch in parameter 'Descending' (wanted 'tagVARIANT', got 'bool')
原pItems->Sort(WideString("[ReceivedTime]"),true) ;
VARIANT var;
var.vt=VT_BOOL;
var.boolVal=true;
pItems->Sort(WideString("[ReceivedTime]"), var ) ;    [C   Error] Unit3.cpp(189): E2034 Cannot convert 'int' to 'tagVARIANT'
[C   Error] Unit3.cpp(189): E2342 Type mismatch in parameter 'Type' (wanted 'tagVARIANT', got 'int')
原pMailItem->SaveAs((WideString)FileNameStr , ExtentionIndex );
VARIANT var;
var.vt=VT_I4;
var.lVal=ExtentionIndex;
pMailItem->SaveAs((WideString)FileNameStr , var );    [C   Error] Unit3.cpp(200): E2034 Cannot convert 'bool' to 'tagVARIANT'
[C   Error] Unit3.cpp(200): E2342 Type mismatch in parameter 'Descending' (wanted 'tagVARIANT', got 'bool')
[C   Error] Unit3.cpp(201): E2034 Cannot convert 'bool' to 'tagVARIANT'
[C   Error] Unit3.cpp(201): E2342 Type mismatch in parameter 'Descending' (wanted 'tagVARIANT', got 'bool')
原  if( rSortOrder->ItemIndex == 0 ) {
    pItems->Sort(WideString("[ReceivedTime]"), true ) ;
  }
  else {
    pItems->Sort(WideString("[ReceivedTime]"), false ) ;
  }
  VARIANT var;
  var.vt=VT_BOOL;
  if( rSortOrder->ItemIndex == 0 ) {
    var.boolVal=true;
    pItems->Sort(WideString("[ReceivedTime]"), var ) ;
  }
  else {
    var.boolVal=false;
    pItems->Sort(WideString("[ReceivedTime]"), var ) ;
  }    [C   Error] Unit3.cpp(213): E2034 Cannot convert 'char *' to 'tagVARIANT'
[C   Error] Unit3.cpp(213): E2342 Type mismatch in parameter 'Modal' (wanted 'tagVARIANT', got 'char *')
原pMailItem->Display("[Modal]");
VARIANT var;
var.vt=VT_BSTR;
var.bstrVal=(wchar_t*)"[Modal]";
pMailItem->Display(var);    請參考！

Andy Chang 發表人 - andychang1690 於 2004/09/30 02:50:44

------
Andy Chang