|
no funciona
hola amigos, ayer me sujirieron insertar esta linea en el codigo
procedure TForm1.Button1Click(Sender: TObject); begin If Adoquery1.Fields[0].AsInteger > 0 then ShowMessage('Hay registros en el detalle') else ShowMessage('NO Hay registros en el detalle'); end;pero me bota un error en tiempo de ejecucion en la linea"If Adoquery1.Fields[0].AsInteger > 0 then"se suponia que la esta linea contaba los registro que devuelve una consutabueno amigos les pido que me den una mano
|