Q&A

  • 성의 있는 답변에 고맙습니다..
그동안 성의 있는 답변에 감사합니다...

너무 폐를 끼친것 같군요...

procedure TMain_Form.TB_PrintClick(Sender: TObject);

var

nilVariant: OleVariant;

CommTarget: iOleCommandTarget;

p:PGUID;

begin

p := nil;

CommTarget := WebBrowser1.Document as IOleCommandTarget;

CommTarget.Exec(p^, OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, nilVariant, nilVariant);

end;

이렇게 해보니까 되는 군요...

혹시 이상있는 곳 있으면 지도 부탁합니다..

그럼 좋은 하루 되세요...

0  COMMENTS