Mocada, tem como no Delphi usar o operador & ?
Tipo assim:Tenho uma tabela de Clientes com o Alias CLI e outra tabela de Clintes2 com o alias CLI2
Como os campos sao = eu faco assim no clipper (
if opc = 1
alias := 'CLI'
Else
alias := 'CLI2'
endif
&alias->(dbappend())
.
.
.
Agora preciso fazer a mesma coisa no Delphi , o que estou usando é Data Module(um com nome de DM e outro DMTMP) para que nao precise ficar refazendo umas condicoes , tipo essa
dm.ibLocal.DatabaseName := ''teste.fdb';
dm.ibLocal.Connect;
dm.ibTrans.StartTransaction;
.....
dmtmp.ibLocal.DatabaseName := ''teste.fdb';
dmtmp.ibLocal.Connect;
dmTMP.ibTrans.StartTransaction;
......