С Новым годом! Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Создать программу, которая используя пункты меню, управляет таблицей https://www.cyberforum.ru/ delphi-beginners/ thread1993055.html
Создать программу, которая с помощью пунктов меню управляет таблицей(использовать stringgrid, mainmenu). (Пример: создать программу, в которой нажатием кнопки осуществляется заполнение таблицы таблицей умножения, а с помощью подпунктов меню возможно редактирование содержимого ячеек, например прибавить число или возведение в степень.)
Добавить цифры и знаки арифметических действий так, чтобы получилось правильное арифметическое выражение Delphi
Дана конечная последовательность, состоящая из левых и правых скобок различных заданных типов. Как определить, можно ли добавить в нее цифры и знаки арифметических действий так, чтобы получилось правильное арифметическое выражение.
Delphi Порядок отрицательных членов изменить на обратный, порядок неотрицательных сохранить https://www.cyberforum.ru/ delphi-beginners/ thread1993021.html
Задача по делфи(нужно все 3 пункта в 1 программе сделать) Прошу Помочь В условиях задания 3 а) порядок отрицательных членов изменить на обратный, порядок неотрицательных сохранить; б) порядок отрицательных членов сохранить, порядок неотрицательных изменить на обратный; в) порядок отрицательных и положительных членов изменить на обратный.
Delphi Сделать сортировку для таблицы так, чтобы коэффициенты увлеченности формировались по убыванию https://www.cyberforum.ru/ delphi-beginners/ thread1993007.html
Добрый вечер. Помогите пожалуйста с данной задачей:) Дан начальный Stringgrid1 размер которого 7 столбцов и n строк.У него 1 строка закреплена (№,Фамилия,и 5 увлечений). Из 1 стринга мы копируем данные в несколько других стрингов,состоящих из №,Фамилии и 1 увлечения. Нужно сделать сортировку для таблицы(stringgrid2,3,4,5,6) ,так чтобы коэффициенты увлеченности(рандомные числа от 1 до...
Delphi Динамическая загрузка DLL
Добрый день! Прочитал основы DLL для начинающих, подключил динамически dll. Заинтересовала фраза Когда вы работаете с динамической библиотекой, вы значительно экономите память, так как в нее загружается всего один экземпляр Dll для всех программ. Имеется огромная dll , и нужно запускать много программ которые её используют. Сделал все как описано в статье, но dll подгружается в память...
Delphi Как переделать код программы? https://www.cyberforum.ru/ delphi-beginners/ thread1992945.html
Как переделать задачу? Нужно, чтобы результат выводился в поле memo на форме Вот код программы program Zadacha_1; var A,X,Y,An,Ak,Xn,Xk,Ha,Hx,a1:real; i,k,n1:integer; Result:TEXTFILE;
Delphi Создать тест с базой данных + шифрование Ребят первый раз сюда обращаюсь, помогите пожалуйста разобраться в чем ошибка, нужно создать тест с базой вопросов и ответов + шифрование, все сделала но что-то пошло не так(( пишет Test.dpr(5): Declaration expected but identifier 'Windows' found https://www.cyberforum.ru/ delphi-beginners/ thread1992926.html ComboBoxEx Delphi
Здравствуйте, выдает ошибку if Form4.ComboBoxEx1.ItemsEx then begin ссылаюсь на другую форму при выборе определенного пункта выполняются расчеты при помощи разных формул
Delphi Ошибка: Undeclared identifier: 'SelStart' 1. Unit1.pas(300): E2003 Undeclared identifier: 'SelStart' 2. Unit1.pas(302): E2003 Undeclared identifier: 'SelLength' Помогите с ошибками пожалуйста https://www.cyberforum.ru/ delphi-beginners/ thread1992864.html Delphi Создать файл, содержащий сведения меню ресторана Создать файл, содержащий сведения меню ресторана. Каждая запись содержит поля: наименование блюда, количество граммов; цена. Написать программу формирующее меню ресторана. Предусмотреть возможность добавления и удаления блюда. Рассчитать общую стоимость заказа. https://www.cyberforum.ru/ delphi-beginners/ thread1992862.html
Delphi Поиск слова в файле
Здравствуйте, у меня есть такой код: type TForm1 = class(TForm) lbl1: TLabel; lbl2: TLabel; lbl3: TLabel; lbl4: TLabel; lbl5: TLabel; edt1: TEdit; edt2: TEdit;
Delphi Найти все палиндромы https://www.cyberforum.ru/ delphi-beginners/ thread1992827.html
Помогите написать программу в Console Application. Найти все палиндромы не большие 4000, т.е. такие числа, которые читаются одинаково сначала и с конца (например, 535, 1221, 474 и т.д.). Вывести все их файл и подсчитать их общее число. Цифры от 0 до 9 тоже считать палиндромами.
958 / 577 / 136
Регистрация: 23.05.2012
Сообщений: 7,364
29.05.2017, 21:50 0

Убрать ошибку при отмене сохранения - Delphi - Ответ 10491976

29.05.2017, 21:50. Показов 699. Ответов 2
Метки (Все метки)

Ответ

Зачем пытаться что-то писать в файл при отмене сохранения?
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
procedure TForm1.SaveClick(Sender: TObject);
var
   i: Integer;
begin
   if s = '' then Form1.SaveasClick(Sender) else
   begin
      Assignfile(f,S);
      rewrite(f,sizeof(rec));
      for i := 1 to StringGrid1.RowCount-1 do
      begin
         rec.fio:=StringGrid1.cells[1,i];
         rec.country:=StringGrid1.Cells[2,i];
         rec.region:=StringGrid1.Cells[3,i];
         rec.city:=StringGrid1.Cells[4,i];
         seek(f,i-1);
         Blockwrite(f,rec,1);
      end;
      closefile(f);
   end;
end;


Вернуться к обсуждению:
Убрать ошибку при отмене сохранения Delphi
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.05.2017, 21:50
Готовые ответы и решения:

Как убрать ошибку при пустом edit
Есть много эдитов,каждое поле должно быть заполнено.Надо сделать так чтоб кнопка была активна при...

Файл закрывается при отмене сохранения
Здравствуйте. Пишу вот тут Текстовий редактор (курсач :) ) и такая ошибочка Когда Нажимаю закрыть...

Ошибка при отмене сохранения файла
private void button2_Click(object sender, EventArgs e) { var sfd = new...

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

2
29.05.2017, 21:50
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.05.2017, 21:50
Помогаю со студенческими работами здесь

Ошибка при отмене сохранения файла через SaveFileDialog
Создаю файл Word и сохраняю его при помощи SaveFileDialog ' Create Word Application Dim...

Как не сохранять запись в подчиненной форме при отмене сохранения в момент закрытия основной
Добрый день! Есть 2е формы (Ввод оборудования - обычная и История - форма с подчиненной формой в...

При открытии запросов и нажатии кнопки об отмене выдает ошибку 2001
Здорово, ребят, выручите по-братски, дела. БД по Органам Исполнительной власти. в форме...

Ошибка в openFileDiaolog при отмене действия
Добрый всем день почему происходит БАГ в программе, когда я нажимаю ОТМЕНА в окошке...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru