Перейти на главную   
  helloworld.ru - документация и книги по программированию  
helloworld.ru - документация и книги по программированию
    главная     хостинг    
Поиск по сайту:  
Смотрите также
Языки программирования
C#
MS Visual C++
Borland C++
C++ Builder
Visual Basic
Quick Basic
Turbo Pascal
Delphi
JavaScript
Java
PHP
Perl
Assembler
AutoLisp
Fortran
Python
1C

Интернет-технологии
HTML
VRML
HTTP
CGI
FTP
Proxy
DNS
протоколы TCP/IP
Apache

Web-дизайн
HTML
Дизайн
VRML
PhotoShop
Cookie
CGI
SSI
CSS
ASP
PHP
Perl

Программирование игр
DirectDraw
DirectSound
Direct3D
OpenGL
3D-графика
Графика под DOS

Алгоритмы
Численные методы
Обработка данных

Сис. программирование
Драйверы

Базы данных
MySQL
SQL

Другое

Хостинг


Друзья
demaker.ru
Реклама

Лучший хостинг. Аренда серверов




helloworld.ru

IV. ФУНКЦИИ И ПРОЦЕДУРЫ ДЛЯ РАБОТЫ С ПЕРЕМЕННЫМИ РАЗЛИЧНЫХ ТИПОВ ДАННЫХ

3. Функции и процедуры для работы с типом Variant.


Функция VarArrayCreate( const Bounds: array of Integer; VarType: Integer ): Variant;

Модуль: System

Описание
Функция создает массив значений типа Variant. Границы размерностей массива определяются параметром Bounds, который должен содержать пары значений (нижняя и верхняя граница). Тип элементов массива указывается в параметре VarType, и должен соответствовать одному из значений поля TvarData.VarType (См. описание функции VarType), за исключением значений varArray, varByRef и varString. Для создания Variant-массива строк необходимо в параметре VarType указать значение varOleStr.
Если для элементов массива задан тип значе-ний varVariant, то они, в свою очередь, могут представлять собой Variant-массивы.

Пример
var
   S: string;
   Mas: Variant;
begin
   Mas:= VarArrayCreate([0, 3], varVariant);
   Mas[0]:= VarArrayHighBound(Mas, 1);
   Mas[1]:= 'Быть или не быть?';
   Mas[2]:= 12.34567;
   Mas[3]:= VarArrayOf( [7, 354, 0, 21, 66, 189] );
   S:= VarToStr( Mas[1] );       // S:= 'Быть или не быть?'
   S:= VarToStr( Mas[3][1] );     // S := 354
end;


[ Оглавление ]









helloworld.ru © 2001-2021
Все права защищены