Kit argumentarios

De VIVAitwiki
Ir a la navegaciónIr a la búsqueda
Producto:

VIVAit Suite

Cuando el cliente utiliza formularios personalizados, estos van ubicados dentro del propio programa VIVait-Desk.exe

El cliente puede realizar sus propias personalizaciones si ha sido formado para ello, para lo cual deberá disponer:

  • Entorno de desarrollo Lazarus versión 1.2.4
  • Kit de desarrollo proporcionado por MDtel, que contiene el proyecto Lazaruz Vivait-Desk para el desarrollo de formularios personalizados; dicho proyecto se entrega como un fichero comprimido "zip"

Los formularios desarrollados por el cliente deberán quedar ubicados en la carpeta "cliente" del proyecto

El proceso de creación de un nuevo formulario pasa por:

  • Abrir el proyecto "vivait_desk.lpi" proporcionado en el Kit de desarrollo con el entorno Lazarus
  • Crear un nuevo formulario
  • Guardar el formulario en la carpeta "cliente"
  • Modificar el archivo "clienteClase.pas" para:
  • Incluir el formulario recien creado en la sección "uses"
  • Modificar el procedure "clienteClasesIniciar" introduciendo una llamada a la función "registrarClaseFormularioCliente" con el nombre de la clase de formulario recién creado

En el ejemplo siguiente muestra la inclusión de un formulario guardado en el proyecto "saliente.pas" y con nombre "frmSaliente"

unit clienteClases;

{$mode objfpc}{$H+}

interface

uses
	Classes, SysUtils;

procedure clienteClasesVersion;
procedure clienteClasesIniciar;
procedure clienteClasesFinalizar;


implementation

uses
	 clienteClasesIntz, formularioIntz, integrado, saliente;

{ En este procedimiento no debe hacerse nada mas que cargar la version, }
{ ya que no hay nada iniciado en el entorno }
procedure clienteClasesVersion;
begin
	clienteCargarVersion('MDtel',0,0,1,0);
end;

{ Solo se invoca una vez al comienzo de ejecucion }
procedure clienteClasesIniciar; 
begin
	funClienteAutenticar := Nil;
	funClienteValidarNuevaSesion := Nil;
	funClienteAgendaMarcar := Nil;
	funClienteComunicadoAgente := Nil;
	funClienteTratarCerrarSesion := Nil;
	funClientePresentarDatosSesion := Nil;
	funClientePresentarEstadoColas := Nil;

	{ registrar todos los formularios especificos de cliente }
	registrarClaseFormularioCliente(TfrmIntegrado);

	registrarClaseFormularioCliente(TfrmSaliente);

end;

{ Solo se invoca una vez al finalizar la ejecucion }
procedure clienteClasesFinalizar;
begin
end;

end.


El proceso de compilación en el entorno Lazarus del kit de desarrollo deberá generar un VIVait-Desk estándar

No es posible hacer un formulario personalizado a partir de un formulario realizado con la aplicación "Designer"