Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Providers (https://www.clubdelphi.com/foros/forumdisplay.php?f=10)
-   -   Ayuda CORBA (https://www.clubdelphi.com/foros/showthread.php?t=74323)

Rolroy 12-06-2011 14:44:48

Ayuda CORBA
 
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:
Código Delphi [-]
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:



.

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

Cita:

Empezado por mamcx (Mensaje 411645)
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.


La franja horaria es GMT +2. Ahora son las 06:45:20.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi