PDA

Ver la Versión Completa : Ayuda CORBA


Rolroy
12-06-2011, 14:44:48
Hola amigos, tengo un problema, estoy implementando una aplicación con Delphi 5 que tiene una BD en SQL Server 2000 y CORBA, en una prueba sin BD, he hecho correr el Servidor "Server", el problema es cuando hago correr despues el Cliente localmente, me sale el error "NO_IMPLEMENT", cierro el mensaje o presiono el botón aceptar y me sale el formulario con form1 en la barra de títulos y sin nada en Label, inclusive he registrado el servicio por el cmd, y nada; este es el código de la aplicación Cliente:

unit UCliente;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Server_TLB, ExtCtrls, StdCtrls, CorbaObj;
type
TForm1 = class(TForm)
Label1: TLabel;
Timer1: TTimer;
procedure FormCreate(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
private

public
InfoServer: IInformacion;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
InfoServer := TInformacionCorbaFactory.CreateInstance('');
Label1.Caption := 'Objeto Corriendo ' + InfoServer.WhichUser +
's machine, which is called ' + InfoServer.WhichMachine;
Timer1.Enabled := True
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Try
Caption := DateTimeToStr(InfoServer.CurrentDateAndTime)
except
Caption := 'Servidor de Informaciones'
end
end;
end.

Por favor les pido que me ayuden, esto es con fines de estudios, le agradezco de antemano valiosa ayuda.

Casimiro Notevi
12-06-2011, 17:43:36
Recuerda usar las etiquetas para el código:

http://neftali.clubdelphi.com/images/UtilizarTAGs.png

.

mamcx
10-09-2011, 01:36:57
Tu problema se resuelve muy facil si simplemente tiras CORBA a la basura. Es una plataforma que es obsoleta. Y es peor que COM+ remoto, que es mucho decir.

Si tienes control sobre el proyecto, es la decision mas sabia que puedes tomar.

Para hacer remoting, la MEJOR solucion es usar una libreria como:

http://www.remobjectssdk.com/ (la que mas me gusta)

o

http://www.realthinclient.com/ (la he usado, simple y funciona)

o actualizarte a una version delphi XE o XE2, donde el datasnap ya no es un bodrio.

La segunda mejor opcion es hacer remoting sobre HTTP (usando synapse mejor, indy de lo contrario). Envias/recibes informacion en texto (xml, json, o texto tipo INI).

La tercera mejor opcion, es hacerlo sobre TCP/IP y de formato binario. Pero mejor concentrate en las anteriores ;)

En cambio, CORBA no esta en NINGUNA lista de buenas opciones. En serio que no.

Casimiro Notevi
10-09-2011, 12:57:44
Tu problema se resuelve muy facil si simplemente tiras CORBA a la basura. .
Corba nunca llegó a funcionar bien, era una basura chapucera que abandonaron pronto, menos mal.