Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 08.09.2011, 18:45   #1
hunter03
Форумчанин
 
Регистрация: 05.05.2009
Сообщений: 244
По умолчанию несовместимость типов?

Здравствуйте, столкнулся с такой проблемой:
у меня обьявлен массив
Код:
AP: array of TPoint;
мне в этот массив нужно вогнать значения, которые находятся к примеру в мемо, я делаю так
Код:
AP[i].X :=StrToInt(memo1.Lines[i-1]);
все четко компилится но выдает во время работы ошибку...что это может быть? Подскажите если знаете , спасибо!
hunter03 вне форума
Старый 08.09.2011, 19:51   #2
veniside
Старожил
 
Регистрация: 03.01.2011
Сообщений: 2,508
По умолчанию

> но выдает во время работы ошибку

Какую именно ошибку? Как минимум их может быть четыре:

1) в memo1.Lines[i-1] хранится строка, которая не может быть представлена как целое число

2) i-1 не является допустимым индексом для строк в memo1

3) memo1 ещё не создано или уже разрушено

4) i не является допустимым индексом для массива AP
"Когда приходит положенное время, человек перестаёт играть в пинбол. Только и всего."
veniside вне форума
Старый 08.09.2011, 19:59   #3
hunter03
Форумчанин
 
Регистрация: 05.05.2009
Сообщений: 244
По умолчанию

Код:
 AP: array of TPoint;

MsExcel := CreateOleObject('Excel.Application');
 MsExcel.Workbooks.Open['C:\Documents and Settings\Admin\Рабочий стол\ГРАФИК\1.xls', 0, True];
 n:=1;
 while (MsExcel.Sheets[1].Cells[n,1].Text)<>'' do begin
  AP[n].X :=StrToInt(MsExcel.Sheets[1].Cells[n,1].Text);
  AP[n].Y :=StrToInt(MsExcel.Sheets[1].Cells[n,2].Text);
   n:=n+1;
  end;

   SetLength (AP, n);
   Form1.Canvas.Pen.Mode := pmMask;
 Polygon (AP);
Вот полный кусок кода, считываю данные с экселя , материться на строку
Код:
AP[n].X :=StrToInt(MsExcel.Sheets[1].Cells[n,1].Text);
При чем когда считываю данные в обычный массив все работает идеально и график строится, а вот именно с этим не хочет, в чем проблемя не пойму
hunter03 вне форума
Старый 08.09.2011, 20:07   #4
hunter03
Форумчанин
 
Регистрация: 05.05.2009
Сообщений: 244
По умолчанию

та в том то и дело что не проще, если б по заданию не над было преплетать масив типа TPoint, я б загнал данные в обычн. масив и проблемы б небыло....а так...
hunter03 вне форума
Старый 08.09.2011, 20:07   #5
veniside
Старожил
 
Регистрация: 03.01.2011
Сообщений: 2,508
По умолчанию

а кто будет инициализировать массив перед (а не после!) обращением к его элементам?
"Когда приходит положенное время, человек перестаёт играть в пинбол. Только и всего."
veniside вне форума
Старый 08.09.2011, 20:08   #6
hunter03
Форумчанин
 
Регистрация: 05.05.2009
Сообщений: 244
По умолчанию

прикол в том что у меня не робит даж если пишу
Код:
 AP[0].X :=StrToInt('10');
  AP[0].Y :=StrToInt('12'); ;
hunter03 вне форума
Старый 08.09.2011, 20:11   #7
veniside
Старожил
 
Регистрация: 03.01.2011
Сообщений: 2,508
По умолчанию

прикол в том, что массив надо инициализировать перед обращением к нему.

Код:
SetLength(AP, 1);
AP[0].X :=StrToInt('10');
AP[0].Y :=StrToInt('12');
"Когда приходит положенное время, человек перестаёт играть в пинбол. Только и всего."
veniside вне форума
Старый 08.09.2011, 20:15   #8
hunter03
Форумчанин
 
Регистрация: 05.05.2009
Сообщений: 244
По умолчанию

Спасибо большое, действительно нужно перед)
hunter03 вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
несовместимость miscreant Помощь студентам 6 26.09.2010 16:34
При переносе функций в один файл, возникает несовместимость типов.. Человек_Борща Общие вопросы Delphi 5 30.07.2010 20:08
Несовместимость Char & String Alex Cones Общие вопросы Delphi 5 05.12.2009 14:28
Несовместимость двух операторов August550 Помощь студентам 16 23.04.2008 21:30
Несовместимость Софта и железа Stilet Софт 6 04.10.2007 09:12