Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-08-2010
Sapiem Sapiem is offline
Miembro
 
Registrado: abr 2007
Posts: 24
Poder: 0
Sapiem Va por buen camino
OnWork no identifica IdFTP que lo dispara

Tengo un problema serio con IdFTP y el evento OnWork. Resulta que tengo un listado de diferentes descargas de archivos por FTP y para cada cual creo runtime un FTP, al los cuales nombro secuencialmente. A cada uno le asigno por ejemplo:

for i:= 1 to 5 do
begin
NewFTP:= IdFTP.Create(Self);
NewFTP.Name:= 'NuevoFTP'+IniToStr(i);
NewFTP.OnWork:= IdFTP1Work; // este evento ya está registrado por un
//control IdFTP real puesto en el Form
//desde el diseño del programa
...
end;

Bien, cada uno dispara correctamente el OnWork, pero no identifica cual es el que lo está llamando. Digamos que el NewFTP2 dispara y cuando entramos a OnWork, no logro saber que es él.

Si usamos ShowMessage(ASender as IdFTP).ClassName, lejos de salir TIdFTP, sale TIdSimpleServer lo que como es lógico no hace refrencia al IdFTP y por lo tanto no puedo saber cual es el que está en ese momento llamando al evento.

No he encontrado en ningún lado referencia a este problema.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Extraño y seio error. El IDE no identifica bien a TWebModule rolandoj Internet 1 12-02-2008 04:52:02
Un trigger que dispara un procedimiento que dispara un trigger... sitrico Firebird e Interbase 5 04-06-2007 22:05:13
No se dispara mas KeyDown con TAB Monchi Varios 0 28-03-2007 17:47:42
Trigger se dispara sin Commit jevo19100 Firebird e Interbase 5 13-03-2007 18:00:09
Indy y el evento OnWork johncook Internet 4 05-11-2004 11:54:27


La franja horaria es GMT +2. Ahora son las 18:05:07.


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
Copyright 1996-2007 Club Delphi