В действительности, массив array of

Delphi 1

Пример массива констант (Array of Const) III

procedure foo(a : array of const);
implementation
var var1 : longint; var2 : pointer; var3 : integer; begin
var1 := 12345678; var2 := @var1; var3 := 1234; foo([var1, var2, var3]);

В действительности, массив array of const более корректным было бы назвать массивом array of tvariant. Tvariant - множественный выбор типов переменной, в которой можно задать номер типа. В Visual Basic у него имеется наследник. Delphi также позволяет использовать имена.

Определите тип, например, так:

TYPE
NAME1 = Array[1..4,1..10] of Integer;

Затем, в вашей секции CONST:

NAME2 : NAME1 = ((1,2,3,4,5,6,7,8,9,10),
(1,2,3,4,5,6,7,8,9,10), (1,2,3,4,5,6,7,8,9,10), (1,2,3,4,5,6,7,8,9,10));

[001171]

Содержание Назад Вперед

Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий