Вниз
Скачать: CL | DM;

C++ to Delphi   Найти похожие ветки 

 
Comp ©   (2004-10-13 22:52) [0]

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

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;


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


 
Comp ©   (2004-10-13 23:03) [1]

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

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;


 
TUser ©   (2004-10-14 12:14) [2]

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


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


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

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


 
TUser ©   (2004-10-14 12:34) [4]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c
3-1099128141
Hmm
2004-10-30 13:22
2004.11.28
Excel таблица в Delphi. Редактирование, удаление, поиск ???


1-1100245406
Frozzen
2004-11-12 10:43
2004.11.28
Как правельно объявить массив цветов?


1-1100507261
Sun bittern
2004-11-15 11:27
2004.11.28
PChar and DLL


1-1100610211
Chery
2004-11-16 16:03
2004.11.28
Как Borland Socket Server сделать службой ?


1-1100517283
den_777
2004-11-15 14:14
2004.11.28
Ограничение RICHEDIT на длину текста




   Наверх