Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2002-07

VCL VCLX Class Descriptions

7 messages · 4 people ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

James Tabor
to Shane Miller: I usually just look at Delphi's code and determine what they are doing and why. In this…
Shane Miller wrote 11 lines
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

Hi!
Thanks for the reply! Where did you reference this? Could you tell me what book to buy.
Thanks again,
James

Reply by email

James Tabor

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

Reply by email

Mattias Gaertner
to James Tabor: Okay! I found the help files from Borland. Not to bad! James
Show quoted text 5 lines
as you know in delphi you can easily change component to string or string to component which is the heart of dfm files. i want to make some things with free pascal , but i cant do it. Please can you tell me why and how it should be..thanks

The FCL provides very similar functions for component streaming as Delphis VCL. An example how to stream a TForm to a text file (.lfm/.dfm) can be found in main.pp function CreateLFM. Creating a component from a text works just the other way. Convert the text to a binary stream and use a TReader.

Don't know if there is a doc about this topic.

Mattias

Reply by email

James Tabor
to Shane Miller: I didn't reference it anywhere other than Delphi's help file.
Shane Miller wrote 44 lines
I didn't reference it anywhere other than Delphi's help file. >From the help file: >>>> THeader is a sectioned visual control that displays text and allows each section to be resized with the mouse. Unit ExtCtrls Description THeader is provided for backward compatibility. New applications should use THeaderControl instead. >>>> Shane -----Original Message----- From: James Tabor Sent: Friday, July 26, 2002 9:56 AM To: Subject: Re: [lazarus] VCL VCLX Class Descriptions Shane Miller wrote: > > 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 > > Hi! Thanks for the reply! Where did you reference this? Could you tell me what book to buy. Thanks again, James

Hi,
Okay! I found the help files from Borland. Not to bad! Thanks,
James

Reply by email

Shane Miller

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

Earlier message 64 lines
-----Original Message----- From: James Tabor 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 with "unsubscribe" as the Subject archives at http://www.miraclec.com/list_archives/lazarus

Reply by email