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

← →
OldFrits (2004-12-05 15:07) [0]

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

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

← →
default © (2004-12-05 15:13) [1]

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

← →
OldFrits (2004-12-06 11:55) [2]

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

← →
DiamondShark © (2004-12-06 12:07) [3]

Если 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;

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

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

Перенос кода с С++ на Паскаль Найти похожие ветки