如何将delphi 用CLX程序变成 普通的应用程序(38分)

如何将delphi 用CLX程序变成 普通的应用程序
（指源代码！）
发现新建CLX程序中 竟然不能用 KEY ＝VK_Return

而新建普通的应用程序 则是可以的！！

但是窗体、程序代码已经写好！ 请问如何转换成普通应用程序

VK_Return应该是定义在qt单元的，可是使用这个单元定义的常量

测了一下，发现Enter=4100。不过数字键盘上的Enter=4101，真与VCL不一样。
另：
Qt单元有两个常量
Key_Return = 4100;
Key_Enter = 4101;
当然还有其它所有的按键常量

试了一下
showmessage(inttostr(key))；
回车竟然没反应（其他键是可以的）
我在怀疑CLX环境下 回车根本就不会触发 ONKEY_DOWN事件
－－－－－－－－－
qt种的Key_Return
如何代替KEY ＝VK_Return 对回车的判别
能否具体说一下？ 谢谢

procedure TForm1.Edit7KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);

我试了下，行的

unit Unit1;

interface

uses
SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms,
QDialogs, QStdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
procedure Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

uses
Qt;

{$R *.xfm}

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = Key_Return then ShowMessage('主键盘回车按下');
if Key = Key_Enter then ShowMessage('数字键盘回车按下');
{if Key = 4100 then ShowMessage('主键盘回车按下');
if Key = 4101 then ShowMessage('数字键盘回车按下');}
end;

end.

感谢 anidelphi 我新建了一个 clx程序 用key_return 可行
又新建了一个 应用程序（非CLX）用 VK_return 也可行
可就是原来那个程序不行
回车键就是不能触发ONKEY_DOWN事件！！！
我在ONKEY_DOWN里 只写了一句 shoemessage('kkkk');
如此按回车也没反应，晕死了，不知道问题究竟出在哪里！！唉。。。。。