![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Почему не работает writeConsoleInput
AntiKiller © (2004-03-26 09:17:00)Добрый день уважаемые мастера
пример:
{$APPTYPE CONSOLE}
var
WCount : DWORD;
rec : INPUT_RECORD;
begin
rec.Event.KeyEvent.AsciiChar :=#65;
rec.Event.KeyEvent.bKeyDown := True;
writeConsoleInput(hScreen , rec, 1, WCount);
readln;
end;
Помогите разобраться почему не работает?
Т.Е. на экран ничего не выводится
AntiKiller (2004-03-26 11:58:00) [1]все разобрался
было
hScreen:=GetStdHandle(STD_OUTPUT_HANDLE);
,а надо было
hScreen:=GetStdHandle(STD_INPUT_HANDLE);
BiN, спасибо за участие
BiN (2004-03-26 11:38:00) [2]а hScreen ты, наверно, из воздуха взял?