[Zakharyan]

Добрый день. Пишу программу, которая строит чертежи. Решил, что стоит ввести процедуру печати чертежа. Вот код:

Код:

R.Left:=Form1.Left;
R.Top:=Form1.Top;
R.Right:=Panel1.Left;
R.Bottom:=Form1.Height;
printer.BeginDoc;
printer.Canvas.CopyRect(Rect(0,0,31500,44550),canvas,r);
printer.EndDoc;

При запуске программы из Delphi (Run), все нормально печатает..Но когда закрываю Delphi и открываю непосредственно экзешник при нажатии на печать выдает ошибку:
---------------------------
Eucys
---------------------------
System Error. Code: 1722.

Сервер RPC недоступен.
---------------------------
ОК
---------------------------
Подскажите, что можно сделать...попробовал поискать в гугле, похожих проблем нет..