WPP4Delphi

Wpponnect/wpp4delphi?

WPPConnect/WPP4Delphi es un proyecto de código abierto con el objetivo de exportar funciones de WhatsApp Web para Delphi/Lazarus, que puede usarse para respaldar la creación de cualquier interacción.

Nuestros canales en línea

Instalación

La instalación se realiza utilizando el comando boss install :

boss install github.com/wppconnect-team/WPP4Delphi

⚡️ QuickStart Delphi

Deberes

Generación automática de QRCode	✔
Enviar mensajes de texto, imágenes, videos, audios y documentos	✔
Lista de mensajes de envío, botones, enlaces	✔
Buscar contactos, chats, grupos, miembros del grupo, lista de bloqueos	✔
Presentación de contactos	✔
Enviando pegatinas	✔
Múltiples sesiones	✔
Mensajes de respuesta	✔
Obtener mensajes	✔
Reciba mensajes y obtenga la devolución con ID	✔
Enviar ubicación	✔
Y más	✔

Instalación

Dependencias:

• [ WPPConnect/wa-js ] wa-js
  
• [ CEF4Delphi ] cef4delphi
  Actualmente, utilizando la versión CEF: 109.0.5414.120- Binarios: 109.1.18, compatible con Windows 7 y 8 y Sever 2012, las versiones más altas de CEF perdieron soporte para estos sistemas operativos;

Descargar:

• [ CEF4Delphi ] cef4delphi-fuentes
  
• [ CEF Binários 32bit ] cef4delphi-binarios
  
• [ CEF Binários 64bit ]
  

Tutorial de instalación de video: [ Youtube ]

Enlace de grupo WhatsApp: https://chat.whatsapp.com/hzlflmqvjopk9bpjzlxcmo

Instalación paso a paso:

• Extraer a una carpeta los archivos CEF4Delphi
• Extraer binarios CEF a una carpeta
• En Delphi Agregar a Herramientas> Opciones> Ruta de la biblioteca a la carpeta de fuentes CEF4DELPHI "... cef4Delphi fuente"
• Abra el archivo "... cef4delphi paquetes cef4delphi.dpk" en Delphi y luego haga una compilación (Shift+F9) y luego "instale" (haga clic en el gerente de proyecto)
• Después de instalar, cierre el proyecto.
• Agregue a las herramientas> opciones> ruta de biblioteca las carpetas de origen de wpp4delphi "... wpp4delphi fuente model", "... wpp4delphi fuente servicios", "... wpp4delphi fuente view" "... wpp4delphi paquetes compilado", "... wpp4delphi fuente otro"
• Dentro de los paquetes compilados carpeta, hay Subpastas D23, D24, D25, D26, D27 y D28, agregue a la ruta de la biblioteca correcta de acuerdo con su versión de Delphi, ver en: https://delphidabbler.com/notes/version-numbers o o http://docwiki.embarcadero.com/radstudio/sydney/en/compilers_versions
• Abra el archivo "... wpp4delphi paquetes twpp4delphicollection.dpk"
• En la instalación de CEF4Delphi superior, la versión "120" debe agregarse en la Directiva de compilación -> "Cepcurrentvenion" antes de dar la compilación en DPK
• Luego haga una compilación (Shift+F9) y luego "Instale" (Administrador de proyectos de clic derecho)
• Abra la demostración que está al lado de las fuentes de WPP4Delphi.
• Compile el proyecto de demostración solo una vez y se creará la carpeta: c: ejecutables wpponnectdemo
• Pegue dentro de esta carpeta el archivo conftwppconnect.ini que está en "... wpp4delphi demo bin"
• Pegar dentro de la carpeta: "C: Ejecutables wppconnectdemo" Los binarios CEF que están disponibles: CEF4DELPHI-Binarios
• Extraiga a todos y copie al ejecutable de demostración o su aplicación, recuerde copiar binarios de la misma versión correspondiente.

Lázaro rápido

 // under construction 

## ⚡️ QuickStart OpenAi para Delphi en WPP4Delphi

OpenAI para Delphi es una biblioteca de clientes para conectarse a la API de OpenAI. Desde esta biblioteca, puede usar servicios populares de OpenAI como ChatGPT en su aplicación Delphi o Lázaro.

Ejemplo de chatgpt en Delphi con wpp4delphi | Vista de demostración

 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;

Más información, vaya a OpenAi para Delphi

Licencia

Copyright 2022 Wpponnect Team https://wppconnect-team.github.io/

Licenciado bajo la licencia Apache, versión 2.0 (la "licencia"); No puede usar este archivo, excepto de conformidad con la licencia. Puede obtener una copia de la licencia en

 http://www.apache.org/licenses/LICENSE-2.0

A menos que la ley o el acuerdo aplicable lo requiera por escrito, distribuido bajo la licencia se distribuye de manera "como es", sin garantías o condiciones de ningún tipo, ya sea expresas o implícitas. Consulte la licencia para los permisos y limitaciones de rigor de idioma específico bajo la licencia.