Событие OnRestore

Событие OnValidateRow

Событие OnGetRow

Событие OnGetRow вызывается для получения данных для текущей строки. Имеется несколько методов для записи данных в специальные буферы используемые Rave. Порядок и типы записываемых полей должен быть точно таким же, как полученные определения полей в событии OnGetCols.

В следующем списке приведены методы объекта Connection для записи данных в буфера.

procedure WriteStrData(FormatData: string; NativeData: string); {dtString}

procedure WriteIntData(FormatData: string; NativeData: integer); {dtInteger}

procedure WriteBoolData(FormatData: string; NativeData: boolean); {dtBoolean}

procedure WriteFloatData(FormatData: string; NativeData: extended); {dtFloat}

procedure WriteCurrData(FormatData: string; NativeData: currency); {dtCurrency}

procedure WriteBCDData(FormatData: string; NativeData: currency); {dtBCD}

procedure WriteDateTimeData(FormatData: string; NativeData: TDateTime);

{dtDate, dtTime and dtDateTime}

procedure WriteBlobData(var Buffer; Len: longint);

{dtBlob, dtMemo and dtGraphic}

Также имеется специальный метод, названный WriteNullData (без параметров), который может быть использован для некоторых полей, для указания неинициализированных данных (null). Параметр FormatData используется для передачи строки форматирования данных для данного поля. Параметр NativeData предназначен для передачи неформатированных или чистых данных поля. Если строка форматирования определена в отчете Rave, то она используется для форматирования, иначе используется FormatData.

Пример:

procedure TDataForm.CustomCXNGetRow(Connection: TRvCustomConnection);

begin

With Connection do begin

WriteIntData('',DataRecord.IntField);

WriteStrData('',DataRecord.StrField);

WriteFloatData('',DataRecord.FloatField);

end; { with }

end;

Событие OnValidateRow возникает для каждой строки данных, позволяя управлять включением строки данных в отчет или нет. Обычно это единственное событие, которое определяется для не пользовательских подключений.

Пример:

procedure TDataForm.CustomCXNValidateRow(Connection: TRvCustomConnection;

var ValidRow: Boolean);

begin

ValidRow:= DataRecord.FloatField >= 0.0;

end;

Событие OnRestore для прекращения текущей сессии и восстановления предыдущего состояния. В этом событие Вы можете закрыть файлы данных, освободить ресурсы и восстановить предыдущее состояние, которое было перед событием OnOpen.

Пример:

procedure TDataForm.CustomCXNRestore(Connection: TRvCustomConnection);

begin

CloseFile(DataFile);

end;

Приложение

Дата добавления: 2015-05-09