Como reutilizar um recurso para forms diferentes?
Bom dia pessoal,
É o seguinte: estou tentando pegar valores de um dbgrid de um form e jogar num dbedit de outro form, até aí tudo bem eu consegui, mas não estou sabendo como reutilizar esse mesmo trecho de código para outros forms. Vou explicar:
- Tenho form de Clientes e outro de Fornecedores, além disso tenho um form de lista dos bairros.
- no form lista bairros por exemplo só tem o DBGrid com os bairros aonde clicando na célula deve fechar o form e voltar ao form anterior trazendo o bairro selecionado. Aí eu fiz:
procedure TfrmListaBairros.DBGrid1CellClick(Column: TColumn);
begin
frmClientes.txtBairro.text := DBGrid1.Fields[1].AsString;
frmListaBairros.Close;
end;
procedure TfrmListaBairros.DBGrid1CellClick(Column: TColumn);begin
frmClientes.txtBairro.text := DBGrid1.Fields[1].AsString;
frmListaBairros.Close;
end;
funcionou a janela fecha e traz o bairro no dbedit do form cliente, mas e para utilizar esse mesmo código em outros forms tipo fornecedores, funcionários que eu tenho? pq notem que está com frmClientes.txtBairro.text, então só funciona para form Clientes, q q estou faezndo errado ou devo acrescentar?
Discussão (3)
Carregando comentários...