Está un poco extraño tu código, giantonti, pero intentaré mejorarlo:
Código Delphi
[-]
adoQuery3.SQL.Text := 'Select * From mov where cod_cli = ' +
QuotedStr (ADOQuery1rif.AsString));
adoQuery3.Open;
If Adoquery3.IsEmpty Then
ShowMessage ('No se ha "e"ncontrado ning"ú"n art"í"culo relacionado ' +
'con el "c"liente.')
Else
Begin
Application.CreateForm (TFormSelequipo, FormSelequipo);
Try
If FormSelequipo.ShowModal = mrOK Then
Begin
...
...
End;
Finally FormSelequipo.Free;
End;
End;
Saludos.
Al González.
P.D. Veo que ecfisa ya arrojó algo de luz.