Вниз
Скачать: CL | DM;

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

 
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;

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


 
DiamondShark ©   (2004-12-06 12:08) [4]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c
1-1102428928
Гость
2004-12-07 17:15
2004.12.19
Модальное окно


10-1072519836
Guest
2003-12-27 13:10
2004.12.19
TAO Developer s Guide


14-1101843293
saNat
2004-11-30 22:34
2004.12.19
Потоки


3-1100713088
SergP.
2004-11-17 20:38
2004.12.19
SQL. DELETE из одной (нескольких таблиц) при использ. нескольких


1-1101986437
сомневающийся
2004-12-02 14:20
2004.12.19
XP-Manifest и TListView




   Наверх