| Name | Initial value |
|---|---|
| DoCreate | .T. |
| npagelist | 2 |
| Name | Initial value |
|---|---|
| InitialSelectedAlias | "vfxusr" |
| Baseclass | Class | Object name |
|---|---|---|
| cursor | cursor | Dataenvironment.Cursor1 |
| Name | Initial value |
|---|---|
| Alias | "vfxusr" |
| CursorSource | ..\data\vfxusr.dbf |
| Order | "user" |
| Baseclass | Class | Object name |
|---|---|---|
| zzz | zzz | frmUserList.CNTSPEEDBAR |
| frmUserList.lblMsgEmpty | ||
| frmUserList.pgfPageFrame |
| Name | Initial value |
|---|---|
| ErasePage | .T. |
| Baseclass | Class | Object name |
|---|---|---|
| zzz | zzz | frmUserList.pgfPageFrame.Page1 |
| frmUserList.pgfPageFrame.Page2 |
| Name | Initial value |
|---|---|
| TabIndex | 17 |
| Name | Initial value |
|---|---|
| TabIndex | 11 |
| Name | Initial value |
|---|---|
| TabIndex | 13 |
| Name | Initial value |
|---|---|
| TabIndex | 15 |
| Name | Initial value |
|---|---|
| TabIndex | 3 |
| Name | Initial value |
|---|---|
| TabIndex | 1 |
| Name | Initial value |
|---|---|
| TabIndex | 9 |
| Name | Initial value |
|---|---|
| TabIndex | 5 |
| Name | Initial value |
|---|---|
| TabIndex | 7 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.firstview" |
| TabIndex | 12 |
| Baseclass | Class | Object name |
|---|---|---|
| zzz | zzz | frmUserList.pgfPageFrame.Page1.opgFirstView.Option1 |
| frmUserList.pgfPageFrame.Page1.opgFirstView.Option2 |
| Name | Initial value |
|---|---|
| Value | 1 |
| Name | Initial value |
|---|---|
| Value | 0 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.formsize" |
| Format | "9.9" |
| TabIndex | 14 |
| Name | Initial value |
|---|---|
| ControlSource | "thisform.nlastfile" |
| Format | "9" |
| TabIndex | 16 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.userlevel" |
| TabIndex | 6 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.password" |
| TabIndex | 4 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.user" |
| TabIndex | 2 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.useraccess" |
| TabIndex | 10 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.user_name" |
| TabIndex | 8 |
| Baseclass | Class | Object name |
|---|---|---|
| zzz | zzz | frmUserList.pgfPageFrame.Page2.grdGrid |
| Name | Initial value |
|---|---|
| ColumnCount | 3 |
| Panel | 1 |
| ReadOnly | .T. |
| RecordSource | "VFXUSR" |
| Baseclass | Class | Object name |
|---|---|---|
| zzz | zzz | frmUserList.pgfPageFrame.Page2.grdGrid.Column1 |
| frmUserList.pgfPageFrame.Page2.grdGrid.Column3 | ||
| frmUserList.pgfPageFrame.Page2.grdGrid.Column4 |
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.user" |
| FontBold | .F. |
| FontName | "Arial" |
| ReadOnly | .T. |
| Baseclass | Class | Object name |
|---|---|---|
| header | header | frmUserList.pgfPageFrame.Page2.grdGrid.Column1.Header1 |
| textbox | textbox | frmUserList.pgfPageFrame.Page2.grdGrid.Column1.Text1 |
| Name | Initial value |
|---|---|
| Caption | "User" |
| FontBold | .F. |
| FontName | "Arial" |
this.Parent.Parent.OnSetOrder(this.Parent)
| Name | Initial value |
|---|---|
| BorderStyle | 0 |
| ColorSource | 3 |
| Comment | "vfxusr.user" |
| FontBold | .F. |
| FontName | "Arial" |
| ForeColor | 0,0,0 |
| Margin | 0 |
IF !thisForm.lEmpty
IF !(TYPE("this.ControlSource") $ "MG")
this.Parent.Parent.OnKeyEnter()
NODEFAULT
ENDIF
ENDIF
LPARAMETERS nKeyCode, nShiftAltCtrl
this.Parent.Parent.oControl = this
IF this.Parent.Parent.OnKeyPress( nKeyCode, nShiftAltCtrl)
NODEFAULT
ENDIF
this.Parent.Parent.oControl = .NULL.
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.user_name" |
| FontBold | .F. |
| FontName | "Arial" |
| ReadOnly | .T. |
| Baseclass | Class | Object name |
|---|---|---|
| header | header | frmUserList.pgfPageFrame.Page2.grdGrid.Column3.Header1 |
| textbox | textbox | frmUserList.pgfPageFrame.Page2.grdGrid.Column3.Text1 |
| Name | Initial value |
|---|---|
| Caption | "User Name" |
| FontBold | .F. |
| FontName | "Arial" |
this.Parent.Parent.OnSetOrder(this.Parent)
| Name | Initial value |
|---|---|
| BorderStyle | 0 |
| ColorSource | 3 |
| Comment | "vfxusr.user_name" |
| FontBold | .F. |
| FontName | "Arial" |
| ForeColor | 0,0,0 |
| Margin | 0 |
IF !thisForm.lEmpty
IF !(TYPE("this.ControlSource") $ "MG")
this.Parent.Parent.OnKeyEnter()
NODEFAULT
ENDIF
ENDIF
LPARAMETERS nKeyCode, nShiftAltCtrl
this.Parent.Parent.oControl = this
IF this.Parent.Parent.OnKeyPress( nKeyCode, nShiftAltCtrl)
NODEFAULT
ENDIF
this.Parent.Parent.oControl = .NULL.
| Name | Initial value |
|---|---|
| ControlSource | "vfxusr.userlevel" |
| FontBold | .F. |
| FontName | "Arial" |
| ReadOnly | .T. |
| Baseclass | Class | Object name |
|---|---|---|
| header | header | frmUserList.pgfPageFrame.Page2.grdGrid.Column4.Header1 |
| textbox | textbox | frmUserList.pgfPageFrame.Page2.grdGrid.Column4.Text1 |
| Name | Initial value |
|---|---|
| Caption | "User Level" |
| FontBold | .F. |
| FontName | "Arial" |
this.Parent.Parent.OnSetOrder(this.Parent)
| Name | Initial value |
|---|---|
| BorderStyle | 0 |
| ColorSource | 3 |
| Comment | "vfxusr.userlevel" |
| FontBold | .F. |
| FontName | "Arial" |
| ForeColor | 0,0,0 |
| Margin | 0 |
IF !thisForm.lEmpty
IF !(TYPE("this.ControlSource") $ "MG")
this.Parent.Parent.OnKeyEnter()
NODEFAULT
ENDIF
ENDIF
LPARAMETERS nKeyCode, nShiftAltCtrl
this.Parent.Parent.oControl = this
IF this.Parent.Parent.OnKeyPress( nKeyCode, nShiftAltCtrl)
NODEFAULT
ENDIF
this.Parent.Parent.oControl = .NULL.