Delphi开发的一个OCX构件，在Delphi中使用来开发应用系统，不知为何不能响应上下左右键？ ( 积分: 200 )

C

cpj7406

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-20

• #1

本人用Delphi开发了一个OCX构件，在应用中发现以下问题：
如果此构件用于Delphi开发环境，不知为何所开发的应用系统中，构件部分不能响应上、下、左、右等键，一般字符和数字键可以响应。
如果此构件用于VB开发环境，那么所开发的应用系统一切都正常？
开发构件的方法：创建Active Form类型的工程，在ActiveForm上放置VCL普通构件。
请教各位，这是何原因呢？敬请各位不吝赐教！
cpj7406@126.com
quickdevelop@126.com
cpj7406@sohu.com
chengpj@iasp.cn

 

C

cpj7406

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-04-20

• #2

本人用Delphi开发了一个OCX构件，在应用中发现以下问题：
如果此构件用于Delphi开发环境，不知为何所开发的应用系统中，构件部分不能响应上、下、左、右等键，一般字符和数字键可以响应。
如果此构件用于VB开发环境，那么所开发的应用系统一切都正常？
开发构件的方法：创建Active Form类型的工程，在ActiveForm上放置VCL普通构件。
请教各位，这是何原因呢？敬请各位不吝赐教！
cpj7406@126.com
quickdevelop@126.com
cpj7406@sohu.com
chengpj@iasp.cn

 

C

cpj7406

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-03

• #3

这个问题我就知道悬!如果大家那里都不存在,那么可能跟开发环境有关系了!

 

L

LSUPER

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-03

• #4

在你封装的 Activex 中响应消息：

procedure WMGetDlgCode(var Message: TWMGetDlgCode);
message WM_GETDLGCODE;

procedure Txxx.WMGetDlgCode(var Message: TWMGetDlgCode);
begin
Message.Result := Message.Result or DLGC_WANTARROWS;
end;

＝^0^＝

 

C

cpj7406

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-10

• #5

LSUPER这位朋友，首先对你表示真诚的感谢！
按照你的方法，我初步试了一下，还没有立即解决，我准备近两天抽出专门时间按照你的思路好好研究一下，争取能圆满解决。
另，我所开发的构件是基于TActiveForm的，有何新的建议欢迎随时指教。