Namespace: Consultingwerk.Studio.ProcedureEditor
Class 
ProcedureEditorForm Copy to Clipboard
Parent classes:
Progress.Windows.Form
Consultingwerk.Forms.BaseForm
Consultingwerk.Studio.ProcedureEditor.ProcedureEditorBaseForm
Consultingwerk.Studio.ProcedureEditor.ProcedureEditorForm

Inherits: Consultingwerk.Studio.ProcedureEditor.ProcedureEditorBaseForm
Implements: IBaseForm, ICustomTypeDescriptor, Consultingwerk.WindowIntegrationKit.Forms.IEmbeddedWindowForm, IHasDesignerVerbs, IHasSecurityKey

File:ProcedureEditorForm
Purpose:Uses the WinKit to embed the ADE Procedure Editor into
a .NET Form
Author(s):Mike Fechner / Consultingwerk Ltd.
Created:Fri Dec 18 22:28:25 CET 2009
Notes:This class is only accessible on Windows

Navigate to: Methods | Constructors | Events | Properties | ProDatasets | Temp-Tables



Top Method Summary
Options Name Purpose
CheckSyntax () Checks the Syntax of the current source code
CloseFromCode () Closes the Form after unsubscribing it's own FormClosing event handle
EmbedWindow (handle) Creates a new instance of the Progress.Windows.WindowContainer instance and embeds the given window widget in that instance - but does not parent the WindowContainer instance in the Form (THIS-OBJECT). This is delayed till later.
FinalizeEmbedding () Finalize the embedding of an ABL window widget by parenting the Progress.Windows.WindowContainer instance in the Form (THIS-OBJECT). Sets the Form Text property and applies the window-resized event to the window widget.
FormClosingHandler (Object, FormClosingEventArgs) Event Handler for the FormClosing event of the Form. When a window is embedded, the FormClosing event will be cancelled and the WINDOW-CLOSE event to the window will be applied.
InitializeComponent ()
InsertText (character, integer) Inserts text in the Procedure Editor at the given line
MoveCursor (integer) Moves editor cursor to a specified line number, column 1.
RefreshButtons () Refreshes the state of all overlay buttons in the IEmbeddedWindowForm
CHARACTER Save () Saves the Editor contents
CHARACTER SaveToTemporaryFile () Saves the Editor contents to a temporary file
ultraToolbarsManager1_ToolClick (Object, ToolClickEventArgs) Event handler for the ToolClick event of the ultraToolbarsManager1
UpdateWindowAttributes () Update Form properties with Properties from the WindowWidget

Top Constructor Summary
Options Name Purpose
ProcedureEditorForm () Constructor for the ProcedureEditorForm class

Top Property Summary
Options Name Purpose
System.Windows.Forms.Control ClientArea
LOGICAL IsModified
LOGICAL IsReadOnly
INTEGER WindowContainerColOffset
INTEGER WindowContainerRowOffset


Method Detail
Top

CheckSyntax ()
Purpose: Checks the Syntax of the current source code
Notes:

Top

CloseFromCode ()
Purpose: Closes the Form after unsubscribing it's own FormClosing event handle
Notes: Invoked from src/winkit/closewindow.i after the ABL window WINDOW-CLOSE
event handler has not cancelled the closing of the WINDOW and Form

Top

EmbedWindow (handle)
Purpose: Creates a new instance of the Progress.Windows.WindowContainer
instance and embeds the given window widget in that instance -
but does not parent the WindowContainer instance in the Form
(THIS-OBJECT). This is delayed till later.
Notes: Required due to incompatibility issues with the Infragistics
UltraTabbedMdiManager.

Parameters:
phWindow HANDLE
The handle of the WINDOW widget to embed
Top

FinalizeEmbedding ()
Purpose: Finalize the embedding of an ABL window widget by parenting
the Progress.Windows.WindowContainer instance in the Form
(THIS-OBJECT). Sets the Form Text property and applies the
window-resized event to the window widget.
Notes: Required due to incompatibility issues with the Infragistics
UltraTabbedMdiManager.

Top

FormClosingHandler (Object, FormClosingEventArgs)
Purpose: Event Handler for the FormClosing event of the Form. When a window
is embedded, the FormClosing event will be cancelled and the
WINDOW-CLOSE event to the window will be applied.
Notes: The window is responsible for deleting the Form.
{src/adecommx/closewindow.i} can be used in the ON CLOSE OF THIS-
PROCEDURE trigger for that purpose

Parameters:
sender System.Object
The System.Object that raised the event
e System.Windows.Forms.FormClosingEventArgs
The FormClosingEventArgs with the data for this event
Top

InitializeComponent ()

Top

InsertText (character, integer)
Purpose: Inserts text in the Procedure Editor at the given line
Notes:

Parameters:
pcText CHARACTER
The text to insert
piLine INTEGER
The line number to insert the text
Top

MoveCursor (integer)
Purpose: Moves editor cursor to a specified line number, column 1.
Notes: If entered line is greater than number of lines in buffer, then
move to EOF.

Parameters:
piLine INTEGER
The line number to move the cursor to
Top

RefreshButtons ()
Purpose: Refreshes the state of all overlay buttons in the IEmbeddedWindowForm
Notes: Actually this method has no functionally, but is required for the
implementation of the Interface IEmbeddedWindowForm

Top

CHARACTER Save ()
Purpose: Saves the Editor contents
Notes:

Returns CHARACTER
The name of the file
Top

CHARACTER SaveToTemporaryFile ()
Purpose: Saves the Editor contents to a temporary file
Notes: Useful for parsing with Proparse

Returns CHARACTER
The name of the temporary file
Top

ultraToolbarsManager1_ToolClick (Object, ToolClickEventArgs)
Purpose: Event handler for the ToolClick event of the ultraToolbarsManager1
Notes:

Parameters:
sender System.Object
The reference to the object that raised the event
e Infragistics.Win.UltraWinToolbars.ToolClickEventArgs
The ToolClickEventArgs with the data for this event
Top

UpdateWindowAttributes ()
Purpose: Update Form properties with Properties from the WindowWidget
Notes:



Constructor Detail
Top

ProcedureEditorForm ()
Purpose: Constructor for the ProcedureEditorForm class
Notes:



Property Detail
Top

System.Windows.Forms.Control ClientArea

Returns System.Windows.Forms.Control
Top

LOGICAL IsModified

Returns LOGICAL
Top

LOGICAL IsReadOnly

Returns LOGICAL
Top

INTEGER WindowContainerColOffset

Returns INTEGER
Top

INTEGER WindowContainerRowOffset

Returns INTEGER


©2006-2026 Consultingwerk Ltd.         info@consultingwerk.de         http://www.consultingwerk.de       13.04.2026 10:29:43