Project Incassaciya.exe raised exception class EAccessViolation with message 'Access violation at address

@RedBull89 · Регистрация: 04.06.2012

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

Помогите пожалуйста. При запуске программы вылезает ошибка:

Project Incassaciya.exe raised exception class EAccessViolation with message 'Access violation at address 004618FD in module 'Incassaciya.exe'. Read od Address 000002FC'. Process stopped. Use Step or Run to continue.

Ошибку показывает на строку в коде ниже

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TfrmMain.FormShow(Sender: TObject);
var fini: TiniFile;
begin
  fini:=TiniFile.Create(ExtractFilePath(Application.ExeName)+'init.ini');
  FrmRekviziti.EdtDebet.Text := fini.ReadString('Main','Debet',''); //ошибка тут
  FrmRekviziti.EdtKredit.Text := fini.ReadString('Main','Kredit','');
  FrmRekviziti.EdtOtKogo.Text := fini.ReadString('Main','Ot Kogo','');
  FrmRekviziti.EdtPoluchatel.Text := fini.ReadString('Main','Poluchatel','');
  FrmRekviziti.EdtINN.Text := fini.ReadString('Main','INN','');
  FrmRekviziti.EdtRasSchet.Text := fini.ReadString('Main','Raschetniy Schet','');
  FrmRekviziti.EdtBankVnos.Text := fini.ReadString('Main','Bank Vnositel','');
  FrmRekviziti.EdtBIKVnos.Text := fini.ReadString('Main','BIK Vnositelya','');
  FrmRekviziti.EdtBankPoluch.Text := fini.ReadString('Main','Bank Poluchatel','');
  FrmRekviziti.EdtBIKPoluch.Text := fini.ReadString('Main','BIK Poluchatelya','');
  FrmRekviziti.EdtIstPost.Text := fini.ReadString('Main','Istochnik Postupleniya','');
  FrmRekviziti.EdtSimvol.Text := fini.ReadString('Main','Simvol','');
end;

Раньше все работало отлично, потом в свойствах формы менял значения в BorderStyle и FormStyle.
Код из ini-файла заносит данные в эдиты на другой форме.

Причем если этот код кинуть в кнопку а не в свойство формы FormShow, то все работает отлично

@RedBull89 · 17.04.2015, 22:18 **[ТС]**

так я из него и не выходил

@mss · 17.04.2015, 22:19

ну так и приведи сюда его текст, раз не выходил)

@RedBull89 · 17.04.2015, 22:21 **[ТС]**

Так я из него и не выходил

Добавлено через 23 секунды
А я откуда привожу текст, из него

Добавлено через 41 секунду
Или весь кидать надо?

@mss · 17.04.2015, 22:23

Сообщение от RedBull89

А я откуда привожу текст, из него

Давай ты уже врать не будешь ?
Текст ты приводишь откуда угодно, только не из dpr-файла ..

Добавлено через 1 минуту

Сообщение от RedBull89

Или весь кидать надо?

Русский понимаешь ?
Приведи текст файла dpr !
Это обычный текстовый файл)..

@RedBull89 · 17.04.2015, 22:26 **[ТС]**

Я в растерянности...
dpr это файл проект Delphi. Его если запускать, открывается соответственно проект. Листинг которого я и кидаю сюда

Добавлено через 1 минуту

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
program Incassaciya;
 
uses
  Forms,
  UMain in 'UMain.pas' {frmMain},
  URekvisiti in 'URekvisiti.pas' {FrmRekviziti},
  USpravka in 'USpravka.pas' {frmSpravka};
 
{$R *.res}
 
begin
  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TFrmRekviziti, FrmRekviziti);
  Application.CreateForm(TfrmSpravka, frmSpravka);
  Application.Run;
end.

Вот так если через блокнот открывать

@mss · 17.04.2015, 22:28

Сообщение от RedBull89

dpr это файл

Да, это как ни странно файл, обычный текстовый файл..

Сообщение от RedBull89

Его если запускать

Да не надо его никуда "запускать" !)

Представь себе что это не dpr-, а txt-файл - ты его обычно как "запускаешь" ? Как смотришь его содержимое ?
Ну вот и просмотри содержимое dpr-файла точно таким же макаром)

@RedBull89 · 17.04.2015, 22:29 **[ТС]**

Текстовый файл через блокнот смотрю, что и сделал выше c dpr

@mss · 17.04.2015, 22:29

Ну и ?)
Переменную видишь ?

@RedBull89 · 17.04.2015, 22:31 **[ТС]**

Честно говоря не совсем понимаю о чем ты...
Т.к. frmRekviziti представляю себе формой а не переменной...
Такие уж у меня скудные познания

@mss · 17.04.2015, 22:33

Сообщение от RedBull89

frmRekviziti представляю себе формой а не переменной

Что, по-твоему, делается в строке

Delphi
1
Application.CreateForm(TFrmRekviziti, FrmRekviziti);

?

@northener · 17.04.2015, 22:35

Сообщение от RedBull89

Ничего не понимаю(( раньше то почему работало

Раньше это был чужой, надыбанный тобой код. А после того как ты влез в него своими кривыми ручками...

@RedBull89 · 17.04.2015, 22:37 **[ТС]**

Форма открывается надо думать, или инициализируется приложением как-то

Добавлено через 50 секунд
northener, не надо умничать. Это мой код полностью. За исключением перевода цифр в слова.

@mss · 17.04.2015, 22:38

Сообщение от RedBull89

Форма открывается

То есть ДО этой строчки она, по-твоему, существовала, но была попросту невидима, так ?

Добавлено через 1 минуту

Сообщение от RedBull89

не надо умничать

Ты не глупи)
Включай голову и пытайся думать над происходящим в реальности в коде ..
Иначе зачем ты здесь ?)

@RedBull89 · 17.04.2015, 22:40 **[ТС]**

Значит я не правильно сказал. Правильнее создает форму.

Добавлено через 48 секунд
Я здесь чтобы разобраться с ошибкой

@northener · 17.04.2015, 22:40

Сообщение от RedBull89

northener, не надо умничать. Это мой код полностью.

Ладно. Не буду больше ничего говорить.

@mss · 17.04.2015, 22:41

Сообщение от RedBull89

Правильнее создает форму

Вот именно - создает !
Т.е. до этой строчки форма попросту не существовала.

Поехали дальше)

OnShow чей метод ?

@RedBull89 · 17.04.2015, 22:45 **[ТС]**

Ты хочешь сказать, что когда срабатывает FormShow формы Main, то форма Rekviziti еще не создана и поэтому код не может обратиться к ней ?

Добавлено через 21 секунду
т.к. сначала создается Main и только после нее Rekviziti

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

Добавлено через 38 секунд
Как то бредово..

@mss · 17.04.2015, 22:47

Именно это и поисходит. Именно это ты и должен был сам обнаружить)
Но метод OnShow первой (в порядке создания) формы не мог бы сработать ДО создания второй формы в принципе, если бы вчера ты не накосячил где-то в своем проекте)

@RedBull89 · 17.04.2015, 22:49 **[ТС]**

Сегодня, но косяк произошел после того, как я в свойствах полазил..может что не то нажал, т.к. мало какие из них знаю, и пробовал методом тыка

@mss · 17.04.2015, 22:50

Сообщение от RedBull89

можно поставить сначала создание Rekvizit

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

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:18 [ТС]
	так я из него и не выходил 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	17.04.2015, 22:19
	ну так и приведи сюда его текст, раз не выходил) 0

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:21 [ТС]
	Так я из него и не выходил Добавлено через 23 секунды А я откуда привожу текст, из него Добавлено через 41 секунду Или весь кидать надо? 0

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:29 [ТС]
	Текстовый файл через блокнот смотрю, что и сделал выше c dpr 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	17.04.2015, 22:29
	Ну и ?) Переменную видишь ? 0

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:31 [ТС]
	Честно говоря не совсем понимаю о чем ты... Т.к. frmRekviziti представляю себе формой а не переменной... Такие уж у меня скудные познания 0

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:37 [ТС]
	Форма открывается надо думать, или инициализируется приложением как-то Добавлено через 50 секунд northener, не надо умничать. Это мой код полностью. За исключением перевода цифр в слова. 0

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:40 [ТС]
	Значит я не правильно сказал. Правильнее создает форму. Добавлено через 48 секунд Я здесь чтобы разобраться с ошибкой 0

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:45 [ТС]
	Ты хочешь сказать, что когда срабатывает FormShow формы Main, то форма Rekviziti еще не создана и поэтому код не может обратиться к ней ? Добавлено через 21 секунду т.к. сначала создается Main и только после нее Rekviziti Добавлено через 2 минуты можно поставить сначала создание Rekviziti, но тогда она и запускается сразу первой. Ее скрывать надо тогда при запуске. Правильно? Добавлено через 38 секунд Как то бредово.. 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	17.04.2015, 22:47
	Именно это и поисходит. Именно это ты и должен был сам обнаружить) Но метод OnShow первой (в порядке создания) формы не мог бы сработать ДО создания второй формы в принципе, если бы вчера ты не накосячил где-то в своем проекте) 0

@RedBull89 0 / 0 / 0 Регистрация: 04.06.2012 Сообщений: 120
	17.04.2015, 22:49 [ТС]
	Сегодня, но косяк произошел после того, как я в свойствах полазил..может что не то нажал, т.к. мало какие из них знаю, и пробовал методом тыка 0