Hola anubis.
Cita:
|
el problema que tengo es, primero si esto se puede usar asi, puesto que en contactos no hay referencia a telefonos pero si al reves.
|
Se puede usar y sólo debés establecer una relación maestro/detalle entre los DataSets involucrados.
Como no especificas con que base de datos estás trabajando ni con que componentes, te ejemplifico con
TIBDataSet.
Teniendo dos
TDataSource y dos
TIBDataSet relacionados así,
DataSourceContactos
-> IBDataSetContactos ( maestro )
DataSourceTelefonos
-> IBDataSetTelefonos ( detalle )
desde el
Object Inspector, ponemos
DataSourceContactos en la propiedad
DataSource de
IBDataSetTelefonos y el siguiente
código SQL siguiente en la propiedad
SelectSQL:
Código SQL
[-]
SELECT * FROM TELEFONOS WHERE CODIGOCONTACTO = :CODIGO
O por bién por código:
Código Delphi
[-]
with IBDataSetTelefonos do
begin
Close;
DataSource:= DataSourceContactos;
SelectSQL.Clear;
SelectSQL.Add('SELECT * FROM TELEFONOS');
SelectSQL.Add('WHERE CODIGOCONTACTO = :CODIGO');
Open;
end;
Cita:
|
Lo otro, es relacionado con un dbgrid, si todavia no tengo el codigo primero como añado ese codigo a la tabla del dbgrid.
|
Lo siento, realmente no te entiendo esa parte.
Un saludo.