都见过的一个问题？在一个Tedit中输入字符串，这个过程到底怎样便把键盘上的字符显示在屏幕上？ ( 积分: 100 )

都见过的一个问题？在一个Tedit中输入字符串，这个过程到底怎样便把键盘上的字符显示在屏幕上？

都见过的一个问题？在一个Tedit中输入字符串，这个过程到底怎样便把键盘上的字符显示在屏幕上？

不明白楼主想要问什么？
是不是想知道：按下键盘上的一个键，怎么样传递到主机，由主机处理之后，显示在显示器上的工作原理？

你是说PASSWORD吧，
找到窗体ID，GETWINDOWTEXT。

我想问的是：
在Tedit中，输入一个字母'a',在Tedit中便显示一个'a',delphi或windows在幕后作了什麽工作才达到这个效果。

这个问题你应该看一看<windows 程序设计〉这本书
要想成为真正的高手，特别是window程序设计方面
他号称是windows程序设计的圣经
windows 程序设计的实质是 以消息为基础，以事件驱动之
大致的过程是这样的
按下键--》发出wmkeydown wmkeyup wmchar 消息—》消息进入应用程序消息队列--》看谁处理这个消息--》因为当前这个tedit控件拥有输入焦点--》操作系统负责显示之 这背后由windows系统的user模块维护之 不可能讲的太细 你可以自己找书来看，看过这本书，你会提高好几个层次

TEdit实质上是一个windows标准子控件，任何语言和软件都是调用它出来了，所以所有的文本框看起来都差不太多。
windows公用对话框则是一个更典型的例子，只人在一个系统下，其显示形式都是差不多的，它也是一个windows子控件。
不过windows子控件的派生还是很难做的，我没有做过。

procedure Tform1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not((key in['a'..'z']) or (key in ['A'..'Z']) or (key in['0'..'9']) or (key in [char(8)])) then
begin
if key=char(13) then
begin
edit1.SetFocus;
exit;
end;
key:=char(0);
end;
end;

问问操作系统和显卡驱动程序的 开发者。。。。
[][]

楼主啊，你要问的这个问题也有点范围太广了，
既然是DELPHI那建议看看《inside VCL》这里讲了关于VCL如何实现的这些，
其实看懂了这些VCL也就相当与看懂了操作系统，都是以消息机制为基础的吗！

以前好象是在DFW上看到的一段代码:

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
StdCtrls, ExtCtrls;

type
TForm1 = class(TForm)
ListBox1: TListBox;
Button1: TButton;
Button2: TButton;
Edit1: TEdit;
Edit2: TEdit;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure ListBox1DblClick(Sender: TObject);
procedure Edit1Change(Sender: TObject);
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
private
function Keyhookresult(lP: integer; wP: integer): pchar;
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
hookkey: string;
hooktimes: word;
hHook: integer;
implementation
{$R *.DFM}

function TForm1.Keyhookresult(lP: integer; wP: integer): pchar;
begin
result := '[Print Screen]';
{ VK_0 thru VK_9 are the same as ASCII '0' thru '9' ($30 - $39) }
{ VK_A thru VK_Z are the same as ASCII 'A' thru 'Z' ($41 - $5A) }
case lp of
14354: result := '[Alt]'; //不能识别
10688: result := '`';
561: Result := '1';
818: result := '2';
1075: result := '3';
1332: result := '4';
1589: result := '5';
1846: result := '6';
2103: result := '7';
2360: result := '8';
2617: result := '9';
2864: result := '0';
3261: result := '-';
3515: result := '=';
4177: result := 'Q';
4439: result := 'W';
4677: result := 'E';
4946: result := 'R';
5204: result := 'T';
5465: result := 'Y';
5717: result := 'U';
5961: result := 'I';
6223: result := 'O';
6480: result := 'P';
6875: result := '[';
7133: result := ']';
11228: result := '/';
7745: result := 'A';
8019: result := 'S';
8260: result := 'D';
8518: result := 'F';
8775: result := 'G';
9032: result := 'H';
9290: result := 'J';
9547: result := 'K';
9804: result := 'L';
10170: result := ';';
10462: result := '''';
11354: result := 'Z';
11608: result := 'X';
11843: result := 'C';
12118: result := 'V';
12354: result := 'B';
12622: result := 'N';
12877: result := 'M';
13244: result := ',';
13502: result := '.';
13759: result := '/';
13840: result := '[Right-Shift]';
14624: result := '[Space]';
283: result := '[Esc]';
15216: result := '[F1]';
15473: result := '[F2]';
15730: result := '[F3]';
15987: result := '[F4]';
16244: result := '[F5]';
16501: result := '[F6]';
16758: result := '[F7]';
17015: result := '[F8]';
17272: result := '[F9]';
17529: result := '[F10]';
22394: result := '[F11]';
22651: result := '[F12]';
10768: Result := '[Left-Shift]';
14868: result := '[CapsLock]';
3592: result := '[Backspace]';
3849: result := '[Tab]';
7441:
if wp > 30000 then
result := '[Right-Ctrl]'
else
result := '[Left-Ctrl]';
13679: result := '[Num /]';
17808: result := '[NumLock]';
300: result := '[Print Screen]';
18065: result := '[Scroll Lock]';
17683: result := '[Pause]';
21088: result := '[Num0]';
21358: result := '[Num.]';
20321: result := '[Num1]';
20578: result := '[Num2]';
20835: result := '[Num3]';
19300: result := '[Num4]';
19557: result := '[Num5]';
19814: result := '[Num6]';
18279: result := '[Num7]';
18536: result := '[Num8]';
18793: result := '[Num9]';
19468: result := '[*5*]';
14186: result := '[Num *]';
19053: result := '[Num -]';
20075: result := '[Num +]';
21037: result := '[Insert]';
21294: result := '[Delete]';
18212: result := '[Home]';
20259: result := '[End]';
18721: result := '[PageUp]';
20770: result := '[PageDown]';
18470: result := '[UP]';
20520: result := '[DOWN]';
19237: result := '

赶紧去学电子算了。