como trabalhar com eventos ?
04/01/2007
0
ex:
tenho uma TADOQuery que é criada em tempo de execução
qry := TADOQuery.Create(self); try // codigo à ser executado ... finally FreeandNil(qry); end;
um metodo qualquer:
procedure MetodoQualque; begin // ... end;
[b:619ba90f53]duvida:[/b:619ba90f53]
como executar o metodo:´MetodoQualque´ no evento AfterPost da Query ´qyr´ em tempo de execução
Fabiano Góes
Posts
04/01/2007
Renato.pavan
Basta vc criar seu ´MetodoQualquer´ com os mesmos parametros qdo o metodo é criado diretamente no AfterPost da query.
Exemplo
procedure MetodoQualquer(DataSet: TDataSet); begin // end;
Depois na sua query criada dinamicamente vc atribui ao afterPost a procedure ´´MetodoQualquer´.
Exemplo
qry := TADOQuery.Create(self); try qry.AfterPost := MetodoQualquer; finally FreeandNil(qry); end;
Espero ter ajudado em sua duvida.
[]´s
Renato
04/01/2007
Massuda
05/01/2007
Michael
Regra: se vc mesmo cria e destroi, use [b:c80701acfe]nil [/b:c80701acfe]no construtor.
qry := TADOQuery.Create(nil); try qry.AfterPost := MetodoQualquer; // Faz alguma coisa com qry finally FreeandNil(qry); end;
[]´s
20/04/2020
Douglas Carvalho
Clique aqui para fazer login e interagir na Comunidade :)