| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付学习型 ASP/PHP/ASP.NET 主机 30元/年
高端软件开发 = 年薪十万不是梦赛孚耐:软件保护加密专家身份认证令牌USB KEY 
共有 138 人关注过本帖
标题:KeyPress调用另外一个函数怎么不起作用
收藏  订阅  推荐  打印
wfjt
Rank: 2
等级:注册会员
帖子:99
积分:1112
注册:2007-11-30
KeyPress调用另外一个函数怎么不起作用

KeyPress调用另外一个函数怎么不起作用阿
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}

void __fastcall TForm1::FormActivate(TObject *Sender)
{
  edt1->SetFocus();
}

//-------------------------------------------------------------------------

void __fastcall TForm1::edt1KeyPress(TObject *Sender, char &Key)
{
if(Key==VK_RETURN)
edt2->SetFocus();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::edt2KeyPress(TObject *Sender, char &Key)
{
if(Key==VK_RETURN)
btn->SetFocus();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormPaint(TObject *Sender)
{
Canvas->TextOutA(10,20,edt1->Text);
Canvas->TextOutA(10,30,edt2->Text);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btnKeyPress(TObject *Sender, char &Key)
{
if(Key==VK_RETURN)
{


FormPaint(Sender);
}
}
//---------------------------------------------------------------------------

结果还是原来的edt的text内容啊
为什么啊
怎么调用阿?
搜索更多相关主题的帖子: KeyPress  函数  pragma  Owner  
2008-5-14 10:43
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.045089 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved