大侠：请问如何将新建EXCEL文件用DELPHI中的OLE控件显示？送100分！！！(100分)

大侠：请问如何将新建EXCEL文件用DELPHI中的OLE控件显示？送100分！！！

使用流将excel文件读入，在显示就可以了。

var
tempstream:tmemorystream;
begin
if olecontainer1.Execute =false then exit;
tempstream:=tmemorystream.Create ;
tempstream.Clear ;
tempstream.Position :=0;
olecontainer1.CreateObjectFromFile(opendialog1.FileName ,false);
olecontainer1.SaveToStream (tempstream);
with clientdataset1 do begin
edit;
tblobfield(fieldbyname('p_draw')).LoadFromStream (tempstream);
post;
end;
tempstream.Clear ;tempstream.Destroy ;

不好意思，没有讲清楚，我是想在一个窗体中先用下面的方法新建一个EXCEL文档，再自动创建一个新窗体
把新建的EXCEL文档放上去，并显示。
var
v,Sheet,Range:Variant;
strdate:string;
i,j:integer;
begin
try
v:=CreateOleobject('Excel.Application');
except
ShowMessage('您的机器里未安装Microsoft Excel。');
Exit;
end;
try
v.Workbooks.Add;
v.Workbooks[1].WorkSheets[1].Name := '日报表数据';
Sheet:= v.Workbooks[1].WorkSheets['日报表数据'];
。。。。。。。。。。