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

Вниз

Консоль   Найти похожие ветки 

 
b-Ars   (2002-11-06 12:19) [0]

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


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

вот очистка и 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!");


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

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


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

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


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

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


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

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

Какой тип у NumWritten?


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

Written: DWord;


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

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



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

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

Наверх





Память: 0.45 MB
Время: 0.006 c
6-69454
delphi-hacker
2002-09-24 07:13
2002.11.21
HyperTerminal,как работает?


1-69326
Anar
2002-11-06 08:38
2002.11.21
Ресурсы в EXE


6-69468
Azbul
2002-09-26 10:33
2002.11.21
как програмно сделать чтобы народ в инет ходит не мог?


4-69627
vidiv
2002-10-09 06:26
2002.11.21
как получить иконку ярлыка без стрелки


1-69231
Comp
2002-11-11 14:27
2002.11.21
Инсталляция





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский