OleContainer1.Align := alClient 无效(100分)

  • 主题发起人 主题发起人 chengjian
  • 开始时间 开始时间
C

chengjian

Unregistered / Unconfirmed
GUEST, unregistred user!
在一个FORM上,有两个PANE1 其中一个上放一DBGRID, 另一个放一个OleContainer1
OleContainer1.Align := alClient
OleContainer1中放入文件后,DBGRID不在了。
代码如下:
OleContainer1.CreateObjectFromFile(ExtractFilePath(application.ExeName) +'sample.doc',false);
OleContainer1.DoVerb(ovShow);
OleContainer1.Align := alClient;

请指教!谢谢!
 
不会啊,我照你的做了,dbgrid还在啊。
是dbgrid.visible=false还是dbgrid不存在了?
 
dbgrid是看不见了。
OleContainer1中是一个WORD 文档。
 
再看下面的代码,结果是一样的。
这是打开一个WORD 文档。
procedure TFileManageForm.SpeedButton_OpenClick(Sender: TObject);
begin
if OpenDialog1.Execute then begin
try
OleContainer1.CreateObjectFromFile(OpenDialog1.FileName,false);
OleContainer1.DoVerb(ovshow);
except
on E: Exception do
ShowMessage(E.Message);
end;
end;
end;
 
你先将panel去掉看行不行如果行再加上
 
一样的!!
 
OleContainer1.parent:=panel1; 可以吗
 
还是一样!
 
没有人见过么?

 
后退
顶部