if VCL.MessageDlg("Are you Sure?","mtConfirmation",{"mbYes","mbNo"}) == "mrYes" then
	VCL.ShowMessage("Ok. Correct")
else
	VCL.MessageDlg("Bad answer\nThe correct answer is the Yes button!","mtError","mbOk")
end

local filepath = VCL.Application():ExePath()
local filename = ""
local fileopenoptions = {"ofAllowMultiSelect", "ofFileMustExist"}

filename = VCL.OpenDlg(filename,"Open Lua script",filepath,"Lua scripts (*.lua)|*.LUA",fileopenoptions)

if type(filename)=="table" then
	VCL.ShowMessage("Selected files:\n"..table.concat(filename,"\n"))
elseif type(filename)=="string" then
   VCL.ShowMessage("File selected: "..filename)
else
	VCL.ShowMessage("Cancelled")
end

if filename then
	filename = VCL.SaveDlg(filename,"Save Lua script",filepath,"Lua scripts (*.lua)|*.LUA",fileopenoptions)
end