Skip to content

Latest commit

 

History

History
138 lines (110 loc) · 8.08 KB

README.md

File metadata and controls

138 lines (110 loc) · 8.08 KB
Raw

WPPConnect/WPP4Delphi 📞

WPPConnect Banner

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.

Our online channels

Discord Telegram Group WhatsApp Group YouTube

image

image

⚙️ Installation

Installation is done using the boss install command:

boss install github.com/wppconnect-team/WPP4Delphi

⚡️ Quickstart Delphi



Funções














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
✔






Instalação


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;
    • 



Download:



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.
    • 



⚡️ Quickstart Lazarus


// under construction


Csharp





## ⚡️ Quickstart OpenAI for Delphi in WPP4Delphi

Csharp
Csharp

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


License


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.