| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

$R- в созданном юните, непашет на уровне компиляции [D7, WinXP]

Страницы:   < 1 2 >

imm ©   (2006-02-09 23:22:00) 

Создаю новый юнит, пихаю туда


{$R-} //Убираем проверку индекса
type
 TDArray = array[0..0] of Integer;
 PDArray = ^TDArray;
implementation
 procedure Hello;
 var
   t: PDArray;
 begin
   ...
   //Выделяем память
   GetMem(t, SizeOf(Integer)*10);
   //А здесь ошибка на этапе компиляции
   t^[5] := 10;
   ...
 end;


Как это исправить, то есть как это откомпилировать???? Помогите пожалуйста. За раннее вам благодарен.

---

Imm   (2006-02-09 23:47:00) [21]

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

---

Джо   (2006-02-09 23:33:00) [22]

В принципе, над t, как и над любым указателем, можно выполнять операции увеличения/уменьшения, т.е, например Inc(t,SizeOf(Integer)*2) - сместит указатель на второй элемент.

---

Джо   (2006-02-09 23:30:00) [23]

А почему бы не усложнять себе жизнь и не воспользоваться динамическим массивом array of Integer?

---

Страницы:   < 1 2 >

Наверх