TInject-corporate
- Active · last change 6-3-2026
- ★ 13 on GitHub
README
# Componente TInject Corporate Componente para criação de chatBots com delphi
Component for creating chatBots with delphi
INSTRUÇÕES PARA USO DO COMPONENTE
Compatibilidade testada nas seguintes versões do Delphi: Seattle, Berlim, Tokyo, Rio, Sydney, Athens.
Tutorial de instalação padão:
https://www.youtube.com/watch?v=EIxFdtenNxI&t=31s
Tutorial de instalação manual Delphi Alexandria:
https://www.youtube.com/watch?v=mifdSA-Hkyk
Videos demo:
NOVO: Para usar com o delphi 10.4 Sydney, incluir no library path 32 bits a pasta Compilados e suas subpastas.
Recursos / Resources
✔️ Login
✔️ Logout
✔️ Confirmação de entrega de mensagens - Message delivery confirmation
✔️ Enviar mensagens de texto com botão e lista - Send text message with button and list
❌ Enviar mensagens de texto com botões - Send text message with buttons
❌ Enviar mensagens de texto e imagem com botões - Send text and imagem message with buttons
✔️ Enviar mensagens de texto para números fora da agenda - Send text message
✔️ Enviar mensagens para grupos - Send group messages
✔️ Enviar contatos - Send phone contacts
✔️ Enviar chave PIX
✔️ Enviar MP3 - Send MP3
✔️ Enviar MP4 - Send MP4
✔️ Enviar IMG - Send IMG
✔️ Enviar RAR - Send RAR
✔️ Enviar Link com prévia - Sending and preview (Não compatível com o multi device)
✔️ Enviar localização - Location sending
✔️ Enviar Stickers - Send Stickers
✔️ Listar contatos - Contact list
✔️ Listar bate papos - Conversation list
✔️ Status da bateria - Battery status (Não compatível com o multi device)
✔️ Simular digitando - Typing simulation
✔️ Recebimento de novas mensagem - Receiving new messages
✔️ Configurações de DDI - International number configuration
✔️ Validação de números - number validator
✔️ Checagem de conexão - check connection
✔️ Download de arquivos - Download files
✔️ Download da foto de perfil - Download profile picture
✔️ Criar grupo - Create group (Não compatível com o multi device)
✔️ Sair do grupo - Leave the group (Não compatível com o multi device)
✔️ Adicionar participante ao grupo - Add participant to the group (Não compatível com o multi device)
✔️ Remover participante do grupo - Remove group member (Não compatível com o multi device)
✔️ Promover participante adminstrador do grupo - Promote participant group administrator (Não compatível com o multi device)
✔️ Despromover participanete adminstrador do grupo - Demote participating group administrator (Não compatível com o multi device)
✔️ Listar todos os grupos - List all groups
✔️ Listar participantes do grupo - List group participants
✔️ Obter link convite de grupos - Get Group invitation link
✔️ Entrar em grupo via link convite - Join group via invitation link
✔️ Monitoramento automático em caso de atualizações disponíveis do WhatsApp - Automatic monitoring in case of available WhatsApp updates
Cursos do componente / Component lessions:
Official documentation:
Events that send messages
| event | Description | Example | return |
|---|---|---|---|
| send | Send text message | TInject1.send('55819999999@c.us', 'hello'); | onGetIsDelivered |
| sendButtons | Send text message buttons | TInject1.sendButtons('55819999999@c.us', 'Choose', [{buttonId: 'id1', buttonText:{displayText: 'SIM'}, type: 1}, type: 1}], 'Escolha uma opção'); | - |
| sendFile | Send file and text message | TInject1.SendFile('558199999999@c.us', 'c:\myFile.pdf', 'hello'); | onGetIsDelivered |
| sendContact | Send whatsapp contact | TInject1.sendContact('destinationContact@c.us', 'contactToBeSent@c.us'); | - |
| sendLinkPreview | Send preview link | TInject1.sendLinkPreview('558199999999@c.us', 'https://youtube.com/video'' 'hello'); | - |
| sendLocation | Send Location | TInject1.sendLocation('55819999999@c.us', '-70.4078', '25.3789', 'my location'); | |
| sendPixKey | Send PIX Key | TInject1.sendPixKey('55819999999@c.us', 'EMAIL or CPF or CNPJ or TELEFONE or ALEATÓRIO', 'Chave PIX', 'NAME'); | |
| sendStartTyping | Send start typing | TInject1.sendStartTyping('55819999999@c.us'); | |
| sendStopTyping | Send stop typing | TInject1.sendStopTyping('55819999999@c.us'); | |
| sendSticker | Send Stickers | TInject1.sendSticker('55819999999@c.us', 'Long base64 where...'); |
Verifications events
| event | Description | example | event return | return |
|---|---|---|---|---|
| CheckIsConnected | Checks the connection between the device and whatsapp | TInject1.CheckIsConnected(); | OnIsConnected | boolean |
| NewCheckIsValidNumber | Checks whether one or more numbers are whatsapp numbers | TInject1.NewCheckIsValidNumber('558199999999@c.us'); | OnNewGetNumber | TReturnCheckNumber |