I’m trying to output a group of arrays to a dotNet Textbox, and I can only seem to output either a single entry in the array, or text in quotations. Put the below together to demonstrate the issue. Does anyone know of the correct way to do this, or a better way to output all the entries in an array without having my user open the Listener?
fn arrayPopulate =
(
selected = $selection
theArray
theArray = selected as array
return theArray
)
theArray = arrayPopulate()
try destroyDialog test catch()
rollout test " .NET Textbox" width:500 height:900
(
dotNetControl dncText "System.Windows.Forms.Textbox" width:480 height:880 align:#center
on test open do
(
dncText.Font = dotNetObject "System.Drawing.Font" "MS Sans Serif" 8 ((dotNetClass "System.Drawing.FontStyle").Regular)
dncText.BorderStyle = (dotNetClass "System.Windows.Forms.BorderStyle").FixedSingle
dncText.BackColor = (dotNetClass "System.Drawing.Color").fromARGB (((colorMan.getColor #background) * 255)[1] as integer) (((colorMan.getColor #background) * 255)[2] as integer) (((colorMan.getColor #background) * 255)[3] as integer)
dncText.ForeColor = (dotNetClass "System.Drawing.Color").fromARGB (((colorMan.getColor #text) * 255)[1] as integer) (((colorMan.getColor #text) * 255)[2] as integer) (((colorMan.getColor #text) * 255)[3] as integer)
dncText.MultiLine = true
dncText.WordWrap = false
dncText.ScrollBars = (dotNetClass "System.Windows.Forms.ScrollBars").Vertical
dncText.Text =
(
for i = 1 to theArray.count do
(
print theArray[i]
)
)
)
)
createDialog test