| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите перевести код из Си в Делфи [D7, WinXP]
Amid © (2009-07-20 14:56:00)Помогите перевести код из Си в Делфи
Есть код:
struct ToSend
{
WORD prot;
WORD datal;
BYTE data[1];
};
......
ToSend *data = (ToSend *) new BYTE[512];
data->prot = 0;
data->datal = 0;
......
а как будет в Делфи ?
Amid (2009-07-20 15:27:00) [1]спосибо !!!!!
clickmaker (2009-07-20 15:21:00) [2]type
ToSend = packed record
prot: Word;
datal: Word;
data: ^Byte;
end;
PToSend = ^ToSend;
var
data: PToSend;
data := PToSend(AllocMem(512));
data.prot = 0;
data.datal = 0;
...
| |
