nao sei como!!! tentei colocar procedure Pintar(qrybaixa: TDataset);
mas nao adiantou 2008/6/9 Nicolas <[EMAIL PROTECTED]>: > Vc tem q consertar a declaração da função também !! > > > ----- Original Message ----- > From: felipe govoni > To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > Sent: Monday, June 09, 2008 9:31 AM > Subject: Re: [delphi-br] criar evento dinamicamente > > blz mas agora da o seguinte erro: > unsatisfied foward or external declaration Tfrmmonitorar.pintar > > 2008/6/9 Joao Morais <[EMAIL PROTECTED] <post%40joaomorais.com.br>>: > > > felipe govoni wrote: > > > procedure pintar(Sender: TObject); > > > begin > > > //codigo pra pintar > > > end; > > > > > > e no evento on click > > > > > > dmGeral.qryBaixa.close; > > > dmGeral.qryBaixa.OnCalcFields := pintar(); > > > dmGeral.qryBaixa.open; > > > > > > ele da o seguinte erro: not enough actual parameters, mas qual > parametro > > > falta colocar? > > > > declare: > > > > procedure Pintar(Dataset: TDataset); > > ... > > > > e retire os parênteses da procedure ao fazer a associação: > > ... > > dmGeral.qryBaixa.OnCalcFields := Pintar; > > ... > > > > Joao Morais > > > > > > -- > Felipe Govoni > --------------------- > Programador > Fone 8472-8718 > > [As partes desta mensagem que não continham texto foram removidas] > > ---------------------------------------------------------- > > No virus found in this incoming message. > Checked by AVG. > Version: 8.0.100 / Virus Database: 270.0.0/1491 - Release Date: 9/6/2008 > 06:52 > > [As partes desta mensagem que não continham texto foram removidas] > > > -- Felipe Govoni --------------------- Programador Fone 8472-8718 [As partes desta mensagem que não continham texto foram removidas]
