Para más seguridad yo haría una pequeña modificación:
Código Delphi
[-]
if Trim(ls_Codigo_Articulos) = '' then begin
showmessage('Codigo en blanco');
Abort;
end;
Si el valor de la variable lo proporciona el usuario, con esto evitarás que escriba espacios en blanco.
// Saludos