Настройка нечати из WebBrowser

[nikmay]

Доброго времени суток!!!
Печатаю из WebBrowser таким вот способом:

procedure TForm1.Button1Click(Sender: TObject);
var 
  vaIn, vaOut: OleVariant;
begin
    WebBrowser1.ControlInterface.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER,
    vaIn, vaOut);
end;

Разобрался с удалением ненужных колонтитулов снизу и сверху страницы при помощи реестра.
ВОПРОС: Печатаемая Html страница имеет ширину 780 пикс., но на некоторых компах эта ширина выходит за правую границу листа, а на некоторых пропорционально уменьшается во всех направлениях.
Как этого избежать и какова должна быть правильная ширина и высота документа в пикселях, чтобы он нормально помещался на А4?