************outlook bar******求助!100分 (30分)

  • 主题发起人 主题发起人 allforyou
  • 开始时间 开始时间
A

allforyou

Unregistered / Unconfirmed
GUEST, unregistred user!
使用outlook bar删除当前items bar如何实现?

要求实行类似于
procedure TForm1.ListBox1Click(Sender: TObject);
begin
listbox1.DeleteSelected;
end;
的功能在outlookbar中的实现,我的程序段如下:
procedure TForm2.fcOutlookBar1OutlookList1ItemClick(
OutlookList: TfcCustomOutlookList; Item: TfcOutlookListItem);
begin
fcOutlookBar1OutlookList1.Items.Delete(fcOutlookBar1OutlookList1.Selected.Index);
end;

但运行时报错!!


 
错误信息[?]
 
raised exception Class EAcessViolation with message '存取地址000418ddc违例'
在‘project.exe’中读在地址FFFFFFF中
救我!!
 
//fcOutlookBar1OutlookList1.Items.Delete(fcOutlookBar1OutlookList1.Selected.Index);
程序排错,不要写这么多的嵌套。
从最里层一层一层的向外查。^_^
 
fcOutlookBar1OutlookList1是一个列表名,
我用其他方法试用,如:
var i:integer = fcOutlookBar1OutlookList1.selected.index也同样报错!
 
已自行解决,谢谢
 
接受答案了.
 
后退
顶部