WPPConnect/WPP4Delphi is an open-source project with the aim of exporting functions from WhatsApp Web for Delphi/Lazarus, which can be used to support the creation of any interaction.
Installation is done using the boss install command:
boss install github.com/wppconnect-team/WPP4Delphi| Geração automática de QRCode | ✔ |
| Envio de mensagens texto, imagens, videos, áudios e docs | ✔ |
| Envio de mensagens lista, botões, links | ✔ |
| Busca de contatos, chats, grupos, membros de grupos, lista de bloqueio | ✔ |
| Envio de Contatos | ✔ |
| Envio de stickers | ✔ |
| Sessões Múltiplas | ✔ |
| Responder Mensagens | ✔ |
| Receber mensagens | ✔ |
| Receber mensagens e obter retorno com o id | ✔ |
| Enviar localização | ✔ |
| e muito mais | ✔ |
Dependências:
- [
WPPConnect/wa-js] wa-js - [
CEF4Delphi] CEF4Delphi
Atualmente utilizando o CEF Versão: 109.0.5414.120- Binários: 109.1.18, compatível com o Windows 7 e 8 e Sever 2012, as versões superiores do CEF perdeu o suporte para esses Sistemas Operacionais;
- [
CEF4Delphi] CEF4Delphi-Fontes - [
CEF Binários 32bit] CEF4Delphi-Binários - [
CEF Binários 64bit] CEF4Delphi-Binários
Tutorial de instalação em vídeo:
[Youtube]
Link do grupo WhatsApp: https://chat.whatsapp.com/HzLflMQVjOPK9bpjzlxcMO
Instalação Passo a Passo:
- Extraia para uma pasta os arquivos do CEF4Delphi
- Extraia para uma pasta os binários do CEF
- No Delphi adicione em Tools > Options > Library Path a pasta sources do CEF4Delphi "...\CEF4Delphi\source"
- Abra o arquivo "...CEF4Delphi\packages\CEF4Delphi.dpk" no Delphi e então faça um Build (shift+F9) e então "Install" (botão direito do mouse no Project Manager)
- Após instalar, feche o projeto.
- Adicione em Tools > Options > Library Path as pastas source do WPP4Delphi "...WPP4Delphi\Source\Model", "...WPP4Delphi\Source\Services", "...WPP4Delphi\Source\View", "...WPP4Delphi\Packages\Compilados", "...WPP4Delphi\Source\Other"
- Dentro da pasta Packages\Compilados, existem subpastas D23, D24, D25, D26, D27 e D28, adicione no library path a pasta correta conforme a sua versão do delphi Consulte em: https://delphidabbler.com/notes/version-numbers ou http://docwiki.embarcadero.com/RADStudio/Sydney/en/Compiler_Versions
- Abra o arquivo "...WPP4Delphi\Packages\TWPP4DelphiCollection.dpk"
- Na Instalação do CEF4Delphi Superior a versão "120" precisa ser adicionado na Diretiva de Compilação --> "CEFCurrentVersion" antes de dar o Build no DPK
- Então faça um Build (shift+F9) e então "Install" (botão direito do mouse no Project Manager)
- Abra o DEMO que está junto dos fontes do WPP4Delphi.
- Compile o projeto DEMO uma única vez e será criada a Pasta: C:\Executáveis\WPPConnectDemo
- Cole dentro dessa pasta o arquivo ConfTWPPConnect.ini que está em "...WPP4Delphi\Demo\BIN"
- Cole dentro da pasta: "C:\Executáveis\WPPConnectDemo" os binários do CEF que estão disponíveis: CEF4Delphi-Binários
- Extraia todos eles e copie para junto do executável do DEMO ou da sua aplicação, lembrar de copiar o binários, da mesma versão correspondente.
// under construction
## ⚡️ Quickstart OpenAI for Delphi in WPP4Delphi
OpenAI for Delphi é uma biblioteca cliente para conectar-se à API OpenAI. A partir desta biblioteca, você pode usar serviços OpenAI populares, como ChatGPT , em seu aplicativo Delphi ou Lazarus.
Example ChatGPT em Delphi com WPP4Delphi | Demo View
function TfrDemo.AskQuestion(const Question, phoneNumber: string): string;
var
Request: TCreateCompletionRequest;
Response: TCreateCompletionResponse;
begin
Response := nil;
Request := TCreateCompletionRequest.Create;
try
//Request.User := '17981388414'
Request.Prompt := Question;
Request.Model := 'text-davinci-003';
Request.User := phoneNumber;
Request.MaxTokens := 2048; // Be careful as this can quickly consume your API quota.
Response := Client.OpenAI.CreateCompletion(Request);///Client credits in https://github.com/landgraf-dev/openai-delphi
if Assigned(Response.Choices) and (Response.Choices.Count > 0) then
Result := phoneNumber + '#' + Response.Choices[0].Text
else
Result := phoneNumber + '#' + '';
finally
Request.Free;
Response.Free;
end;
end;
Mais informações, acesse a OpenAI for Delphi
Copyright 2022 WPPConnect Team https://wppconnect-team.github.io/
Licensed under the Apache License, Version 2.0 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
Unless required by applicable law or agreed to in writing, software distributed under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the License for the specific language governing permissions and limitations under the License.
