[lazarus] Win32 Installer/Lazarus

Baeseman, Cliff Cliff.Baeseman at greenheck.com
Wed Jul 21 15:45:20 EDT 1999


Yes I agree also because you can just open up one unit and see all of the
class definitions.

Cliff

-----Original Message-----
From: Stefan Hille [mailto:stoppok at osibisa.ms.sub.org]
Sent: Wednesday, July 21, 1999 2:15 PM
To: lazarus at miraclec.com
Subject: Re: [lazarus] Win32 Installer/Lazarus


Hi!

On Tue, Jul 20, 1999 at 06:52:26PM -0500, Cliff Baeseman wrote:
> I will do this while moving the stuff to .inc files. I am going to start
> with forms first. I plan on breaking out each class into its own .inc.
> Should the headers be seperated also?

I'm not sure about this because it suggests a separate header file and I'd 
really hate to see this C-ish approach.

Hmm, what about the following:

---- file: stdctrls.pp

Unit stdctrls;

INTERFACE

{$define INCLUDE_INTERFACE}

	{$i checkbox.inc}

{$undef  INCLUDE_INTERFACE} 

IMPLEMENTATION

{$define  INCLUDE_IMPLEMETATION} 

	{$i checkbox.inc}

{$undef  INCLUDE_IMPLEMETATION} 

end.

---- file: checkbox.inc

{$ifdef INCLUDE_INTERFACE}

	TCheckBox = class 
	public
	  constructor Create (AOwner : TObject);
	end;
{$else}
   {$ifdef INCLUDE_IMPLEMENTATION}

	constructor TCheckBox.Create (AOwner : TObject);
	begin
	end;

   {$endif}
{$endif}
----

bye,

  Stefan

-- 
---------------------------------------------------------
Stefan Hille          email: stoppok at osibisa.ms.sub.org 
48155 Muenster	      voice: 0251/664695 

_________________________________________________________________
     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