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

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

Перенос кода с С++ на Паскаль


OldFrits ©   (2004-12-05 15:07:00) 

Здравствуйте уважаемые мастера!
Помогите перенести следующий код


MyClass *array;
int count
array = new MyClass[count]


DiamondShark   (2004-12-06 12:08:00) [1]

Или MyClass переводить не как class, а как object.
Тогда один-к-одному переводится.


DiamondShark   (2004-12-06 12:07:00) [2]

Если MyClass -- это, таки, класс, то никак не перевести.
Здесь создаётся массив экземпляров, а в дельфи нет статических экземпляров.

Что-то вроде такого:

var
_array: array of MyClass;
count: integer;
i: integer;
begin
...
SetLength(_array, count);
for i := Low(_array) to High(_array) do
 _array[i] := MyClass.Create;

Естественно, потом удалять, ручками вызывая деструктор.


OldFrits   (2004-12-06 11:55:00) [3]

Спасибо за ответ! Попробуем...
Смущает только, что array у меня указатель, а у Вас переменная...


default   (2004-12-05 15:13:00) [4]

что-то вроде такого
var
  array: MyClass;
  count: Integer;
...
begin
...
 array := MyClass.Create(count);


Наверх

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