Difference between revisions of "Talk:LCL Internals"

From Free Pascal wiki
Jump to navigationJump to search
m (Some remarks)
Line 4: Line 4:
  
 
: On the LCL all those files would be used. wstrayicon would even be on a extra /widgetset/ directory. --[[User:Sekelsenmat|Sekelsenmat]] 14:19, 26 Dec 2005 (CET)
 
: On the LCL all those files would be used. wstrayicon would even be on a extra /widgetset/ directory. --[[User:Sekelsenmat|Sekelsenmat]] 14:19, 26 Dec 2005 (CET)
 +
 +
== Some remarks ==
 +
 +
TQtWidgetSet = Class(TWidgetSet):
 +
In the example of the declaration for TQtWidgetSet, the following functions might be removed in the future:
 +
  procedure SetDesigning(AComponent: TComponent); override;
 +
  function CreateComponent(Sender : TObject): THandle; override; // deprecated
 +
  function CreateTimer(Interval: integer; TimerFunc: TFNTimerProc): integer; override;
 +
  function DestroyTimer(TimerHandle: integer): boolean; override;
 +
 +
TQtWSWinControl.ShowHide:
 +
Please add the next line as first for every TxxxWSYYY.SomeProcUsingAWincontrolHandle
 +
  if not WSCheckHandleAllocated(AWincontrol, 'SomeProcUsingAWincontrolHandle')
 +
  then Exit;
 +
 +
 +
TQtWidgetSet.ShowWindow:
 +
Functions like this might move to corntol implementation itself -> TxxxWSControl.Show
 +
 +
--[[User:Marc|Marc]] 10:39, 12 October 2006 (CEST)

Revision as of 09:39, 12 October 2006

The trayintf.pas unit is not too well explained. If I read this document correctly, it is suposed to be the counterpart of the interfaces unit from the LCL. In this case, I don't think it is necessary to have such a unit, since the registering of the TWSXXXTrayIcon class does all that is needed. (I am not completely sure though) Vincent 19:34, 22 Dec 2005 (CET)

We can change it then. The example is suposed to be very simple and show how the LCL chooses different widgets without IFDEFS. Any work on it will help. --Sekelsenmat 20:37, 22 Dec 2005 (CET)
On the LCL all those files would be used. wstrayicon would even be on a extra /widgetset/ directory. --Sekelsenmat 14:19, 26 Dec 2005 (CET)

Some remarks

TQtWidgetSet = Class(TWidgetSet): In the example of the declaration for TQtWidgetSet, the following functions might be removed in the future:

 procedure SetDesigning(AComponent: TComponent); override;
 function CreateComponent(Sender : TObject): THandle; override; // deprecated
 function CreateTimer(Interval: integer; TimerFunc: TFNTimerProc): integer; override;
 function DestroyTimer(TimerHandle: integer): boolean; override;

TQtWSWinControl.ShowHide: Please add the next line as first for every TxxxWSYYY.SomeProcUsingAWincontrolHandle

 if not WSCheckHandleAllocated(AWincontrol, 'SomeProcUsingAWincontrolHandle')
 then Exit;


TQtWidgetSet.ShowWindow: Functions like this might move to corntol implementation itself -> TxxxWSControl.Show

--Marc 10:39, 12 October 2006 (CEST)