关于listview图片拖动问题(100分)

V

vj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-26

• #1

现在我在做一个毕业设计，要求实现面向多对象的设备监控，要求实现可以从列表中拖动
任意设备（图片显示）进入监控主界面即可对其进行监控。我现在用listview来做列表，
同时用drag来实现拖动，不过现在有几个问题，需要解决，希望各位能多多相助。
首先用listview实现多图标显示，然后选择一图标进行拖动，拖动到一个panel上，
可以在指定位置显示，这个怎么实现？我现在只能在运行后listview内部拖动，另外
多图标显示也没有解决，有没有人能帮忙回答一下。以前的文章我看了，还是不大明白，
我初学delphi不到一周，要是问题太过简单也请大家不要责怪

 

Z

zhai_xin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-26

• #2

将listview的dragmode:＝dmAutomatic

procedure TfrmDrag.Panel1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
Accept := Source is TListView;
end;

procedure TfrmDrag.Panel1DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
ToolButton1.ImageIndex := ListView1.Selected.ImageIndex;
end;

 

天

天与地

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-26

• #3

我以前做过两个不同Listview间的拖动，牵扯到句柄的传递，看看这方面的东西吧。

 

V

vj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-27

• #4

zhai_xin，这段程序里是要加button,必须拖放到指定位置是吧，但是我得要求是可以拖放
到任何位置，而且拖放后，可以继续从 listview里拖放任何图片到panel的任何位置

 

V

vj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-27

• #5

天与地，你所说的这些哪里可以找到

 

Z

zhai_xin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-28

• #6

不会呀，你只要把图片拖到你想激活事件的控件上就可以了！

 

V

vj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-28

• #7

ToolButton1和TFmdrag这在编译的时候都会出问题阿，
如果只有一个listview和panel的话

 

V

vj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-09

• #8

接受答案了.