mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-07 03:38:36 +02:00
fixed default font
git-svn-id: trunk@2508 -
This commit is contained in:
parent
17d19b2c5a
commit
16b307ddad
@ -182,9 +182,6 @@ type
|
|||||||
|
|
||||||
{ TSpeedButton }
|
{ TSpeedButton }
|
||||||
|
|
||||||
TMyCollectionItem = class(TCollectionItem)
|
|
||||||
end;
|
|
||||||
|
|
||||||
TSpeedButton = class(TGraphicControl)
|
TSpeedButton = class(TGraphicControl)
|
||||||
private
|
private
|
||||||
FAllowAllUp : Boolean;
|
FAllowAllUp : Boolean;
|
||||||
@ -208,7 +205,7 @@ type
|
|||||||
procedure SetGlyph(value : TBitmap);
|
procedure SetGlyph(value : TBitmap);
|
||||||
procedure SetLayout(const Value : TButtonLayout);
|
procedure SetLayout(const Value : TButtonLayout);
|
||||||
procedure SetTransparent(const Value : boolean);
|
procedure SetTransparent(const Value : boolean);
|
||||||
procedure CMButtonPressed(var MEssage : TLMessage); message CM_BUTTONPRESSED;
|
procedure CMButtonPressed(var Message : TLMessage); message CM_BUTTONPRESSED;
|
||||||
procedure CMMouseEnter(var Message :TLMessage); message CM_MouseEnter;
|
procedure CMMouseEnter(var Message :TLMessage); message CM_MouseEnter;
|
||||||
procedure CMMouseLeave(var Message :TLMessage); message CM_MouseLeave;
|
procedure CMMouseLeave(var Message :TLMessage); message CM_MouseLeave;
|
||||||
procedure CMEnabledChanged(var Message: TLMessage); message CM_ENABLEDCHANGED;
|
procedure CMEnabledChanged(var Message: TLMessage); message CM_ENABLEDCHANGED;
|
||||||
@ -291,6 +288,9 @@ end.
|
|||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
|
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.38 2003/04/02 13:23:23 mattias
|
||||||
|
fixed default font
|
||||||
|
|
||||||
Revision 1.37 2003/03/08 21:51:57 mattias
|
Revision 1.37 2003/03/08 21:51:57 mattias
|
||||||
make resource string dialog nearly complete
|
make resource string dialog nearly complete
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user