[NumLock]

а чем обычный вариант не подходит:
aButton: TButton;
aButton.Caption:='aButton';