I am working on a console application that uses the graph unit. I want my
graphics window to be the one that accepts keyboard input, I found out that
if I just change to 'WinCRT' instead of 'CRT' it does exactly this. however
there is a problem with WinCRT that I do not understand. Please reference
my test program:
Program KeyTestWin.pas;
Uses Graph,
// CRT;
WinCRT;
Var
Test:Char;
GD,GM:Integer;
Begin
gd:=detect;
gm:=0;
Initgraph(gd,gm,'');
repeat
Test:=readkey;
if Test<>Chr(0) then
Writeln ('KeyCode: ',Ord(Test))
Else
begin
Test := Readkey;
Writeln ('Extended: ',Ord(Test));
end;
Until Test=Chr(27);
End.
If I comment out WinCRT and uncomment CRT and run it, then I get almost the
full keyboard, for example
ALT-X = Extended: 45
CTRL *= Extended: 150
CTRL 8 = Extended: 9
F10 = Extended: 68
CRTL F10 = Extended: 103
ALT F10 = Extended: 113
I do notice just a few keys that windows intercepts, like F11 makes it full
screen and my application never sees the keystroke, but actually very few
keys are intercepted by windows like this.
But with WinCRT instead of CRT, None of these and many more report anything
at all.. it's as if I didn't even hit a key.
NONE of the keys wit ALT respond at all
CTRL works with most Letters but NO number
F10, F11, and F12 do not work.. etc. etc. etc.. you get the idea, it's
extremely limited.
Does anyone have any idea why this is happening or if there is another way
to get keyboard input on the graph window and be able to use the entire
keyboard?
Any help is greatly appreciated!
James
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
