TWebBrowser를 사용해서 브라우저를 만들었는데
출력하려고.. 아래처럼했습니다.
procedure TWebForm.IBPrintClick(Sender: TObject);
var
pVal1,pVal2:OleVariant;
begin
with WebBrowser1 do begin
if QueryStatusWB(OLECMDID_PRINT) = 3 then
try
ExecWB(OLECMDID_PRINT,1,pVal1,pVal2);
Except
End
Else
showMessage('출력할 수 없습니다.!');
end;
end;
그런데.. 보여주는 웹페이지가.. 2프레임짜리인데..왼쪽의 프레임만
길게 늘어져서..출력되는군여.. 이거 다 출력되게 하려면 어떻게 하면되는지요?
고수님의 조언을 기다립니다.
Navigate할때
타켓프레임을 아래와같이 줬는데..
TarGetFrameName := 'leftFrame';
sURL := sevent; // 미리 지정해둔 주소
WebBrowser1.Navigate(sURL,Flags,TarGetFrameName,PostData,Headers);
이것과도 상관있나여?