Блокнот: как при закрытии определить, что в документе совершались изменения

06.05.2012, 14:06. Показов 653. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Ребята, помогите закрыть программу: Пишу блокнот
Вот исходный код выход из программы:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Private Sub Exit_Click()
Dim msg2 As String
Dim NomerFile2 As Integer
 
If Text1.text = "" Then
Unload Me
 
Else
 
If Text1.Tag = "*" Then
msg2 = MsgBox("Ñîõðàíèòü èçìåíåíèÿ â ôàéëå?", vbYesNoCancel + vbQuestion, Notepad)
 
If msg2 = vbYes Then
 
    If Path_Main = "" Then
        Save_Click
    Else
            NomerFile2 = FreeFile
                Open Path_Main For Append As NomerFile2
            Print #NomerFile2, Text1.text
        Close
    End If
    
End If
 
If msg2 = vbNo Then End
UnMsg = msg2
 
End If
End If
 
End Sub

Сама проблема остается в том, что при закрытии программы он вызывает сообщение при условии если:
1. Файл был изменен
2. Файл новый и не сохранен
Но дело в том. что если я загружу файл на просмотр, то естественно никаких изменений то не было, и он не может выйти из программы когда в условии стоит следующее:

Visual Basic
1
2
3
4
Private Sub Form_Unload(Cancel As Integer)
Exit_Click
Cancel = True
End Sub

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

Что можете предложить?

Добавлено через 43 минуты
Вопрос решен:
Я просто повторил код и добавил

Visual Basic
1
If msg2=vbCancel Then Cancel=True

Если у вас есть вариант получше, я буду рад его принять

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

06.05.2012, 14:06

Ответы с готовыми решениями:

Как при закрытии формы сохранить изменения?
Можно ли при выполнении команды Form1.Close, когда завершается выполнение программы, сохранить все изменения на форме или на отдельном...

Сохранение в текстовом документе при закрытии программы
Начал пользоваться программкой C++Builder 6.В визуальном редакторе почти разобрался.А с кодами пока очень плохо понимаю куда и что...

При закрытии программы сохранялись в ней изменения
Не знаю как поточнее выразиться, ну вобщем такая ситуация: У меня есть программа(*.exe) и файл(*.ini). При запуске из *.ini данные...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

06.05.2012, 14:06

Помогаю со студенческими работами здесь

Commander не сохраняет изменения при закрытии документа
Если я через Total Commander открываю для редактирования документ с помощью notepad++, то при закрытии документа, изменения не сохраняются....

Как выполнить код в закрытии формы при ее принудительном закрытии?
Привет всем) Суть вопроса такова: есть форма, и при её закрытии нужно выполнить код. Если закрывать форму на крестик или...

При закрытии книга предлагает сохранить изменения, даже если ничего не изменилось
После ввода формулы =ДВССЫЛ(АДРЕС(7;2;;;Сведения!$H$1)) при закрытии рабочая книга требует сохранений, даже если ничего не изменилось....

Как сделать так что бы при закрытии монитора, мой ноутбук не переставал работать?
У меня при закрытии крышки монитора ноутбук засыпает и все процессы останавливаются. Вот меня вопрос как и в обще возможно ли настроить...

Как сделать изменения в открытом документе?
Как сделать изменения в открытом документе на удаленном компьютере по сети?

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .

Наверх