Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.22;
Скачать: CL | DM;

Вниз

Вывод информации в консоль   Найти похожие ветки 

 
TUser ©   (2005-12-14 13:21) [0]

Есть консольное приложение, вывод которого может быть перенаправлен в файл. Возникает проблема, если приложение было завершено нештатно (Ctrl+C). Ведь данные пишутся в буфер, и если выведенного текста мало, то в буфере и остаются, не попадая в файл. FreePascal при этом как-то делает так, что данные пишутся на диск при "нештатном" завершении программы. Можно ли как-то это победить?

program test;
{$apptype console}

var i: integer;
begin
 Write ("a");
 for i:=-MaxInt to MaxInt do
   begin end;
end.


uses:
test > t
Ctrl+C
type t


 
Digitman ©   (2005-12-14 13:32) [1]


> в буфере и остаются, не попадая в файл


сам-то понял что сказал ?


 
umbra ©   (2005-12-14 13:33) [2]

см. справку по SetConsoleCtrlHandler


 
TUser ©   (2005-12-14 17:09) [3]


> umbra ©   (14.12.05 13:33) [2]

Да, подсуну я свой хендлер. Надо в нем как-то прописать освобождение буфера и запись данных на диск. Пробовал там
CloseHandle(GetStdHandle(std_output_handle));
но без толку.


 
Leonid Troyanovsky ©   (2005-12-14 17:21) [4]


> TUser ©   (14.12.05 17:09) [3]

> Да, подсуну я свой хендлер. Надо в нем как-то прописать
> освобождение буфера и запись


FlushFileBuffers ?
Для хендла от GetStdHandle.

--
Regards, LVT.



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

Текущий архив: 2006.01.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
2-1135805005
з. танька
2005-12-29 00:23
2006.01.22
выдрать строку адреса из окна IE


1-1134642411
IceBeerg
2005-12-15 13:26
2006.01.22
Полупрозрачная форма и текст на ней.


2-1136353843
konrads
2006-01-04 08:50
2006.01.22
TQuery


1-1134632727
oleggar
2005-12-15 10:45
2006.01.22
unarj


6-1128678819
Mr. WAP
2005-10-07 13:53
2006.01.22
Перекодировка ..