|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Record Array Of Variant
Здравствуйте уважаемые форумчане. Есть задание переписать процедуру, осуществляющую БПФ из С++ в Делфи.
Но возникла проблема при реализации процедуры union Исходный код С++ Код:
union { double af[2048*2]; complex ac[2048]; } a; Код:
procedure FFT(var nn:integer); Type b=Record case byte of 0: (a1: record af: Array[0..2048*2] Of double; end); 1: (a2: record ac: Array[0..2048] Of Variant; end); end; Код:
1: (a2: record ac: Array[0..2048] Of Variant; end); Цитата:
Массив Array[0..2048] Of Variant нужен чтобы потом объявить массив комплексных чисел. Исходная процедура на С++: FFT_R2.rar Полный листнг моей попытки перевода: Делфи.rar P.S. Подскажите люди сведущие, как в Делфи записать вот этот Сишный код? Код:
aw/=nn Последний раз редактировалось Сникерс, 24.05.2013 в 00:40. |