[Lazarus] fpGUI Widget Type: TTimer fix

Michael Schnell mschnell at lumino.de
Wed Aug 31 12:37:29 CEST 2011


On 08/31/2011 10:09 AM, michael.vancanneyt at wisa.be wrote:
>
> I think
>  Result := PtrUint(Timer);
> is better and safer. THandle has a 'windows-only' ring to it.

I suppose you are correct, but the source code of the function in fact is

function TFpGuiWidgetSet.CreateTimer(Interval: integer; TimerFunc: 
TWSTimerProc): THandle;
var
   Timer: TFPGUITimer;
begin
   Timer := TFPGUITimer.Create(Interval, TimerFunc);

   Result := THandle(Timer);
end;


So if appropriate, it would be better/necessary to eliminate the THandle 
type in a more general context.

-Michael




More information about the Lazarus mailing list