diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-14 15:04:05 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-08-14 15:04:05 +0000 |
commit | acc50fa5d7ef195ae5f1746130a7edee646feab7 (patch) | |
tree | 35f0d6b51b76727ad0743685aaceeae42b00f20a /src/corelib | |
parent | 856316cb9bdcc51fc9ccd9d0dd0276197e69ad69 (diff) | |
download | fpGUI-acc50fa5d7ef195ae5f1746130a7edee646feab7.tar.xz |
* Updated a few scripts in the docs directory.
* Minor changes in the style unit.
* Added a new examples/apps/docedit project. Once complete it will be a demo
application of fpGUI and at the same time show most used widgets in action.
DocEdit will become something like lazde is to Lazarus.
Diffstat (limited to 'src/corelib')
-rw-r--r-- | src/corelib/fpgfx.pas | 2 | ||||
-rw-r--r-- | src/corelib/gfxbase.pas | 8 |
2 files changed, 7 insertions, 3 deletions
diff --git a/src/corelib/fpgfx.pas b/src/corelib/fpgfx.pas index daa244c1..cd13ccef 100644 --- a/src/corelib/fpgfx.pas +++ b/src/corelib/fpgfx.pas @@ -133,6 +133,8 @@ type public constructor Create(awin: TfpgWindow); reintroduce; destructor Destroy; override; + + // As soon as TfpgStyle has moved out of CoreLib, these must go! procedure DrawButtonFace(x, y, w, h: TfpgCoord; AFlags: TFButtonFlags); procedure DrawButtonFace(r: TfpgRect; AFlags: TFButtonFlags); procedure DrawControlFrame(x, y, w, h: TfpgCoord); diff --git a/src/corelib/gfxbase.pas b/src/corelib/gfxbase.pas index 8d7f814f..5554fbcd 100644 --- a/src/corelib/gfxbase.pas +++ b/src/corelib/gfxbase.pas @@ -337,10 +337,12 @@ type procedure ReleaseWindowHandle; procedure SetWindowTitle(const ATitle: string); virtual; public + // The standard constructor. constructor Create(AOwner: TComponent); override; - // make some setup before the window shows - procedure AdjustWindowStyle; virtual; // forms modify the window creation parameters - procedure SetWindowParameters; virtual; // invoked after the window is created + // Make some setup before the window shows. Forms modify the window creation parameters. + procedure AdjustWindowStyle; virtual; + // Make some setup before the window shows. Invoked after the window is created. + procedure SetWindowParameters; virtual; // general properties and functions function Right: TfpgCoord; function Bottom: TfpgCoord; |