Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Консоль [D6, Win95/98, WinME]


b-Ars ©   (2002-11-06 12:19:00) 

Здравствуйте господа! Не получается корректно работать с консолью. Сразу не разобрался, а нужно срочно, поэтому прошу вас привести пример аналогов паскалевских SetText(Backgroung)Color и GotoXY, или, если не сложно приведите примерчик: посередине окна консоли на белом фоне черными буквами надпись "Hello Word" :). Заранее спасибо! Да, и ещё: можно ли перехватить закрытие консоли пользователем?


b-Ars   (2002-11-11 13:14:00) [1]

Всем спасибо, заработало исключительно с типом Cardinal


MBo   (2002-11-10 14:16:00) [2]

Written: DWord;


b-Ars   (2002-11-10 13:56:00) [3]

>Anatoly Podgoretsky © (10.11.02 13:54)
FillConsoleOutputCharacter(Con.ConHandle, " ", Con.ConSize.X * Con.ConSize.Y, Origin, NumWritten)

Какой тип у NumWritten?


Anatoly Podgoretsky   (2002-11-10 13:54:00) [4]

Какой LPDWORD у WriteLn, не работает он с таким типом, только простые базовые типы


b-Ars   (2002-11-10 13:47:00) [5]

>MBo © (06.11.02 12:35)
Хм, тока вот какой тип у Written? Он ругается на LPDWORD, он в Help написано так же, как быть?


b-Ars   (2002-11-06 12:36:00) [6]

>MBo © (06.11.02 12:35)
Ок, большое спасибо!


MBo   (2002-11-06 12:35:00) [7]

вот очистка и gotoxy, остальное сам найдешь по хелпу, начав с приведенных функций
h := GetStdHandle(STD_OUTPUT_HANDLE);
Size := GetLargestConsoleWindowSize(h);
Origin.X := 10;
Origin.Y := 10;
FillConsoleOutputCharacter(H, " ", Size.X * Size.Y, Origin, Written);
SetConsoleCursorPosition(H, Origin);
writeln("Hello!");


Наверх

Титульная страница Поиск, карта сайта Написать письмо