Small fixes in bcnumerickeyboard

bcnumerickeyboard.pas

@@ -72,7 +72,6 @@ type
   public
     constructor Create(AOwner: TComponent); override;
   published
-    property OnChange;
     property OnUserChange;
   end;
 
@@ -82,7 +81,7 @@ implementation
 
 procedure Register;
 begin
-  RegisterComponents('BGRA Controls', [TBCCustomNumericKeyboard]);
+  RegisterComponents('BGRA Controls', [TBCNumericKeyboard]);
   RegisterComponents('BGRA Controls', [TBCRealNumericKeyboard]);
 end;
 

test/test_bcnumerickeyboard/umain.pas

@@ -83,7 +83,7 @@ begin
   begin
     BCNumericKeyboard1.Hide();
     // Remove unnecessary comma for button caption
-    if Sender is TBCButton then
+    if Sender is TBCButton or Sender is TEdit then
       if Pos(DefaultFormatSettings.DecimalSeparator, NumericSender.Caption) =
         Length(NumericSender.Caption) then
         NumericSender.Caption :=