WebBrowser에서 Navigation이 완료된 후에는,
도형이 그려지지 않습니다. 고수님들 방법좀 알려주세요~
아래소스는 Navigation전에는 아래와 같이 그려지지만,
후에는 버튼클릭하면 그려지지 않습니다.
procedure TMain.SpeedButton1Click(Sender: TObject);
var
myCanvas: TCanvas;
begin
MyCanvas := TCanvas.Create;
Try
MyCanvas.Handle:=GetDc(WebBrowser.Handle);
MyCanvas.Brush.Style :=bsClear;
MyCanvas.Rectangle(100,100,300,300);
Finally
MyCanvas.Free;
End;
end;