setlength(cPut,col+1);

← →
Dysan © (2004-03-25 19:08) [0]

в процедуру передаю параметр procedure Test(var cPut:array of variant)

и в этой процедуре он мне не дает этот массив сформировать
setlength(cPut,col+1);
говорит Incompatible types
почему?

← →
Algol (2004-03-25 19:14) [1]

TMyVarArray = array of variant;

...

Test(var cPut:TMyVarArray)

← →
Dysan © (2004-03-25 19:17) [2]

не покатит
потомучто если я создам тип TMyVarArray
то в другом Unite я не смогу обьвить процедуру где одним из параметров будет TMyVarArray!! о его просто не видет! :(

← →
Algol (2004-03-25 19:24) [3]

Значит тип TMyVarArray нужно объявить в отдельном модуле, и подключить его к другим модулям где он используется.

Эх, программайзеры... ну хоть бы одну простейшую книжку по языку прочитали, прежде чем за клаву хвататься... Блин.

Объявление типа вынесите в секцию interface, а в Unit"е в uses укажите первый.

> Algol

Это не о Вас, естественно.

setlength(cPut,col+1); Найти похожие ветки