关于COM口调用程序，OLE/OLE2，虚拟桌面技术的问题。 (100分)

W

wk_knife

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-29

• #21

>>非office程序，也可以嵌入的话
如果象office一样支持COM的话。当然也应该可以。

>>还有，使用Ole的方式可能不满足你的需求，打印比较麻烦。
打印并不麻烦，如果激活了工具栏，工具栏上的打印按钮是可用的。
或者用WordApplication1.PrintOut就可以打印输出。
包括新建文件、打开文件、存盘等功能都可以通过Servers组件实现。

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-29

• #22

to wk_knife：如果要嵌入的程序不支持OLE2怎么办？
我有个程序，他支持com，但好象不支持OLE2，所以他不能嵌入，对不对？
我要嵌入这个程序都嵌了很久了，不行。很多朋友也帮不了。郁闷。

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-29

• #23

[]
2000下改变窗体的Parent可以将他包含在自己的一个“容器”里面，我说的容器，是指Form或者Pannel等。
使用这个在98下也可以，不过移动的时候有问题，全屏模式下大概应该可以(有时存在问题，有时是好的)。

procedure TForm1.Button1Click(Sender: TObject);
var
l_Handle: THandle;
begin
l_Handle := FindWindow(nil, '计算器');
Windows.SetParent(l_Handle, Handle);
end;

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-29

• #24

yzhshi, 真是佩服。连这个都想的出来。”大虾“二字当之无愧。
但问题又来了：他可以随便移动，那如果别人在操作的时候也随便移动，还不乱七八糟？
先通过ole来启动他，然后再对他进行ole控制能不能实现？
问题多多，大虾们多多发表意见。

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-29

• #25

这个可不是我“发明”的吆，论坛上已经对这个有评论了。
给你一个提议，将它设置承最大化，然后设法找到它的最大化按钮句柄，将它设置为Enabled=False

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #26

那不是有要跟一大堆的winAPI打交道？辛苦哦。

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #27

继续寻找更好方案，希望大虾门别躲着哦。[]

 

Y

yzhshi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #28

看看这个，其实如果要实现这个功能，使用 API是必不可免的。
测试代码如下，真正使用，下面这些远远不够。但是作为样例却是可以的。
procedure TForm1.Button1Click(Sender: TObject);
var
l_Handle, l_Menu: THandle;
begin
l_Handle := FindWindow(nil, '计算器');
Windows.SetParent(l_Handle, Handle);

// EnableMenuItem(GetSystemMenu(l_Handle, LongBool(False)), SC_CLOSE , MF_BYCOMMAND or MF_GRAYED);
l_Menu := GetSystemMenu(l_Handle, False);
RemoveMenu(l_Menu, 7, MF_BYPOSITION);
RemoveMenu(l_Menu, 6, MF_BYPOSITION);

RemoveMenu(l_Menu, 5, MF_BYPOSITION);
RemoveMenu(l_Menu, 4, MF_BYPOSITION);
RemoveMenu(l_Menu, 3, MF_BYPOSITION);

RemoveMenu(l_Menu, 2, MF_BYPOSITION);
RemoveMenu(l_Menu, 1, MF_BYPOSITION);
end;

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #29

yzhshi，再贪心点，能不能把他的标题栏也去掉？或者合并到自己的form标题栏上去？

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #30

yzhshi,去http://mail.88998.com/index.php看看他的免费10M的邮箱，合不合意？[]

 

B

b2sun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #31

http://www.delphibbs.com/delphibbs/DispQ.asp?LID=1354567
关注一下吧没有人提起来呀！用MODEM打电话利用PC机的耳机和麦克风，自己编程如何实现？
(我知道有现成的软件可以用，但是我想自己实现这个上东西）
QQ：65466700
MAIL： along@b2sun.com
TEL :13802785865
http://b2sun.com
请各位大侠多多指教！

 

小

小雨哥

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-04

• #32

（这是去掉标题但保留菜单的代码，如果你要合并菜单，只有用 yzhshi 的办法，不过简化点。w2000通过，98不行）

 

小

小雨哥

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-04

• #33

（这就是去掉标题和菜单的代码，如果你要将它的标题放入你的标题栏，是程序员，没有不会做的吧。w2000通过，98不行）

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-01

• #34

国庆放假出去玩了，放假回去试验试验，
谢谢各位大侠。大家继续想法子。如果没有方案了，
我两个星期内结贴子。

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-01

• #35

to 小雨哥 :我说的不是去掉菜单，是把他的标题栏也去掉或者合并到自己的form标题栏上去。

 

D

doll_paul

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-05

• #36

关注，如果成功，是个不错的办法!

如果可以通过自己的代码去控件程序上的按钮或菜单功能就更好了!

注：分可再帮助加!!!

 

S

sailang2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-16

• #37

多人接受答案了。