C++ to Delphi

← →
Comp © (2004-10-13 22:54) [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;

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