Hola,
Cita:
|
Empezado por Federico
No te entiendo.. no los ves cómo?.. usando Rtti??.. tenes el código??
|
Claro, el que más arriba he mostrado:
Código Delphi
[-]
uses
TypInfo;
procedure TForm1.Button1Click(Sender: TObject);
var
i, numProps: integer;
propsInfo: PPropList;
begin
numProps := GetPropList(Self, propsInfo);
for i := 0 to Pred(numProps) do begin
if ( propsInfo^[i].PropType^.Kind = tkMethod ) then
begin
Memo1.Lines.Add(propsInfo^[i].Name);
end;
end;
end;
Ese código lista en un "Memo" todos los métodos del formulario en que se encuentra,... ¿todos? No, un irreductible método que yo mismo declaro e implemento en el bloque "published" del formulario no aparece listado en el "Memo1".
