Welcome
CommonDialogs
1.0.0.0
Ceone
produceone@gmail.com
(string) CommonDialogs.FileOpen ( | (string) DialogTitle = "Open", (string) InitialDirectory = "C:\\Windows\\System32\\", (string) Filter = "Dll Files (*.dll)|*.dll|ALL Files (*.*)|*.*|" ) |
Presents a file browse dialog to the user to collect the paths to one file.
(string) To set Dialog Title
(string) To set Initial Directory
(string) To set Extension Filter.
(string) A string containing file, if user presed cancel function return "". for more perception See below example.
result = CommonDialogs.FileOpen("Dialog Open Title Here", "C:\\Windows\\System32\\", "Dll Files (*.dll)|*.dll|ALL Files (*.*)|*.*|");
if result ~= "" then
Dialog.Message("CommonDialog Save Info", result);
end
CommonDialogs.FileSave ( | (string) DialogTitle = "Open", (string) InitialDirectory = "C:\\Windows\\System32\\", (string) Filter = "Dll Files (*.dll)|*.dll|ALL Files (*.*)|*.*|" ) |
Presents a file browse dialog to the user to collect the paths to one file.
(string) To set Dialog Title
(string) To set Initial Directory
(string) To set Extension Filter.
This action dose not return any value.
result = CommonDialogs.FileSave("Dialog Save Title Here", "C:\\Windows\\System32\\", "Dll Files (*.dll)|*.dll|ALL Files (*.*)|*.*|");
if result ~= "" then
Dialog.Message("CommonDialog Save Info", result);
end
CommonDialogs.Color ( | (number) Style = BasicColorBox, (number) StartColor = nil ) |
Opens the standard requester to choose a color. The chosen color is returned under a 24 bit number containing the red, green and blue value, as usual.
(number) To set Dialog Color Style
CONSTANT | VALUE | DESCRIPTION |
BasicColorBox | 1 | BasicColorBox Style. |
FullColorBox | 2 | FullColorBox Style. |
PreventFullOpen | 4 | PreventFullOpen Style. |
(number) StartColor
This action dose not return any value.
result = CommonDialogs.Color(FullColorBox);
if result ~= nil then
text = "Dec : " .. result.Dec .. "\r\n"
text = text .. "Hex: " .. result.Hex .. "\r\n"
text = text .. "Red: " .. result.Red .. "\r\n"
text = text .. "Green: " .. result.Green .. "\r\n"
text = text .. "Blue: " .. result.Blue
Dialog.Message("CommonDialog Color Info", text);
end
CommonDialogs.Font ( | (table) tblFontValue = nil ) |
Opens the standard requester to choose a font.
(table) To set table font values
This action dose not return any value.
tblFont = {}
tblFont.Name = "Arial"
tblFont.Size = "12"
tblFont.Bold = true
tblFont.Italic = true
tblFont.StrikeThru = false
tblFont.UnderLine = false
tblFont.Color = 255
result = CommonDialogs.Font(tblFont);
if result ~= "" then
text = "Name: " .. result.Name .. "\r\n"
text = text .. "Size: " .. result.Size .. "\r\n"
text = text .. "Bold: " .. tostring(result.Bold) .. "\r\n"
text = text .. "Italic: " .. tostring(result.Italic) .. "\r\n"
text = text .. "StrikeThru: " .. tostring(result.StrikeThru) .. "\r\n"
text = text .. "UnderLine: " .. tostring(result.UnderLine) .. "\r\n"
text = text .. "Color: " .. result.Color
Dialog.Message("Font Info", text);
end
This File Was Generated With AMS ActionFile Editor