Ponteiro de metodo-exemplo

Particularmente não entendi... O que seria ponteiro método-exemplo ?

Teria como dizer melhor o que deseja fazer ?

TRefreshMethod = procedure(aLista : TList; aLado : Byte) of Object;

declarar a classe com uma variavel do tipo criado acima

TClasse = class

private

Refresh : TRefreshMethod;

...

public

constructor newClass(aRefreshMethod : TRefreshMethod);

...

end;

atribuir a essa variavel Refresh (pode ser no construtor da classe) o método externo, criando a ligação entre os métodos

constructor TClasse.newClass(aRefreshMethod : TRefreshMethod);

begin

Refresh := aRefreshMethod;

end;

 

 

 

se tiver como alguem explica isso, ou tiver um exemplo mais simples;

Na verdade, considerando um caso onde você estária utilizando uma classe já existente, com eventos comuns, bastaria fazer uma atribuição de um método a evento. No caso que você exemplificou, ACREDITO (MAS NÃO TENHO CERTEZA, se você puder esclarecer, beleza) você está tentando criar uma classe que é do tipo procedure. Em uma outra ocasião, eu precisei de uma função do tipo ponteiro que apontasse para a aba ativa, bastou criar um objeto do mesmo tipo da aba e atribuir esta aba ao objeto...

Opa muito obrigado por respoder, você sabe algum site ou apostila que trate sobre esse assunto?