14 replies to this topic

[luk2009]

Estoy tratando de hacer lo que encontre en este Blog pero recibo el siguiente error

delphi

Cliente.Socket.WriteLn( Mensaje.Text ); 

[Error] UFRMenviartcp.pas(38): Undeclared identifier: 'WriteLn' 

y cuando intento entrar algo despues de escribir cliente.socket.  no aparece nada con w para seguir escribiendo. Es como si el componente no tuviese esa propiedad

[egostar]

¿En que procedimiento estás haciendo esto ?

En mi Turbo Delphi si me muestra la funcion Writeln().

Salud OS

[luk2009]

en el onclick de un boton, como indica el ejemplo.

[egostar]

en el onclick de un boton, como indica el ejemplo.

Pues que extraño, debería de funcionar. Solo por precaución, ¿ si agregaste el componente a la forma ?

Salud OS

[luk2009]

si porque me deja llegar hasta socket, solo no me muestra esa propiedad, porque si me muestra send y muchas otras mas

[egostar]

si porque me deja llegar hasta socket, solo no me muestra esa propiedad, porque si me muestra send y muchas otras mas

¿ Que version de Delphi usas ?

Salud OS

[luk2009]

delphi 7

[egostar]

¿ Y no será que debes usar la funcion SendText en lugar de Writeln ?

Salud OS

[luk2009]

pues tampoco tengo sendtext en ese componente, parece entonces un problema con indy, ya que hace unos dias estuve instalando indy 10, pero luego restaure mi sistema y volvieron los indy 9.

Estaba usando un ejemplo con los udp y funcionan bien, parece que el problema es en el tcp. Como puedo reinstalar esa parte de los indy 9

[enecumene]

Colocanos el code completo, mejor dicho la unidad completa donde está ese code, porque es posible que el problema esté en otro sitio.

[enecumene]

Bueno viendo el blog me he dado cuenta que las pruebas las hicieron con D2007, sólo resta que un compañero con D2007 lo confirme.

[luk2009]

delphi

unit UFRMenviartcp;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,IdTCPClient, StdCtrls,IdBaseComponent, IdComponent, IdTCPConnection;
 
type
  TForm1 = class(TForm)
    lbl1: TLabel;
    lbl2: TLabel;
    IP: TEdit;
    Puerto: TEdit;
    mensaje: TMemo;
    btnenviar: TButton;
    cliente: TIdTCPClient;
    IdTCPClient1: TIdTCPClient;
    procedure btnenviarClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.btnenviarClick(Sender: TObject);
begin
Cliente.Host := IP.Text;
  Cliente.Port := StrToIntDef( Puerto.Text, 0 );
  Cliente.Connect;
  Cliente.Socket.WriteLn( Mensaje.Text );
  Cliente.Disconnect;
 
end;
 
end. 

Por otro lado encontre en este lugar Indy10-instalacion automatica para delphi 7

Pregunta vale la pena actualizar a indy 10 y si es asi, cual es la mejor forma de desinstalar indy 9

[luk2009]

La instalacion automatica parece que no instala correctamente todos los componentes con lo cual en algunas compilaciones da error.

La forma correcta de instalar manualmente los indy 10 en delhi 7 es esta.

1.- debes remover el indy que tengas del component install package de delphi.

2.- debes ir al directorio de delphi y borrar todos los dcp, bpl del indy que este instalado.

3.- debes ir al directorio de windows y buscar indy y encontraras unos cuantos *.bpl que debes borrar.

4.- Si ya usaste el instalador automatico que esta en este mismo hilo, se creo el directorio program files\indy 10 for delphi 7 y ahi encontraras en el directorio source lo que necesitas para continuar con la instalacion manual.

5.- Compilar los siguientes paquetes  ****no confundir en esta parte con los archivos que comienzan con dcl.

a)Core\indycore70.dpk
b)Protocols\indyprotocols70.dpk
c)SuperCore\Indysupercore70.dpk
d)System\Indysystem70.dpk


6.-  Compilar e instalar:  ******estos archivos si comienzan con dcl.

a)Core\dclindycore70.dpk
b)Protocols\dclindyprotocols70.dpk
c)SuperCore\dclIndysupercore70.dpk


7.- Adicional los siguientes directorios en Tools - Enviroment options - library - library path

a)Core
b)Protocols
c)SuperCore
d)System

Asi me funciono a mi.

[luk2009]

Despues de instalarlo todo manual, ya me aparece la propiedad y se compila sin error.

[egostar]

Pues que bien que ya pudiste resolver tu problema, pero que mal que la instalación automática no haya funcionado correctamente.

Gracias por la retro.

Salud OS