首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

问几个delphi的属性有关问题

2012-02-23 
问几个delphi的属性问题edit.begindrag(false,10)表面看应该是开始拖动里面的false,10参数本别对应什么?p

问几个delphi的属性问题
edit.begindrag(false,10);表面看应该是开始拖动里面的false,10参数本别对应什么? 


procedure TDragForm.ListDragOver(Sender, Source: TObject; X, Y: Integer;
  State: TDragState; var Accept: Boolean);
begin
  Accept := True;
  if (Source = Edit1) and
  ((Sender as TCustomListBox).Items.IndexOf (Edit1.Text) >= 0) then
  Accept := False;
end


这个事件的accept起什么作用?

state是做什么用的?

[解决办法]
accept作用是,是否接受拖放,你自己弄一个试试便知
[解决办法]
ACCEPT 为true DragDown事件才会被触发

拖放一个东西到list上,通过ondragover判断是否负责条件,accept为true.会改变光标为拖放光标,否则则是禁止光标,在dragdown时判断accept 为true则触发事件了

热点排行