procedure TNT_COMPUTER_APP.Button1Click(Sender: TObject);
begin
TabSheet3.TabVisible:=true;
tabpage.ActivePage:= TabSheet3;
if not DataSetBroker1.DataSet.Active then
DataSetBroker1.DataSet.Open;
if not sysutils.FileExists('C:\购买政策.doc') then
TBlobField(DataSetBroker1.DataSet.FieldByName('POLICY')).SaveToFile('c:\购买政策.doc');
WebBrowser.Navigate(PChar('c:\购买政策.doc'));
end;