func init
	// adds using namespace
	sys.add_use('D.Net.EmailInterfaces')
	sys.add_use('D.Net.EmailClient')

	// initialize instance
	this.mail = sys.get_undef_manager("MailClient")

	// initialize events
	if(linked('onMessagesLoaded'))
		sys.event_add('onMessagesLoaded', 'EmailClient_OnMessagesLoaded', '', 'OnMessagesLoaded', this.mail)
		sys.event_imp('onMessagesLoaded', '', '((IEmailClient)sender).Messages', '', 'Object sender')
	end
end

func doLoadMessages(data)
	blk.println(this.mail, '.SetCurrentFolder(', d("Folder"), ');')
	.println(this.mail, '.LoadMessages();')
end

func doLoadRecentMessages(data)
	blk.println(this.mail, '.SetCurrentFolder(', d("Folder"), ');')
	.println(this.mail, '.LoadRecentMessages(', d("Recent"), ');')
end

func Messages()
	return(this.mail + '.Messages')
end