Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Access violation at address 00498C66... при обращении к form1.chart1.series[2] 
V
    Опции темы
DeMoNN
Дата 19.2.2009, 15:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 179
Регистрация: 21.3.2008

Репутация: 1
Всего: 2



Код

procedure TForm1.redrawrg(rg: TRadioGroup; btn, btn2: TButton; tag, tag2: integer);
begin
  Form1.radiogroup1.visible:=false;
  Form1.radiogroup2.visible:=false;
  Form1.radiogroup3.visible:=false;
  Form1.groupbox1.visible:=false;
  Form1.groupbox2.visible:=false;
  Form1.groupbox3.visible:=false;
  Form1.groupbox4.visible:=false;
  Form1.groupbox5.visible:=false;
  Form1.groupbox6.visible:=false;
  Form1.groupbox7.visible:=false;
  Form1.groupbox8.visible:=false;
  Form1.groupbox9.visible:=false;
  Form1.groupbox10.visible:=false;
  Form1.chart1.visible:=false;
  Form1.Chart1.Series[1].Clear;
  Form1.Chart1.Series[2].clear;//здесь возникает ошибка
  Form1.Button1.Enabled:=false;
  Form1.Button2.Enabled:=false;
  rg.Visible:=true;
  rg.Left:=5;
  rg.Top:=5;
  btn.Tag:=tag;
  btn2.Tag:=tag2;
  btn.Left:=5;
  btn.Top:=rg.Height+rg.Top+5;
  btn2.Left:=rg.Width+rg.Left-btn2.Width;
  case tag of
    1..10: btn.Enabled:=true;
  end;
  case tag2 of
    2..14: btn2.Enabled:=true;
  end;
  form1.clientWidth:=rg.Width+rg.Left+5;
  form1.clientheight:=btn.Top+btn.height+5;
end;

Код

procedure TForm1.FormCreate(Sender: TObject);
begin
  redrawrg(form1.radiogroup1, form1.button1, form1.button2, 1, 1);
end;


выдает Access violation at address 00498C66 in module 'uravn.exe'. Read of address 00000003.
странно, ведь объект существует. изза чего может вылезать эта ошибка?
PM MAIL ICQ   Вверх
MetalFan
Дата 19.2.2009, 15:06 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 22
Всего: 128



Цитата(DeMoNN @  19.2.2009,  15:04 Найти цитируемый пост)
 Form1.Chart1.Series[1].Clear;
  Form1.Chart1.Series[2].clear;//здесь возникает ошибка

может с нуля нумерацию применить? )


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
DeMoNN
Дата 19.2.2009, 15:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 179
Регистрация: 21.3.2008

Репутация: 1
Всего: 2



точно, спасибо!
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0431 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.