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

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

C++ to Delphi [D7, WinXP]


Comp ©   (2004-10-13 22:52:00) 

Люди, помогите пожалуйста перевести строчку

pMyItem = (MYITEM *) LocalAlloc(LMEM_FIXED,sizeof(MYITEM) + CCH_MAXITEMTEXT);

где

type
tagMYITEM=packed record
   hfont:HFONT ;
   cchItemText:Cardinal;
   szItemText:array[0..1] of CHAR;
   end;

var
MYITEM:tagMYITEM;


Зараннее благодарен!


TUser   (2004-10-14 12:34:00) [1]

Автор не пишет, чем он пользуется и зачем это надо. Хотя учитывая, что там packed record - возможно действительно требуется какое-то взаимодействие/совместимость с сишными программаями, - тогда LocalAlloc


Суслик   (2004-10-14 12:19:00) [2]


> Можно еще New использовать

а может и нельзя
LocalAlloc в куче выделяет место. Может автор пользуется чем-то, что требует выделение именно к виндвовой куче. Дельфовый манагер памяти может не подойти.


TUser   (2004-10-14 12:14:00) [3]

Можно еще New использовать


Comp   (2004-10-13 23:03:00) [4]

Извините за беспокойство, вроде прошарил.

pMyItem := PointMYITEM(LocalAlloc(LMEM_FIXED,sizeof(tagMYITEM)+CCH_MAXITEMTEXT));

где

tagMYITEM=packed record
   hfont:HFONT ;
   cchItemText:Cardinal;
   szItemText:array[0..1] of CHAR;
   end;
PointMYITEM = ^tagMYITEM;

var

pMyItem:PointMYITEM;


Наверх

Титульная страница Поиск, карта сайта Написать письмо