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

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

массив pointer, обратиться к ячейке

[true]TRIx ©   (2010-04-17 22:59:00) 

var
Buf: pointer;
.........
begin
........
BlockRead(F1, Buf^, BufSize, NumRead);
// как обратиться к ячейке Buf, нужно изменить байт и записать
........
BlockWrite(F2, Buf^, NumRead, NumWritten);
........

---

oxffff   (2010-04-18 16:12:00) [1]

$POINTERMATH ON?

---

Германн   (2010-04-18 01:59:00) [2]

> Юрий Зотов ©   (18.04.10 01:35) [5]

Делаем из Паскаля подобие Си?
:)

---

Юрий Зотов   (2010-04-18 01:35:00) [3]

var
 ...
 P: PByte;
begin
 ...
 P := PByte(Cardinal(Buf) + Offset); // Получаем адрес изменяемого байта
 P^ := Value; // Меняем байт
 ...

---

DVM   (2010-04-17 23:21:00) [4]

> как обратиться к ячейке Buf, нужно изменить байт и записать

Можно привести к PAnsiChar и обращаться так PAnsiChar(buf)[n]

---

[true]TRIx   (2010-04-17 23:13:00) [5]

Удалено модератором
Примечание: Правила читаем и уважаем.

---

Anatoly Podgoretsky   (2010-04-17 23:10:00) [6]

> [true]TRIx  (17.04.2010 22:59:00)  [0]

PByteArray

---

Jeer   (2010-04-17 23:09:00) [7]

Иди кури траву дальше - пока, как видно, не вставило.

---

Наверх