Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2002.09.09;
Скачать: [xml.tar.bz2];

Вниз

console-mouse   Найти похожие ветки 

 
Fant   (2002-08-14 18:02) [0]

Как мыша в console application сделать?


 
Malder   (2002-08-14 20:55) [1]

А нафига оно тамо ?


 
DiamondShark   (2002-08-14 22:07) [2]

var
hStdIn: THandle;
Mode: DWORD;
Event: INPUT_RECORD;
EventCount: DWORD;
begin
hStdIn := GetStdHandle(STD_INPUT_HANDLE);
GetConsoleMode(hStdIn, Mode);
Mode := Mode or ENABLE_MOUSE_INPUT;
SetConsoleMode(hStdIn, Mode);

repeat
ReadConsoleInput(hStdIn, Event, 1, EventCount);
case Event.Eventtype of
KEY_EVENT: // Обработка клавиши ;
MOUSE_EVENT: // Обработка мыши;
end;
until ExitCondition;
end;

Подробнее в хелпе.



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2002.09.09;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.006 c
1-27089
c0pyc@t
2002-08-28 09:36
2002.09.09
Уникальный ID


14-27225
grinn
2002-08-14 19:58
2002.09.09
Delphi и dll


14-27234
AL2002
2002-08-14 11:31
2002.09.09
Зашёл на торри нет


1-27049
Nikola62
2002-08-27 13:29
2002.09.09
Как перечеркнуть линией TPanel


3-26920
Пономарев Андрей
2002-08-19 09:25
2002.09.09
UNC и TIBDataBase





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский