Текущий архив: 2004.05.16;
Скачать: CL | DM;
Вниз
Почему не работает writeConsoleInput Найти похожие ветки
← →
AntiKiller (2004-03-26 09:17) [0]Добрый день уважаемые мастера
пример:
{$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;
Помогите разобраться почему не работает?
Т.Е. на экран ничего не выводится
← →
BiN © (2004-03-26 11:38) [1]а hScreen ты, наверно, из воздуха взял?
← →
AntiKiller (2004-03-26 11:58) [2]все разобрался
было
hScreen:=GetStdHandle(STD_OUTPUT_HANDLE);
,а надо было
hScreen:=GetStdHandle(STD_INPUT_HANDLE);
BiN, спасибо за участие
Страницы: 1 вся ветка
Текущий архив: 2004.05.16;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.965 c
