En lugar de
Código Delphi
[-]
showmessage('bandera1');
dm.tbl_ordenes_impresion.FieldByName('numorden').AsInteger := strtoint(edit1.text);
Pon
Código Delphi
[-]
showmessage(edit1.text);
dm.tbl_ordenes_impresion.FieldByName('numorden').AsInteger := strtoint(edit1.text);
Para ver realmente lo que contiene edit1.text, porque el error te está diciendo que el texto está vacío.
// Saludos