FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
relacionar dos tablas
hola amigos
tengo una duda. de como poder relacionar dos tablas. en Interbase un ejemplo practico. tengo una tabla llamada articulos. y otra de movimientos. quiero utilizar un dbgrid. en la cual me desplieque la informacion . y poder agregar y borrar. TABAL Articulo ID, Desc del Articulo. 00001 MESA. TABLA DE MOVIMINIENTO Fecha de Mov ID del Articulo Cantidad de Mov. 01/01/2003 00001 1 Fecha de Mov, ID del Articulo , Des del Articulo, Cantidad de Mov. 01/01/2003 00001 MESAS 1 |
#2
|
|||
|
|||
Bien, lo que yo suelo hacer, es un campo calculado en el Dataset que me controla lo movimientos y, en el OnClacFields poner una sentencia SQL que me retorne la descripción del artículo en cuestión
Código:
procedure... var Q: TIBQuery; begin Q := TIBQuery.Create(Self); Q.Database := ..... Q.SQL.Add('select descripcion from articulos'); Q.SQL.Add('where codart = ' + QuotedStr(MovimientosCodArt.AsString)); try Q.Open; if Q.Fields[0].IsNull then // no hay registros -> no existe el artículo o descripción en blanco else MovimientosDesart.AsString := Q.Fields[0].AsString; except // control de excepción end; end; |
|
|
|