Saber a que procedimiento se llama en el evento de un objeto

14-06-2011

ecfisa

Moderador

Registrado: dic 2005

Ubicación: Tres Arroyos, Argentina

Posts: 10.508

Poder: 38

Hola.

Otra forma puede ser:

Código Delphi [-]function GetObjMethodName(AObj: TObject;const OrigName: string): string;
var
  Mtd: TMethod;
begin
  Mtd:= GetMethodProp(AObj,OrigName);
  if (Mtd.Data <> nil) and (Mtd.Code <> nil) then
    Result:= TObject(Mtd.Data).MethodName(Mtd.Code);
end;

Ejemplo de llamada:

Código Delphi [-]  ShowMessage(GetObjMethodName(Button1, 'OnClick'));

Saludos.

__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 15-06-2011 a las 12:57:16.

« Tema Anterior | Próximo Tema »

Herramientas	Buscar en Tema
Mostrar Versión Imprimible Enviar por Correo	Buscar en Tema: Búsqueda Avanzada
Desplegado
Cambiar a Modo Lineal Cambiar a Modo Hibrido Modo Hilado

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
Saber quien llama una dll	capo979	Varios	2	26-07-2010 09:31:55
Asociar un procedimiento a un objeto TForm???	Jhonjhon_123	Varios	8	20-05-2010 09:57:25
¿saber que form lo llama?	amadis	OOP	1	12-02-2006 23:35:09
relacionar un procedimiento con un evento de un objeto	aranel	OOP	3	20-10-2005 21:50:36
Evento nuevo en objeto	LucianoRey	OOP	13	04-09-2004 01:45:22

La franja horaria es GMT +2. Ahora son las 04:08:06.