Ошибка "Access violation at address"

@Mary08_01 · Регистрация: 07.10.2015

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

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
{
UnicodeString  LogPass[100];
 String Result;
 int Counts ,i,h;
 Module->ADODataSetWorkers->Active = True;
 Module->ADODataSetWorkers->First();
 for (int i=0;  Module->ADODataSetWorkers->RecordCount - 1; i++ )
 {
 LogPass[i]=Module->ADODataSetWorkers->FieldValues["Логін"],+"  "+Module->ADODataSetWorkers->FieldValues["Пароль"];
 Module->ADODataSetWorkers->Next();
 Counts++;
 }
 Result = Trim(Edit1->Text)+"  "+Trim(Edit2->Text);
  for ( int h = 0;  Counts; h++)
  {
  if (Result == LogPass[h])
    POC6->ShowModal();
     else
    
        ShowMessage("Невірний логін або пароль");
  }
}

@Sasha · 28.11.2015, 22:04

У тебя в коде циклы не правильно оформлены, а именно условия в них

Добавлено через 26 секунд
По крайней мере это, то что бросается сразу в глаза

Добавлено через 1 минуту
Поля в базе лучше называть латинницей

Добавлено через 52 секунды
И желательно текст проблемы, для чего этот код нужен?

@nick42 · 28.11.2015, 23:51

Выход за пределы отведенной памяти. Попробуйте перед

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

LogPass[i]=Module->ADODataSetWorkers->...

добавить if (i<100)

@Mary08_01 · 29.11.2015, 22:34 **[ТС]**

У тебя в коде циклы не правильно оформлены, а именно условия в них...
А как правильно?

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

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

У тебя в коде циклы не правильно оформлены, а именно условия в них

А как правильно?

@Sasha · 30.11.2015, 01:10

1. Измени поля таблицы на латинницу, чтобы не было проблем в дальнейшем на Login и Password
2. Я предлагаю тебе решение твоей задачи более рациональным способом (см. код ниже)

C++
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
33
34
35
36
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(Edit1->Text.IsEmpty())
 {
   ShowMessage("Введіть логін");
   Edit1->SetFocus();
   return;
 }
 if(Edit2->Text.IsEmpty())
 {
   ShowMessage("Введіть пароль");
   Edit2->SetFocus();
   return;
 }
   if(Module->ADODataSetWorkers->Locate("Login",Edit1->Text,TLocateOptions() << loCaseInsensitive))
   {
      if (Module->ADODataSetWorkers->FieldByName("Password")->AsString != Edit2->Text)
       {
        ShowMessage("Невірний пароль");
        Edit2->SetFocus();
        return;
       }
       else
       {
           ShowMessage("Авторизація пройшла успішно");
       }
    }
 
    else
    {
       ShowMessage("Невірний логін");
       Edit1->SetFocus();
       return;
    }
}
//---------------------------------------------------------------------------

Новые блоги и статьи Все статьи Все блоги /
1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	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),. . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	28.11.2015, 22:04
	У тебя в коде циклы не правильно оформлены, а именно условия в них Добавлено через 26 секунд По крайней мере это, то что бросается сразу в глаза Добавлено через 1 минуту Поля в базе лучше называть латинницей Добавлено через 52 секунды И желательно текст проблемы, для чего этот код нужен? 0