Class tmimedragobject

Unit

msemime

Declaration

type tmimedragobject = class(tdragobject, iobjectlink)

Description

Hierarchy

• tobject
• tnullinterfacedobject
• tdragobject
• tmimedragobject

Overview

Fields

	fformats: msestringarty;
	fformatistext: booleanarty;
	fformatindex: integer;
	fwantedformatindex: integer;
	fintf: imimesource;

Methods

	function getdata: string; virtual;
	function gettext: msestring; virtual;
	procedure setdata(const avalue: string); virtual;
	procedure settext(const avalue: msestring); virtual;
	procedure link(const source,dest: iobjectlink; valuepo: pointer = nil; ainterfacetype: pointer = nil; once: boolean = false);
	procedure unlink(const source,dest: iobjectlink; valuepo: pointer = nil);
	procedure objevent(const asender: iobjectlink; const event: objecteventty);
	function getinstance: tobject;
	constructor create(const asender: tobject; var instance: tdragobject; const apickpos: pointty; const aformats: array of msestring; const aformatistext: array of boolean; const aactions: dndactionsty = []; const aintf: imimesource = nil); virtual;
	constructor createwrite(const asender: tobject; var instance: tdragobject; const apickpos: pointty; const aformats: array of msestring; const aformatistext: array of boolean; const aactions: dndactionsty = []; const aintf: imimesource = nil);
	destructor destroy; override;
	function checkformat(const awanted: array of msestring): boolean;
	function convertmimedata(const atypeindex: integer): string; virtual;
	function convertmimetext(const atypeindex: integer): msestring; virtual;

Properties

	property formats: msestringarty read fformats;
	property formatistext: booleanarty read fformatistext;
	property formatindex: integer read fformatindex write setformatindex default -1;
	property wantedformatindex: integer read fwantedformatindex write fwantedformatindex default -1;
	property data: string read getdata write setdata;
	property text: msestring read gettext write settext;

Description

Fields

	fformats: msestringarty;

	fformatistext: booleanarty;

	fformatindex: integer;

	fwantedformatindex: integer;

	fintf: imimesource;

Methods

	function getdata: string; virtual;

	function gettext: msestring; virtual;

	procedure setdata(const avalue: string); virtual;

	procedure settext(const avalue: msestring); virtual;

	procedure link(const source,dest: iobjectlink; valuepo: pointer = nil; ainterfacetype: pointer = nil; once: boolean = false);

	procedure unlink(const source,dest: iobjectlink; valuepo: pointer = nil);

	procedure objevent(const asender: iobjectlink; const event: objecteventty);

	function getinstance: tobject;

	constructor create(const asender: tobject; var instance: tdragobject; const apickpos: pointty; const aformats: array of msestring; const aformatistext: array of boolean; const aactions: dndactionsty = []; const aintf: imimesource = nil); virtual;

	constructor createwrite(const asender: tobject; var instance: tdragobject; const apickpos: pointty; const aformats: array of msestring; const aformatistext: array of boolean; const aactions: dndactionsty = []; const aintf: imimesource = nil);

	destructor destroy; override;

	function checkformat(const awanted: array of msestring): boolean;

	function convertmimedata(const atypeindex: integer): string; virtual;

	function convertmimetext(const atypeindex: integer): msestring; virtual;

Properties

	property formats: msestringarty read fformats;

	property formatistext: booleanarty read fformatistext;

	property formatindex: integer read fformatindex write setformatindex default -1;

	property wantedformatindex: integer read fwantedformatindex write fwantedformatindex default -1;

	property data: string read getdata write setdata;

	property text: msestring read gettext write settext;