Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Выполнение программы. https://www.cyberforum.ru/ delphi-beginners/ thread913677.html
Есть программа которая проверяет если браузер запущен значит виполнить некоторое действие... как сделать так что б программа била запущена и себе работала.... а как только я запущу браузер она...
Как сделать свой лоадер? Delphi
Извините, я новичек в Делфи. Не судите строго. Вобщем есть программа, которая постоянно обновляется. Тоесть выходят новые версии в свет. Для нормальной (для меня работы), мне приходится изменять...
Delphi Отправка текста на eMAIL
Всем привет помогите написать код для отправки сообщения на определенный mail. Т.е. чтобы с листбокса сообщение приходило мне на мыло)
Delphi Двумерные массивы Помогите пожалуйста с решениями задач в Delphi. вот условия: Задание 1. В зрительном зале 23 ряда, в каждом из которых 40 мест(кресел).Информация о проданных билетах хранится в двухмерном... https://www.cyberforum.ru/ delphi-beginners/ thread913601.html
Delphi Как сделать проверку в FileListBox? https://www.cyberforum.ru/ delphi-beginners/ thread913600.html
Имеется компонент FileListBox в нем файлы. Я сделал кнопки "далее" и "назад" нажимая на которые файлы переключаются. Но вот не задача. Дойдя до последнего файла и нажав на кнопку "далее" выскакивает...
Как написать процедуру вывода окна сообщения, содержащего произвольный текст,используя Delphi? Delphi
Помогите с программкой. Сделал бы сам,да вот с компьютером проблема. Заранее спасибо.
Отправка email Delphi
Почему так: form1.SMTP.Host:='94.100.177.1'; form1.SMTP.Port:=25; form1.Smtp.AuthenticationType:=atLogin; form1.Smtp.Username:='email'; form1.Smtp.Password:='password';...
Delphi Найдите пожалуйста ошибку в рекурсивном алгоритме С помощью обхода в глубину пытаюсь найти порядок узлов что бы дойти из v d w. Выводит какой-то левый маршрут либо ничего не выводит. На вход из файла даётся матрица смежности. В первой строке... https://www.cyberforum.ru/ delphi-beginners/ thread913427.html
Delphi Чтение текстового файла из TFileStream https://www.cyberforum.ru/ delphi-beginners/ thread913424.html
Добрый день. Читаю текстовый файл TFileStream (т.к. файл открыт для записи другой программой и просто по-паскалевски его открыть нельзя), но читается не правильно . Подскажите что я делаю не так....
Delphi Даны три вещественных числа, вывести на экран те из них, которые не принадлежат диапазону (-3,8; 1,8) В делфи!!! Даны три вещественных числа, вывести на экран те из них, которые не принадлежат диапазону (-3,8; 1,8). https://www.cyberforum.ru/ delphi-beginners/ thread913420.html
12 / 12 / 13
Регистрация: 14.02.2013
Сообщений: 755
0

Проверка на существование .ini в событие создания формы

27.06.2013, 22:37. Просмотров 914. Ответов 6
Метки (Все метки)

Привет, уже не знаю что делать...
В событие создания главной формы пишу проверку на существования config.ini файла,
ели он есть, программа запускается, если нет в диалоговом сообщение предлагается его создать, код:
Delphi
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
procedure TFournisseurs.FormCreate(Sender: TObject);
  var
    rezult : TModalResult;
    Ini: Tinifile;
begin
  if
    FileExists('config.ini')=false
    then
      begin
        rezult := MessageDlg('Предупреждение: нету файла конфигурации, создать?',mtError, mbOKCancel, 0);
          if
            rezult = mrOK
          then
            begin
              Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'config.ini');
              Ini.WriteBool('Options','Exit',Form1.chk1.checked=True);
              Ini.WriteBool('Options','User',form1.rb2.Checked=True);
              ShowMessage('Конфигурационный файл создан');
            end;
          if
            rezult = mrCancel
              then
                begin
                  ShowMessage('Программа будет закрыта');
                  Application.Terminate;
                end;
    end;
end;
Если нажать Yes, чтоб создать файл, выдает ошибку, но программу запустит не создав файла
Код
First chance exception at $006AB3D8. Exception class $C0000005 with message 'access violation at 0x006ab3d8: read of address 0x000003ac'. Process Proga.exe (4248)
я так понимаю, это из за того что главная форма еще не создана, как с этим бороться ?

Вернуться к обсуждению:
Проверка на существование .ini в событие создания формы
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.06.2013, 22:37
Готовые ответы и решения:

Проверка на существование .ini файла
Как можно проверить существует ли в папке .ini файл с определенным именем?

Проверка формы на существование
подскажите пожалуйста. нужно из одной формы проверить существует ли (загружена ли) другая форма.

Проверка на существование
есть таблица Client со столбцами (Name,LastName,MobilePhoneNumber,Email) и нужно проверить на...

Проверка на существование
Есть один txt-файл. В нем построчно написаны файлы и их вес в байтах. Пример: files.rar 12345678...

6
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.