Pasos a seguir para crear un Remote Data Broker:
1- Asegurarse de que el servidor de base de datos, en nuestro caso,
interbase esta actualmente arrancado.
2- Arrancar el Database Explorer y definir un nuevo alias llamado PRU_EMPLOYEE
que accederá a la base de datos EMPLOYEE.GDB de interbase.
3- Pulsar el botón derecho del ratón sobre el nuevo alias
y seleccionar Importar al diccionario. En este momento se importaran normas
de bases de datos y otra información del diccionario de datos desde
interbase al diccionario de datos de Delphi.
4- Regresar a Delphi.
5- Entramos en la opción File/New application para arrancar
una nueva aplicación.
6- Entramos en File/New y realizamos doble click en Remote Data Module
7- Suministrar un nombre de clase para el Remote Data Broker y pulsamos
Ok.
8- Arrastrar un componente Ttable , un componente Tdatabase y un componente
session en el módulo de datos.
9- Modificar la propiedad AutoSessionName a true, para darle un nombre
automatico a la sesión.
10- Modificar la propiedad AliasName del componente Tdatabase a PRU_EMPLOYEE
y en propiedad params añadimos la clave:
USER Name=SYSDBA
PASSWORD=masterkey
11.- Establecemos la propiedad HandleShared del componente Tdatabase
a true para permitir la compartición de varios clientes.
12.- Establecemos la propiedad DatabaseName del componente Ttable a
PRU_EMPLOYEE y la propiedad TableName a DEPARMENT
13.- Pinchamos con el botón derecho en el Ttable y elegimos
del Tprovider "Export table1 from data module"
14.- Salvamos el proyecto
15.- Ejecutar el proyecto para registrar el servidor COM. Después
de esto cerrar el proyecto.
Para utilizar esta aplicación seguir los siguientes pasos:
1.- Creamos una aplicación nueva
2.- Arrastramos un componente TclientDataSet, un TremoteServer, un
TdataSource y un TDBGrid.
3.- Enlazamos por medio de la propiedad ServerName del componente TremoteServer,
este componente con el remotedatabroker creado anteriormente.
4.- Enlazamos por medio de la propiedad RemoteServer del componente
ClientDataSet, a este y al componente Remoteserver.
5.- Enlazamos por medio de la propiedad ProviderName del componente
ClientDataSet, a este y al componente Ttable de la aplicación Remote
Data Broker.
6.- Establecemos la propiedad DataSet del componente DataSource para
referenciar al componente ClientDataSet y la propiedad datasource del componente
TDBGrid hacia el DataSource.
7.- Abrimos el componente ClientDataSet activando la propiedad Active
a true.
Al activar esta propiedad deberíamos ver los datos de la tabla
en el dbgrid.
8.- Salvar el proyecto.
El ejemplo anterior se encuentra en el CD-ROM en EJEMPLOS/MULTITIER1
Estructura de una aplicación servidora
Estructura de una aplicación cliente