[[oscarac]]

mmm para que me funcione he tenido que crear una Variable de Tipo Variant

Código Delphi [-]
 
procedure TfrmingresoComprobantesVariosd.edtDocumentoExit(Sender: TObject);
Var _Doc1 : Variant;
begin
 _Doc1 := edtDocumento.Text;
  if not ValidarBlanco (_Doc1) then
    edtDocumento.SetFocus;
end;

esta bien asi? existe una mejor forma de hacerlo?