问几个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则触发事件了