Class tdockdragobject

Fields

Properties

Unit

type tdockdragobject = class(twidgetdragobject)

No description available, ancestor twidgetdragobject description follows

No description available, ancestor tdragobject description follows

No description available, ancestor tnullinterfacedobject description follows

	`procedure drawxorpic;`
	`procedure setxorwidget(const awidget: twidget; const screenrect: rectty);`
	`constructor create(const adock: tdockcontroller; const asender: twidget; var instance: tdragobject; const apickpos: pointty);`
	`destructor destroy; override;`
	`procedure refused(const apos: pointty); override;`

	`procedure drawxorpic;`

	`procedure setxorwidget(const awidget: twidget; const screenrect: rectty);`

	`constructor create(const adock: tdockcontroller; const asender: twidget; var instance: tdragobject; const apickpos: pointty);`

	`destructor destroy; override;`

	`procedure refused(const apos: pointty); override;`

Generated by PasDoc 0.16.0.