![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
|
|||
|
|||
|
Código:
Query.SQL.Add('select * from CATXALM');
Query.SQL.Add('where ID_ALMACEN = :alma and');
Query.SQL.Add(' ID_PRODUCTO = :prod');
Query.ParamByName('alma').AsInteger := 3;
Query.ParamByName('prod').AsInteger := 5;
Query.Open;
if Query.Fields[0].IsNull then
ShowMessage('Articulo inexistente')
else
ShowMessage('Articulo existente');
|
|
|
|