SRL Archive - Bugs

For some reason if you have a TTabSheet you can't do OnMouseDown.
I can make the procedure something simple like

procedure MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); 
begin
  WriteLn('Procedure Started');
end;

Then put

Tab.OnMouseDown:= @MouseDown;
AnyOtherObject.OnMouseDown:= @MouseDown;

I see "Procedure Started" in the debug box for other objects, but TabSheets won't work.

Also there is no TProgressBar or TLebeledEdit =(
I like those.

OnPaint events seem to cause anything to crash.
Rather than activating when the object is painted it just repeatedly activates over and over.

Last but not least, if you create a TColorDialog how do you execute it?
There is a TSaveDialog.Execute but ColorDialog doesn't have it, so how do you get it to show?

Pretty sure that Lazarus has a different kind of Tabssystem, thus it might make sense it's not completely compatible with Delphi