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

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

Как правильно прописать параметры функции? [D6, XP]

Коля ©   (2006-04-02 03:00:00) 

Есть функция xoring которая шифрует буффер с данными. Я хочу, что бы вызывать ее можно было следующим образом: ширф:=xoring(данные)

Как правильно прописть параметры этой функции?

function xoring(Buf: array[1..2048] of byte):array[1..2048] of byte;

Как я понимаю, должно быть что-то в этом роде?
Спасибо за помощь!

---

Коля   (2006-04-02 03:28:00) [1]

спасибо за исчерпывающий ответ.

---

Джо   (2006-04-02 03:22:00) [2]


> var Data: Pointer;

var убрать.

---

Джо   (2006-04-02 03:21:00) [3]

Можно так:
type
 TByteArray = array [1..2048] of Byte;

function Xor (Buf: TByteArray): TByteArray;


Но это не самый лучший вариант, хотя бы потому, что задан фиксированный размер массива.

Можно использовать динамические массивы:
 TByteArray = array of Byte;

Можно вообще передавать ссылку на область памяти и ее размер:
procedure Xor (var Data: Pointer; Count: Integer);

В общем, по ситуации.

---

Наверх