|
#1
|
|||
|
|||
Ole Conteiner
Код:
OleContainer1.CreateObjectFromFile('D:\Записка на диплом.docx', False); OleContainer1.DoVerb(ovShow); ev := 2; for i:=1 to OleContainer1.OleObject.CommandBars.Count do if OleContainer1.OleObject.CommandBars.Item[i].Visible then OleContainer1.OleObject.CommandBars.Item[i].Visible:=1; OleContainer1.OleObject.Protect(ev); OleContainer1.OleObject.ActiveWindow.ActivePane.DisplayRulers := false; OleContainer1.OleObject.Application.CommandBars['Standard'].visible:=false; |