diff --git a/Demo/uFraLogin.dfm b/Demo/uFraLogin.dfm
index aa175b7..79b71c7 100644
--- a/Demo/uFraLogin.dfm
+++ b/Demo/uFraLogin.dfm
@@ -1322,12 +1322,16 @@ object frameLogin: TframeLogin
       'QrCode Manual')
     TabOrder = 0
   end
-  object SpeedButton3: TBitBtn
+  object SpeedButton3: TButton
     Left = 159
     Top = 238
     Width = 185
     Height = 47
     Caption = 'Logout'
+    DisabledImageIndex = 1
+    HotImageIndex = 0
+    ImageIndex = 0
+    Images = ImageList1
     TabOrder = 1
     OnClick = SpeedButton3Click
   end
diff --git a/Demo/uFraLogin.pas b/Demo/uFraLogin.pas
index 987adfd..228457f 100644
--- a/Demo/uFraLogin.pas
+++ b/Demo/uFraLogin.pas
@@ -19,7 +19,7 @@   TframeLogin = class(TFrame)
     rgTipoLogin: TRadioGroup;
     imgQrCode: TImage;
     whatsOn: TImage;
-    SpeedButton3: TBitBtn;
+    SpeedButton3: TButton;
     ImageList1: TImageList;
     procedure SpeedButton3Click(Sender: TObject);
     procedure SpeedButton1Click(Sender: TObject);
diff --git a/Demo/uFraMensagens.dfm b/Demo/uFraMensagens.dfm
index 2df48ca..d1f7317 100644
--- a/Demo/uFraMensagens.dfm
+++ b/Demo/uFraMensagens.dfm
@@ -73,7 +73,7 @@ object frameMensagem: TframeMensagem
     Align = alLeft
     Caption = 'Envio de Mensagens'
     TabOrder = 1
-    object btnLocalizacaoBotao: TBitBtn
+    object btnLocalizacaoBotao: TButton
       AlignWithMargins = True
       Left = 5
       Top = 452
@@ -81,10 +81,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar Localiza'#231#227'o c/ Bot'#227'o'
+      ImageIndex = 11
+      Images = ImageList1
       TabOrder = 12
       OnClick = btnLocalizacaoBotaoClick
     end
-    object btnLink: TBitBtn
+    object btnLink: TButton
       AlignWithMargins = True
       Left = 5
       Top = 272
@@ -92,10 +94,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar LinkPreview'
+      ImageIndex = 6
+      Images = ImageList1
       TabOrder = 7
       OnClick = btnLinkClick
     end
-    object btnImagemBotao: TBitBtn
+    object btnImagemBotao: TButton
       AlignWithMargins = True
       Left = 5
       Top = 236
@@ -103,10 +107,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar Imagem com Bot'#227'o'
+      ImageIndex = 5
+      Images = ImageList1
       TabOrder = 6
       OnClick = btnImagemBotaoClick
     end
-    object btnImagem: TBitBtn
+    object btnImagem: TButton
       AlignWithMargins = True
       Left = 5
       Top = 200
@@ -114,10 +120,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar Imagem'
+      ImageIndex = 5
+      Images = ImageList1
       TabOrder = 5
       OnClick = btnImagemClick
     end
-    object btnVideoBotao: TBitBtn
+    object btnVideoBotao: TButton
       AlignWithMargins = True
       Left = 5
       Top = 164
@@ -125,10 +133,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar V'#237'deo com Bot'#227'o'
+      ImageIndex = 4
+      Images = ImageList1
       TabOrder = 4
       OnClick = btnVideoBotaoClick
     end
-    object btnVideo: TBitBtn
+    object btnVideo: TButton
       AlignWithMargins = True
       Left = 5
       Top = 128
@@ -136,10 +146,13 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar V'#237'deo'
+      HotImageIndex = 3
+      ImageIndex = 3
+      Images = ImageList1
       TabOrder = 3
       OnClick = btnVideoClick
     end
-    object btnListaMenu: TBitBtn
+    object btnListaMenu: TButton
       AlignWithMargins = True
       Left = 5
       Top = 92
@@ -147,10 +160,13 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Lista/Menu'
+      HotImageIndex = 2
+      ImageIndex = 2
+      Images = ImageList1
       TabOrder = 2
       OnClick = btnListaMenuClick
     end
-    object btnBotaoSimples: TBitBtn
+    object btnBotaoSimples: TButton
       AlignWithMargins = True
       Left = 5
       Top = 56
@@ -158,10 +174,13 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Bot'#245'es Simples'
+      HotImageIndex = 2
+      ImageIndex = 1
+      Images = ImageList1
       TabOrder = 1
       OnClick = btnBotaoSimplesClick
     end
-    object btnTextoSimples: TBitBtn
+    object btnTextoSimples: TButton
       AlignWithMargins = True
       Left = 5
       Top = 20
@@ -169,10 +188,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Texto Simples'
+      ImageIndex = 0
+      Images = ImageList1
       TabOrder = 0
       OnClick = btnTextoSimplesClick
     end
-    object btnAudio: TBitBtn
+    object btnAudio: TButton
       AlignWithMargins = True
       Left = 5
       Top = 308
@@ -180,10 +201,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar '#193'udio'
+      ImageIndex = 7
+      Images = ImageList1
       TabOrder = 8
       OnClick = btnAudioClick
     end
-    object btnContato: TBitBtn
+    object btnContato: TButton
       AlignWithMargins = True
       Left = 5
       Top = 380
@@ -191,10 +214,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar Contato'
+      ImageIndex = 9
+      Images = ImageList1
       TabOrder = 10
       OnClick = btnContatoClick
     end
-    object btnSticker: TBitBtn
+    object btnSticker: TButton
       AlignWithMargins = True
       Left = 5
       Top = 344
@@ -202,10 +227,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar Sticker'
+      ImageIndex = 8
+      Images = ImageList1
       TabOrder = 9
       OnClick = btnStickerClick
     end
-    object btnLocalizacao: TBitBtn
+    object btnLocalizacao: TButton
       AlignWithMargins = True
       Left = 5
       Top = 416
@@ -213,6 +240,8 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Enviar Localiza'#231#227'o'
+      ImageIndex = 10
+      Images = ImageList1
       TabOrder = 11
       OnClick = btnLocalizacaoClick
     end
@@ -226,7 +255,7 @@ object frameMensagem: TframeMensagem
     Align = alLeft
     Caption = 'Op'#231#245'es de Chat'
     TabOrder = 2
-    object btnLimparConversa: TBitBtn
+    object btnLimparConversa: TButton
       AlignWithMargins = True
       Left = 5
       Top = 195
@@ -234,10 +263,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Limpar Conversa'
+      ImageIndex = 15
+      Images = ImageList1
       TabOrder = 5
       OnClick = btnLimparConversaClick
     end
-    object btnArquivar: TBitBtn
+    object btnArquivar: TButton
       AlignWithMargins = True
       Left = 5
       Top = 128
@@ -245,10 +276,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Arquivar Chat'
+      ImageIndex = 14
+      Images = ImageList1
       TabOrder = 3
       OnClick = btnArquivarClick
     end
-    object btnResponder: TBitBtn
+    object btnResponder: TButton
       AlignWithMargins = True
       Left = 5
       Top = 56
@@ -256,10 +289,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Responder Mensagem'
+      ImageIndex = 14
+      Images = ImageList1
       TabOrder = 1
       OnClick = btnResponderClick
     end
-    object btnReagir: TBitBtn
+    object btnReagir: TButton
       AlignWithMargins = True
       Left = 5
       Top = 20
@@ -267,10 +302,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Reagir Mensagem'
+      ImageIndex = 12
+      Images = ImageList1
       TabOrder = 0
       OnClick = btnReagirClick
     end
-    object btnVerificarNumero: TBitBtn
+    object btnVerificarNumero: TButton
       AlignWithMargins = True
       Left = 5
       Top = 231
@@ -278,10 +315,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Verificar N'#250'mero'
+      ImageIndex = 16
+      Images = ImageList1
       TabOrder = 6
       OnClick = btnVerificarNumeroClick
     end
-    object btnStatus: TBitBtn
+    object btnStatus: TButton
       AlignWithMargins = True
       Left = 5
       Top = 267
@@ -289,10 +328,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Verificar Status'
+      ImageIndex = 18
+      Images = ImageList1
       TabOrder = 7
       OnClick = btnStatusClick
     end
-    object btnDetalhe: TBitBtn
+    object btnDetalhe: TButton
       AlignWithMargins = True
       Left = 5
       Top = 303
@@ -300,10 +341,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Detalhes do Telefone'
+      ImageIndex = 25
+      Images = ImageList1
       TabOrder = 8
       OnClick = btnDetalheClick
     end
-    object btnBloquear: TBitBtn
+    object btnBloquear: TButton
       AlignWithMargins = True
       Left = 5
       Top = 339
@@ -311,10 +354,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Bloquear Contato'
+      ImageIndex = 20
+      Images = ImageList1
       TabOrder = 9
       OnClick = btnBloquearClick
     end
-    object btnDesbloquear: TBitBtn
+    object btnDesbloquear: TButton
       AlignWithMargins = True
       Left = 5
       Top = 375
@@ -322,10 +367,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Desbloquear Contato'
+      ImageIndex = 21
+      Images = ImageList1
       TabOrder = 10
       OnClick = btnDesbloquearClick
     end
-    object btnFixarChat: TBitBtn
+    object btnFixarChat: TButton
       AlignWithMargins = True
       Left = 5
       Top = 411
@@ -333,10 +380,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Fixar Chat'
+      ImageIndex = 22
+      Images = ImageList1
       TabOrder = 11
       OnClick = btnFixarChatClick
     end
-    object btnDesfixarChat: TBitBtn
+    object btnDesfixarChat: TButton
       AlignWithMargins = True
       Left = 5
       Top = 447
@@ -344,10 +393,12 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Desfixar Chat'
+      ImageIndex = 23
+      Images = ImageList1
       TabOrder = 12
       OnClick = btnDesfixarChatClick
     end
-    object BitBtn1: TBitBtn
+    object BitBtn1: TButton
       AlignWithMargins = True
       Left = 5
       Top = 164
@@ -355,10 +406,12 @@ object frameMensagem: TframeMensagem
       Height = 25
       Align = alTop
       Caption = 'Desarquivar Chat'
+      ImageIndex = 17
+      Images = ImageList1
       TabOrder = 4
       OnClick = BitBtn1Click
     end
-    object BitBtn2: TBitBtn
+    object BitBtn2: TButton
       AlignWithMargins = True
       Left = 5
       Top = 92
@@ -366,6 +419,8 @@ object frameMensagem: TframeMensagem
       Height = 30
       Align = alTop
       Caption = 'Status da Mensagem'
+      ImageIndex = 13
+      Images = ImageList1
       TabOrder = 2
       OnClick = BitBtn2Click
     end
diff --git a/Demo/uFraMensagens.pas b/Demo/uFraMensagens.pas
index 4c6e1a4..43845a8 100644
--- a/Demo/uFraMensagens.pas
+++ b/Demo/uFraMensagens.pas
@@ -15,29 +15,29 @@   TframeMensagem = class(TFrame)
     Label1: TLabel;
     edtURL: TLabeledEdit;
     gbAcoesBasicas: TGroupBox;
-    btnLocalizacaoBotao: TBitBtn;
-    btnLink: TBitBtn;
-    btnImagemBotao: TBitBtn;
-    btnImagem: TBitBtn;
-    btnVideoBotao: TBitBtn;
-    btnVideo: TBitBtn;
-    btnListaMenu: TBitBtn;
-    btnBotaoSimples: TBitBtn;
-    btnTextoSimples: TBitBtn;
+    btnLocalizacaoBotao: TButton;
+    btnLink: TButton;
+    btnImagemBotao: TButton;
+    btnImagem: TButton;
+    btnVideoBotao: TButton;
+    btnVideo: TButton;
+    btnListaMenu: TButton;
+    btnBotaoSimples: TButton;
+    btnTextoSimples: TButton;
     GroupBox2: TGroupBox;
     GroupBox3: TGroupBox;
-    btnAudio: TBitBtn;
-    btnContato: TBitBtn;
-    btnSticker: TBitBtn;
-    btnLocalizacao: TBitBtn;
+    btnAudio: TButton;
+    btnContato: TButton;
+    btnSticker: TButton;
+    btnLocalizacao: TButton;
     ImageList1: TImageList;
-    btnLimparConversa: TBitBtn;
-    btnArquivar: TBitBtn;
-    btnResponder: TBitBtn;
-    btnReagir: TBitBtn;
-    btnVerificarNumero: TBitBtn;
-    btnStatus: TBitBtn;
-    btnDetalhe: TBitBtn;
+    btnLimparConversa: TButton;
+    btnArquivar: TButton;
+    btnResponder: TButton;
+    btnReagir: TButton;
+    btnVerificarNumero: TButton;
+    btnStatus: TButton;
+    btnDetalhe: TButton;
     groupListaContatos: TGroupBox;
     Panel4: TPanel;
     btnListarCOntatos: TButton;
@@ -45,12 +45,12 @@   TframeMensagem = class(TFrame)
     groupListaChats: TGroupBox;
     btnListarChats: TButton;
     listaChats: TListView;
-    btnBloquear: TBitBtn;
-    btnDesbloquear: TBitBtn;
-    btnFixarChat: TBitBtn;
-    btnDesfixarChat: TBitBtn;
-    BitBtn1: TBitBtn;
-    BitBtn2: TBitBtn;
+    btnBloquear: TButton;
+    btnDesbloquear: TButton;
+    btnFixarChat: TButton;
+    btnDesfixarChat: TButton;
+    BitBtn1: TButton;
+    BitBtn2: TButton;
     procedure edtURLDblClick(Sender: TObject);
     procedure btnTextoSimplesClick(Sender: TObject);
     procedure btnBotaoSimplesClick(Sender: TObject);