Problem:
This demo shows how to use the paint method for a window created by Dialog System
Resolution:
INTRODUCTION
==========
Example of creating a window and trapping the paint method.
SOURCE FILES:
==========
Program Files Description
--------------------- -----------------------------------------------------------
PaintMe.cbl PaintMe is just the trigger program that creates aPaintWindow. MakePaintWin.cbl Program makes a paint window. Although no local-storage is used, this
section is needed to allow EntryCallback based recursive calls to the entry
points of this program.
Paintwindow.cbl PaintWindow is a class program that creates a window with painted graphics
and then traps the windows "paint" method to force the window to refresh
the graphics. NewSet.gs Screenset for the painting.
Copy Files:
--------------------- -----------------------------------------------------------
ds-call.cpy These copybooks for the screenset Newset.gs and for the data needed in
ds-cntrl.mf the cobol program Paintwindow.cbl
Guibase.if The rest of the copybooks are for the class methods.
P2cevent.cpy
Sdiframe.if
Strcture.cpy
Userctrl.cpy
Resource Files:
--------------------- -----------------------------------------------------------
windows gui class libraries.
REQUIREMENTS:
==========
Windows gui class libraries installed.
OPERATION:
========
Just animate the paintme.exe and step through the calls and invokes to see how the methods are called or invoked.
==========================================================
Keywords: demonstration, sample, example, demo, Dialog System, dspaint.zip
demo.ex
demo.ne