In delphi, this code is working, but in lazarus "message LM_CHAR;" or
"message LM_KEYDOWN;" etc not triggered, what I have todo?
fpc and lazarus last svn updated qt
kubuntu 13.10 x64
TEnterAsTab = class(TGraphicControl)
private
FEnterAsTab: Boolean;
FAllowDefault: Boolean;
FBmp: TBitmap;
FDiscard_Key: Boolean;
FUpDownAsTab: Boolean;
protected
procedure WMChar(var Msg: TLMChar); message LM_CHAR;
procedure CMDialogKey(var Msg: TCMDialogKey); message CM_DIALOGKEY;
procedure Paint; override;
public
constructor Create(AOwner: TComponent); override;
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
