a vr creo que tienes que darle una leidita a esto,
guia de estilo
Solucion a tu problema:
Código Delphi
[-]table1.edit;
table1.fieldvalues['campo1']:=edit1.text;
table1.post;
if table2.locate('CodigoCliente', table1.fieldvalues['codigocliente'], []) then
begin
table2.edit;
table2.fieldvalues['campo1']:=edit1.text;
table2.post;
end
else
ShowMessage('Error grave de referencialidad, ayudaaaaaaaaaa');
Y tambien creo que con ese codigo delphi puedes entender lo que te quiero decir