|
I support a large application. A modification has been requested and coded to have the code reside under "C:\Program Files\SupportAssistants". Note the space in "Program Files". SupportAssistants is simply the name of the app.
I don't know if there is a relationship, but code that worked before does not work now. See code below. After the BeginUpdate / EndUpdate methods, the Showmodal method is called. When called, the statement "$frmLoadFile.ShowModal" will completely shut down the application. Does anyone have an idea of what is causing this?
FUNCTION fnLoad_Click()
DIM $Nul, $frmLoadFile, $LineComputerList, $aColumnNames, $ColumnName, $ColumnIndex, $Item, $Index
IF Exist($FileComputerList)
IF Open(10, $FileComputerList, 2) = 0
$frmRTA.BeginUpdate
$frmLoadFile = $System.Form($frmRTA)
$frmLoadFile.ClientWidth = 275
$frmLoadFile.ClientHeight = 30
$frmLoadFile.BackColor = $frmRTA.BackColor
$frmLoadFile.Text = "Loading " + $NameComputerList
$frmLoadFile.FormBorderStyle = 5
$frmLoadFile.ControlBox = 0
$frmLoadFile.Center
$frmLoadFile.KeyPreview = 1
$frmLoadFile.OnKeyDown = "fnForm_KeyboardDetect()"
$frmLoadFile.lblLoadFile = fnCreateLabel($frmLoadFile, $iMargin, ($frmLoadFile.ClientHeight - $iHeight) / 2, $frmLoadFile.ClientWidth - (2 * $iMargin), $iHeight,,
"",,,,,)
$frmLoadFile.lblLoadFile.Alignment = 2
$frmRTA.EndUpdate
$frmLoadFile.ShowModal
| 
