hola compalñeros que tal miren mi duda esta en un select:
Código Delphi
[-] Datos.QryInsertDetalleSolicitud.Close;
Datos.QryInsertDetalleSolicitud.SQL.Clear;
Datos.QryInsertDetalleSolicitud.SQL.Add('SELECT * ');
Datos.QryInsertDetalleSolicitud.SQL.Add('FROM DetalleSolicitud');
Datos.QryInsertDetalleSolicitud.SQL.Add('WHERE ClaveProducto='+ QuotedStr(Claveproducto)+ ' AND FolioSolicitud=' + EdfolioSolicitud.Text +';');
Datos.QryInsertDetalleSolicitud.Open;
if Datos.QryInsertDetalleSolicitud.RecordCount = 0 then
Begin
Application.MessageBox('En la solicitud debe contener un producto como minimo !!!', '::: Error :::',MB_ICONERROR);
End
else
begin
end;
espero me puedan ayudar grax