[lazarus] VCL VCLX Class Descriptions

Shane Miller smiller1 at stvgb.org
Fri Jul 26 08:48:31 EDT 2002


I usually just look at Delphi's code and determine what they are doing
and why.

In this case, I see that Delphi 6 has support for THeader for backward
compatibility   only and suggests you use THeaderControl.  Maybe you
should convert that class instead.

Shane


-----Original Message-----
From: James Tabor
[mailto:jimtabor at adsl-64-217-116-74.dsl.hstntx.swbell.net] 
Sent: Friday, July 26, 2002 1:00 AM
To: Lazarus-Group
Subject: [lazarus] VCL VCLX Class Descriptions

Hi All,
Is there any online information on the Classes used with Delphi? Any
books?
Like for THeader in ExtCtrls. This is what I have for now in
extctrls.pp.

uses Messages;

  THeader = class(TCustomControl)
  private
           procedure FreeSection;
           function  GetWith(X: Integer): integer;
           procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: integer); override;
           procedure MouseMove(Shift: TShiftState; X, Y: integer);
override;
           procedure MouseUp(Button: TMouseButton; Shift: TShiftState;
X, Y: integer); override;
           procedure SetBorderStyle(Value: TBorderStyle);
           procedure SetSection(Strings: TStrings);
           procedure SetWidth(X: Integer; Value: Integer);
           procedure WMNCHitTest(var Msg: TWMNCHitTest); message
WM_NCHITTEST;
           procedure WMSetCursor(var Msg: TWMSetCursor); message
WM_SETCURSOR;

  protected
           procedure CreateParams(var Params: TCreateParams); override;
           procedure Paint; override;
//           procedure Sized(ASection, AWidth; Integer); ???;
//           procedure Sizing(ASection, AWidth; Integer); ???;

  public
           constructor Create(AOwner: TComponent); override;
           destructor Destroy; override;
  published
           property Align;
//           property AllowResize; Boolean read ???? write ??? default
???;
//           property BorderStyle; TBorderStyle read ??? write ???
default ???;

  end;

I have not written the THeader.inc for these functions in this class
yet. I would
like to have more information on what some of these procedures do, other
than
just guess or write stubs!

Thanks,
James

_________________________________________________________________
     To unsubscribe: mail lazarus-request at miraclec.com with
                "unsubscribe" as the Subject
    archives at http://www.miraclec.com/list_archives/lazarus






More information about the Lazarus mailing list