WPPConnect/WPP4Delphi 📞

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

⚙️ Installation

Installation is done using the boss install command:

boss install github.com/wppconnect-team/WPP4Delphi

⚡️ Quickstart Delphi

Funções

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; Download:
• [CEF4Delphi] CEF4Delphi-Fontes
  
• [CEF Binários] CEF4Delphi-Binários
  

Tutorial de instalação em vídeo: [Youtube]

Instalação:

• 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"
• Dentro da pasta Packages\Compilados, existem subpastas D23, D24, D25, D26 e D27, adicione no library path a pasta correta conforme a sua versão do delphi D27: Delphi 10.4 Sydney D26: Delphi 10.3 Rio D25: Delphi 10.2 Tokyo D24: Delphi 10.1 Berlin D23: Delphi 10 Seattle
• Abra o arquivo "...WPP4Delphi\Packages\TWPP4DelphiCollection.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.

⚡️ Quickstart Lazarus

// 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

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.