|
<< Click to Display Table of Contents >> Navigation: Apollo VCL Components > Apollo VCL Component Reference > TApolloTable > TApolloTable Methods > SetTurboRead |
Declaration
procedure SetTurboRead( Const Value: WordBool );
Description
SetTurboRead is used to speed up Apollo record i/o methods (specifically Skip and Seek). If you are going to be going into a lengthy record read or seek loop, lock the file and then SetTurboRead True. The default value is False.
Parameters
See description above.
Delphi Example
procedure Form1.Button1Click(Sender: TObject);
var
iTotal: Integer;
begin
with ApTbl do
begin
if FLock then
begin
SetTurboRead( True );
GoTop;
iTotal := 0;
while not Eof do
begin
Inc( iTotal, GetInteger( 'AGE' )) ;
Skip( 1 );
end;
SetTurboRead( False );
end;
end;
end;
See Also