Ребят подскажите, что нужно предпринять в такой ситуации:
Программа запущена с внешнего источника (внешний жёсткий, флешка и тп)
программа сохраняет собственные данные в файл расположенный подле неё, всё прекрасно до момента дисконнекта носителя с которого она запускалась, если диск отключить и потом вновь подключить - программа теряет возможность записи в файл...
Enumeration
#Window_Main
#Button
EndEnumeration
OpenWindow(#Window_Main,500,400,120,70,"test")
ButtonGadget(#Button, 10,10,60,20,"save")
Procedure save()
Define.l file = CreateFile(#PB_Any, "test.txt",#PB_File_NoBuffering)
If IsFile(file)
WriteStringN(file,"test")
;.......
CloseFile(file)
Else
MessageRequester("Ошибка!","Невозможно сохранить файл",#MB_ICONWARNING)
EndIf
EndProcedure
Repeat
Select WindowEvent()
Case #PB_Event_Gadget
Select EventGadget()
Case #Button
save()
EndSelect
Case #PB_Event_CloseWindow
Select EventWindow()
Case #Window_Main
End
EndSelect
EndSelect
Delay(1)
ForEver