Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
ola a todos,tenho essa função aqui : recno := datamodule6.Dbf1.RecNo;eu tenho outra função q cria vários TDbf, nomeando cada dbf come dbf2, dbf3, ou seja, 'Dbf'+inttostr(num), sem se esqcer do inc(num),oq eu queria saber é, como eu modifico isso recno := datamodule6.Dbf1.RecNo; pra rodar com qualquer dbf q eu tenha?
naum entendi...
Veja o exemplo que eu fiz bem simples pra você entender e adapte conforme as suas nescessidades:
procedure AlteraTexto(TextBox: TEdit); //aki você ta pedindo q seja passado um objeto do tipow TEdit como parametro, mais você pode pedir qualquer outro tipow ....begin TextBox.Text:= 'Alterado por procedure'; //aki você altera qlquer propriedade do parâmetro passado....end;
Chamando o método:
AlteraTexto(Edit1);
bele?
Bom dia .... basta fazer uma procedure que receba como parametro um TDBF.....