excel如何在delphi窗口中显示？(100分)

T

tangfeng123

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-10-29

• #1

如何把excel显示在panel的范围呢？

 

H

hanpengshan_00

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-10-29

• #2

把olecontainer控件放在一个panel里，olecontainer打开excel

 

T

tangfeng123

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-10-29

• #3

可以不用ole，而用handle来实现不？

 

H

hs-kill

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-10-30

• #4

FindWindow
SetParent

或者你放个webbrowser，然后用webbrowser打开excel的文档

 

Y

yhd008

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-10-31

• #5

procedure TForm1.Button1Click(Sender: TObject);
var
RvHandle : hWnd;
ExcelApp: Variant;
begin


ExcelApp := CreateOleObject('Excel.Application');
ExcelApp.Visible := True;
ExcelApp.Caption := '应用程序调用 Microsoft Excel';
ExcelApp.WorkBooks.Add;
RvHandle := FindWindow(nil,pchar('应用程序调用 Microsoft Excel - book1'));
windows.setparent(RvHandle,Panel1.Handle);
ShowWindow(RvHandle, SW_MAXIMIZE );
end;

 

W

wulingbo2005

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-10-31

• #6

ole实现

 

C

cyjsir

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-11-10

• #7

OleContainer1.SaveAsDocument( 'c:/1.xls');
保存后的文件不能打开。

 

M

madeagle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-11-10

• #8

先把焦点移走,要不不好用,比如 BUTTON1.SETFOCUS