Реакция на выключения компютера

Поделиться124.03.2011 15:51:56

Автор: Илья
Активный участник
Зарегистрирован: 13.02.2011
Приглашений: 0
Сообщений: 80
Уважение: [+0/-0]
Позитив: [+1/-0]
Провел на форуме:
1 день 6 часов
Последний визит:
06.08.2011 00:08:38

Моя программа стоящая на автозапуске с самого включения компьютера при определённом условии записывает в файл данные. Когда я выключаю компютер или в деспетчере задач завершаю процесс этой программы то, то что записано в файл должно сохранятся. Тоесть когда я запускал программу не с exeшника а в PureBasic и нажимал "Завершить программу" то все что я записал в файл сохранялось. Но когда создал из этой программы exe и аворийно её завершил нечего не сохранилось. Я записываю данные в файл таким образом:

Код:

OpenFile(0, "C:\text.txt")   
FileSeek(0, Lof(0))
z:
Sleep_(2)
WriteString(0, "qqq,")  
Goto z

.
Подскажите пожалуйста ,как сделать чтоб при аварийном завершении программы записаное в файл сохранялось?

0

Поделиться224.03.2011 15:56:26

Автор: Пётр
Активный участник
Зарегистрирован: 14.06.2009
Приглашений: 0
Сообщений: 2944
Уважение: [+96/-5]
Позитив: [+1/-0]
Пол: Мужской
Провел на форуме:
2 месяца 9 дней
Последний визит:
Вчера 21:54:06

Илья написал(а):

как сделать чтоб при аварийном завершении программы записаное в файл сохранялось

Добавь после WriteString строку:

Код:

FlushFileBuffers(0)

0

Поделиться324.03.2011 17:55:37

Автор: ВиниПур
Активный участник
Зарегистрирован: 11.11.2010
Приглашений: 0
Сообщений: 271
Уважение: [+8/-0]
Позитив: [+1/-0]
Провел на форуме:
1 день 22 часа
Последний визит:
12.03.2022 21:07:46

Илья написал(а):

Я записываю данные в файл таким образом:

Тут важнее не то каким образом, а то как твоя программа реагирует на аварийное закрытие и успевает ли она выполнить этот код при завершении работы?

0

Поделиться424.03.2011 18:02:29

Автор: ВиниПур
Активный участник
Зарегистрирован: 11.11.2010
Приглашений: 0
Сообщений: 271
Уважение: [+8/-0]
Позитив: [+1/-0]
Провел на форуме:
1 день 22 часа
Последний визит:
12.03.2022 21:07:46

То=есть твоя программа должна правильно обработать команду Винды на закрытие(#WM_QUERYENDSESSION), а именно сделать все свои дела и закрыться:

Код:

	Procedure MyWindowCallback(WindowID,Message,wParam,lParam) 
	Result=#PB_ProcessPureBasicEvents 
	If Message=#WM_QUERYENDSESSION 
	MessageRequester("WARNING","Windows is shutting down!",0) 
	EndIf 
	ProcedureReturn Result 
	EndProcedure 
	 
	If OpenWindow(0,300,350,400,200,"test",#PB_Window_SystemMenu) 
	SetWindowCallback(@MyWindowCallback()) 
	Repeat : Until WaitWindowEvent()=#PB_Event_CloseWindow 
	EndIf

0