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

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

Помогите переписать одну строку на Delphi


Max ©   (2016-11-01 19:26:00) 

Здравствуйте.
Не могу разобраться:
float *levels=(float*)malloc(ci.chans*sizeof(float));

Полный код из справки:

BASS_CHANNELINFO ci;
BASS_ChannelGetInfo(handle, &ci);
float *levels=(float*)malloc(ci.chans*sizeof(float)); // allocate an array for each channel's level
BASS_ChannelGetLevelEx(handle, levels, 0.02, 0); // get the levels


Помогите пожалуйста.
Спасибо.


aka   (2016-11-03 08:59:00) [1]

Удалено модератором


Max   (2016-11-01 21:38:00) [2]


> kilkennycat

Спасибо. Разобрался.
Может кому пригодится.

var
  BufLev : array of Single;
begin
..........
  SetLength(BufLev, ChanCountl);
  BASS_ChannelGetLevelEx(Channel, @BufLev[0], 0.05, 0);
..........
end;


Игорь Шевченко   (2016-11-01 21:35:00) [3]


> float *levels=(float*)malloc(ci.chans*sizeof(float));


var
 levels: PSingle;
...
 levels := AllocMem(ch.chans*SizeOf(Single));


kilkennycat   (2016-11-01 21:16:00) [4]

http://www.un4seen.com/forum/?topic=16833.0;wap2


Max   (2016-11-01 19:36:00) [5]

Забыл
float levels[2];


Max   (2016-11-01 19:36:00) [6]

float level;


Наверх

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