Inherits from
TForm
procedure CheckBox1Click(Sender: TObject);
procedure CheckBox2Click(Sender: TObject);
procedure CheckBox3Click(Sender: TObject);
procedure CheckBox4Click(Sender: TObject);
procedure CheckBox5Click(Sender: TObject);
procedure CheckBox6Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure ListView1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure OnDragFinished(DropEffect : TMyDropEffect);
procedure OnDrop(DropString : string; Point : TPoint);
procedure ProcessAllowDrag(EF : TMyAllowedDropEffects; CB : TCheckBox);
procedure ProcessAllowDrop(EF : TMyAllowedDropEffects; CB : TCheckBox);
CheckBox1 : TCheckBox;
CheckBox2 : TCheckBox;
CheckBox3 : TCheckBox;
CheckBox4 : TCheckBox;
CheckBox5 : TCheckBox;
CheckBox6 : TCheckBox;
GroupBox1 : TGroupBox;
GroupBox2 : TGroupBox;
ImageList1 : TImageList;
ListView1 : TListView;
Panel1 : TPanel;
Panel2 : TPanel;
DragedItem : TListItem;
MyWrapper : TMyOLEDragDropInterface;
Private declarations
procedure CheckBox1Click(Sender: TObject);
procedure CheckBox2Click(Sender: TObject);
procedure CheckBox3Click(Sender: TObject);
procedure CheckBox4Click(Sender: TObject);
procedure CheckBox5Click(Sender: TObject);
procedure CheckBox6Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure ListView1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
procedure OnDragFinished(DropEffect : TMyDropEffect);
procedure OnDrop(DropString : string; Point : TPoint);
procedure ProcessAllowDrag(EF : TMyAllowedDropEffects; CB : TCheckBox);
procedure ProcessAllowDrop(EF : TMyAllowedDropEffects; CB : TCheckBox);
CheckBox1 : TCheckBox;
CheckBox2 : TCheckBox;
CheckBox3 : TCheckBox;
CheckBox4 : TCheckBox;
CheckBox5 : TCheckBox;
CheckBox6 : TCheckBox;
GroupBox1 : TGroupBox;
GroupBox2 : TGroupBox;
ImageList1 : TImageList;
ListView1 : TListView;
Panel1 : TPanel;
Panel2 : TPanel;
DragedItem : TListItem;
MyWrapper : TMyOLEDragDropInterface;
Private declarations