[[Lepe]]

ok, tu mandas:

Código Delphi [-]
 query1.sql.text := 'insert into tabla3 (idd, id, id2) ' + 
              'values(GEN_ID(GEN_tabla3_IDD,1), :tabla1, :tabla2)';
  query1.parambyname('tabla1').ASInteger := strtoint(edit1.text); // id de la tabla1
  query1.parambyname('tabla2').ASInteger := strtoint(edit2.text); // id de la tabla2
  query1.ExecSql; // hacemos la inserción.

.... vale, dejo ya los desvaríos

Saludos