一定可以做到（是个题目）(100分)

X

xxq2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #1

题：
如何把WINDOWS程序的菜单栏放到对话框的左边，右边，下边，
而不是通常的上边？（用DELPHI CB VC 都行）

俺的这个帖帖放在华中的bbs两个星期了，没能解决， 只好到这里找高手了GZ

 

T

taozhiyu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #2

什么意思？说明白点

 

D

dingbaosheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #3

toolbar+menu

 

M

mikegong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #4

同意楼上，肯定能搞定的！

 

X

xxq2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #5

再说明：
刚才说错了，是把标题栏（就是蓝色那条东东），不是菜单，不是TOOLBAR。
小第先谢各位了！ 我在线关注

 

H

hpretty

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #6

自己做个一样颜色的就行了
截获wm_htTEST之类的消息

 

X

xxq2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #7

那些最大化，最小化按扭不好处理吧~！！？

 

V

vine

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #8

加个speedbutton不一样么，再加上处理代码就行了！

 

S

sqz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #9

同意楼上的

 

A

Alix

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #10

能不能直修接改窗口类？

 

Z

zjjzl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #11

请看看“秋之叶”会计伴侣中的演示程序界面 http://delphi.mychangshu.com/dispdoc.asp?id=450
再看看源代码，不懂得话还可以找作者问一下。

 

A

Alix

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-05

• #12

谢谢

 

A

Alix

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-06

• #13

我装了所有的控件，但编译时说找不到 dsgnintf.dcu ， 请问在哪找呀？
不好意思，小弟已经饿了2天，暂时没钱

 

L

lixx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-06

• #14

我曾经见过一个类似的例子，是VB程序，思路就是自已设计一个无标题栏的对话框然后自己
在某一边（比如右边）画一个类似的标题栏当然也可以加上最大化按钮等，然后捕捉鼠标位置
和鼠标事件。实现起来不复杂。

 

V

vickymade

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-06

• #15

调用API函数，但是我忘了用那个了！但是，曾经实现过

 

X

xxq2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #16

to vickymade:
api 可以呀？ 请帮我查查呀， 我找不到

 

Y

yhaochuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #17

EASY,在FORM上放一Panel，在Panel的OnMouseMove事件写下
procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if (ssLeft in Shift) then
begin
ReleaseCapture;
SendMessage(Form1.Handle,WM_SYSCOMMAND,SC_MOVE+1,0);
end;
end;
只要你改变Panel的aLign属性主可以将它放在左右上下了，当然，它的颜色也可以随便更改

 

F

fancy105

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-10

• #18

你自己開發一個window窗體類不更好一點﹗

 

X

xxq2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-12

• #19

hao