Sign in Join

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

Mailing lists / lazarus / 1999-07

More stuff added to CVS

3 messages · 3 people ·

Reply by email Subscribe to this list Your subscription

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

Michael A. Hess

I have adjusted the TColor structure and standard colors to match those found in Delphi so that we have compatability. I rewrote the TColorToTGdkColor to match the correct TColor structure. I also added a TGdkColorToTColor so that gtk colors can be turned into lcl colors.

TColorDialog is finished and working. You can see it working in the comDialogs example. If you select a color it changes the background color of the demo window. The only problem is that the refresh routines for the window aren't fired when you change the color. So to see the new color after you select it in the ColorDialog and close the ColorDialog just slightly resize the demo window. You will then see the new background color.

I'll add some labels to the demo window so that you will be able to see the results of the OpenDialog and SaveDialog.

I started to adjust the IntSendMessage routines in gtkint. I added a data parameter to the IntSendMessage3 routine. It isn't used yet but I have added it so that we can more easily combine IntSendMessage2 and 3 as well as the IntSendMessage routines into just one routine. For the time being if you are using IntSendMessage just add nil as the 3rd parameter.

I wasn't able to start moving the gtk specific files into a separate directly as of yet. Maybe if I have time tomorrow I will do that.

I started to ad $Log flags to the bottom of any file I edit so that changes will be added to the bottom of files when the are committed to CVS. Please do the same if you edit a file that doesn't have one. Just add

{
$Log: timer.inc,v $
}

change the file name to match the name of the file you are adding it to.

==== Programming my first best destiny! ==== Michael A. Hess Miracle Concepts, Inc. http://www.miraclec.com

Reply by email

Baeseman, Cliff

I will have a look at the errors tonight and try and track down the problem.

Cliff

Earlier message 33 lines
-----Original Message----- From: Curtis White Sent: Wednesday, August 04, 1999 12:13 AM To: Subject: [lazarus] More Notebooks now in CVS I just created a new TCustomNotebook component in extctrls.pp and customnotebook.inc. I changed TNotebook and the new TTabbedNotebook (in tabnotbk.pp) to both inherit from TCustomNotebook. So now TNotebook acts like a Dellphi TNotebook and the TTabbedNotebook works like the same component in Delphi. I also fixed the notebook example to show both the TNotebook and the TTabbedNotebook components. I have committed all this to CVS. For some reason, these components write out a bunch of gtk errors to the console. I don't know where these are coming from. Can someone take a look at it and see if you can see where these are coming from? Apparently I have been looking at my code for too long and cannot find the problem. Curtis _________________________________________________________________ To unsubscribe: mail with "unsubscribe" as the Subject archives at http://www.miraclec.com/list_archives/lazarus

Reply by email

Curtis White
to Michael A. Hess: I have adjusted the TColor structure and standard colors to match those found in Delphi…

I just created a new TCustomNotebook component in extctrls.pp and customnotebook.inc. I changed TNotebook and the new TTabbedNotebook (in tabnotbk.pp) to both inherit from TCustomNotebook. So now TNotebook acts like a Dellphi TNotebook and the TTabbedNotebook works like the same component in Delphi.

I also fixed the notebook example to show both the TNotebook and the TTabbedNotebook components.

I have committed all this to CVS.

For some reason, these components write out a bunch of gtk errors to the console. I don't know where these are coming from. Can someone take a look at it and see if you can see where these are coming from? Apparently I have been looking at my code for too long and cannot find the problem.

Curtis

Reply by email