Kit argumentarios - Historial de revisiones

Admin en 09:15 7 mar 2016

2016-03-07T09:15:51Z

Admin en 09:15 7 mar 2016

2016-03-07T09:15:31Z

Admin en 09:14 7 mar 2016

2016-03-07T09:14:06Z

Admin en 09:13 7 mar 2016

2016-03-07T09:13:28Z

Admin en 09:12 7 mar 2016

2016-03-07T09:12:47Z

Admin en 09:12 7 mar 2016

2016-03-07T09:12:10Z

Admin en 09:10 7 mar 2016

2016-03-07T09:10:58Z

Admin en 09:10 7 mar 2016

2016-03-07T09:10:34Z

Admin en 09:09 7 mar 2016

2016-03-07T09:09:59Z

Admin en 08:33 7 mar 2016

2016-03-07T08:33:32Z

@@ Línea 1: / Línea 1: @@
 {| class="wikitable"
 |-
-! '''Producto:  '''!! VIVAit Call
+! '''Producto:  '''!!
 VIVAit Suite
 |-

@@ Línea 23: / Línea 23: @@
 :* 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 "" y con nombre ""
+En el ejemplo siguiente muestra la inclusión de un formulario guardado en el proyecto "saliente.pas" y con nombre "frmSaliente"
   unit clienteClases;

@@ Línea 52: / Línea 52: @@
   { Solo se invoca una vez al comienzo de ejecucion }
-  <big>''' procedure clienteClasesIniciar; '''</big>
+ <big>'''procedure clienteClasesIniciar; '''</big>
   begin
   	funClienteAutenticar := Nil;

@@ Línea 52: / Línea 52: @@
   { Solo se invoca una vez al comienzo de ejecucion }
- procedure clienteClasesIniciar;
+  <big>''' procedure clienteClasesIniciar; '''</big>
   begin
   	funClienteAutenticar := Nil;

@@ Línea 41: / Línea 41: @@
   implementation
-  <big>'''uses
+  <big>'''uses'''</big>
- 	clienteClasesIntz, formularioIntz, integrado, saliente''';</big>
+ 	 <big>'''clienteClasesIntz, formularioIntz, integrado, saliente;'''</big>
   { En este procedimiento no debe hacerse nada mas que cargar la version, }

@@ Línea 65: / Línea 65: @@
   	registrarClaseFormularioCliente(TfrmIntegrado);
-  	registrarClaseFormularioCliente(TfrmSaliente);
+  	'''registrarClaseFormularioCliente(TfrmSaliente);'''
   end;

@@ Línea 25: / Línea 25: @@
 En el ejemplo siguiente muestra la inclusión de un formulario guardado en el proyecto "" y con nombre ""
-unit clienteClases;
+ unit clienteClases;
-−
-{$mode objfpc}{$H+}
+ {$mode objfpc}{$H+}
-−
-interface
+ interface
-−
-uses
+ uses
-	Classes, SysUtils;
+ 	Classes, SysUtils;
   procedure clienteClasesVersion;

← Revisión anterior		Revisión del 09:09 7 mar 2016
Línea 22:		Línea 22:
	:* Incluir el formulario recien creado en la sección "uses"		:* 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		:* 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 "" y con nombre ""
		+
		+	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.
		+

@@ Línea 20: / Línea 20: @@
 * Guardar el formulario en la carpeta "cliente"
 * Modificar el archivo "clienteClase.pas" para:
->* Incluir el formulario recien creado en la sección "uses"
+:* 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
+:* Modificar el procedure "clienteClasesIniciar" introduciendo una llamada a la función "registrarClaseFormularioCliente" con el nombre de la clase de formulario recién creado