Ошибка "External: sigsegv" при нажатии на кнопку

Программирование на Pascal

Модератор: trubb

Правила форума
Убедительная просьба юзать теги [code] при оформлении листингов.
Сообщения не оформленные должным образом имеют все шансы быть незамеченными.
голова
проходил мимо
Сообщения: 1
Зарегистрирован: 2015-06-17 21:54:04

Ошибка "External: sigsegv" при нажатии на кнопку

Непрочитанное сообщение голова » 2015-06-17 21:55:53

Вылетает ошибка при нажатии на кнопку- класс исключения "External: sigsegv". помогите пожалуйста завтра надо сдать курсач или отчислят.
Вот код этой кнопки, компилирует нормально:
Код Pascal

Код: Выделить всё

procedure TfMain.bAddClick(Sender: TObject);
begin
   //очищаем поля, если там что-то есть:
  fEdit.bl.Text:= '';
  fEdit.grbl.Text:= '';
  fEdit.zakaz.Text:= '';
  fEdit.klient.Text:= '';
  fEdit.stol.Text:= '';
  fEdit.cena.Text:= '';
  //устанавливаем ModalResult редактора в mrNone:
  fEdit.ModalResult:= mrNone;
  //теперь выводим форму:
  fEdit.ShowModal;
  //если пользователь ничего не ввел - выходим:
  if (fEdit.bl.Text= '')then exit;
  //если пользователь не нажал "Сохранить" - выходим:
  if fEdit.ModalResult <> mrOk then exit;
  //иначе добавляем в сетку строку, и заполняем её:
  SG.RowCount:= SG.RowCount + 1;
  SG.Cells[0, SG.RowCount-1]:= fEdit.bl.Text;
  SG.Cells[1, SG.RowCount-1]:= fEdit.grbl.Text;
  SG.Cells[2, SG.RowCount-1]:= fEdit.zakaz.Text;
  SG.Cells[3, SG.RowCount-1]:= fEdit.klient.Text;
  SG.Cells[4, SG.RowCount-1]:= fEdit.stol.Text;
  SG.Cells[4, SG.RowCount-1]:= fEdit.cena.Text;
end;
Последний раз редактировалось f_andrey 2015-06-17 23:29:53, всего редактировалось 1 раз.
Причина: Автору. пожалуйста, оформляйте сообщение по человечески.

Хостинговая компания Host-Food.ru
Хостинг HostFood.ru
 

Услуги хостинговой компании Host-Food.ru

Хостинг HostFood.ru

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2520 рублей (8 CPU, 8Gb RAM, 2x500Gb HDD, RAID 3ware 9750):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

Аватара пользователя
trubb
лейтенант
Сообщения: 864
Зарегистрирован: 2005-03-16 17:42:26
Откуда: сами мы не местные, приехали на лечение

Ошибка "External: sigsegv" при нажатии на кнопку

Непрочитанное сообщение trubb » 2015-06-18 15:50:48

modalresult имха лишний - форма его сама задает, не спа?
иГрАюВсТрАйКбОл!