Класс TParams

Класс TParams представляет собой список параметров.

Доступ к элементам списка возможен через индексированное свойство

property Items [Index: Word] : TParam;

а к значениям параметров - через свойство

property ParamValues [const PararrName: String] : Variant;

Добавить новый параметр можно методом

procedure AddParam(Value: TParam) ;

Но для него необходимо создать объект параметра. Это можно сделать методом

function CreateParam(FldType: TTieldType;
const PararrName: string;
PararriType: TParamType) : TParam;

где FidType - тип данных параметра, ParamName - имя параметра и ParamType - тип параметра (см. ниже).

И оба метода можно использовать в связке:

MyParams.AddParam(MyParams.CreateParam(ftInteger, 'Paraml', ptlnput));

Вместо того, чтобы заполнять параметры по одному, можно использовать метод

function ParseSQL (SQL: String;
DoCreate: Boolean): String;

который при DoCreate = True анализирует текст запроса из свойства SQL И создает новый список параметров.

Или же, для присвоения значений сразу всем параметрам используется метод

procedure AssignValues (Value: TParams) ;

Для удаления параметра из списка применяется метод

procedure RemoveParam(Value: TParam) ;

При работе с параметрами для их идентификации полезно использовать обращение по имени, т. к. при работе с хранимыми процедурами после их выполнения порядок следования может измениться. Также и при использовании динамических запросов (их текст SQL может изменяться во время выполнения).

Для обращения к параметру по имени используется метод function ParamByName (const Value: String): TParam;

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

function IsEqual (Value: TParams) : Boolean;

который возвращает значение True, если для параметра Value найден дубликат.

Класс TParam

Класс TParam инкапсулирует свойства отдельного параметра. Имя параметра определяется свойством

property Name: String;

Тип данных параметра задает свойство

property DataType: TFieldType;

Тип данных параметра и связанного поля должны совпадать.

Тип параметра определяется множеством type

TParamType = (ptUnknown, ptInput, ptoutput, ptlnputOutput, ptResult);
TParamTypes = set of TParamType;

которое имеет следующие значения:

□ ptUnknown - тип неизвестен;
□ pt input - параметр предназначен для передачи значения из приложения;
Optoutput - параметр предназначен для передачи значения в приложение;
О ptlnputOutput - параметр предназначен для передачи и приема значения;

О ptResult - параметр предназначен для передачи в приложения информации о статусе операции.

Свойство

property PararriType: TParamType; определяет тип параметра.

При работе с параметрами довольно часто бывает необходимо определить, имеет ли параметр ненулевое значение. Для этого используется свойство


⇐ Предыдущая страница| |Следующая страница ⇒

Программирование в Delphi 7



Новости за месяц

  • Апрель
    2020
  • Пн
  • Вт
  • Ср
  • Чт
  • Пт
  • Сб
  • Вс
  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • 11
  • 12
  • 13
  • 14
  • 15
  • 16
  • 17
  • 18
  • 19
  • 20
  • 21
  • 22
  • 23
  • 24
  • 25
  • 26
  • 27
  • 28
  • 29
  • 30
  • 31