mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-27 23:11:57 +01:00
-removed TDataset.TempBuffer
git-svn-id: trunk@830 -
This commit is contained in:
parent
06300bc054
commit
fd8de7640e
@ -964,12 +964,6 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
Function TDataset.TempBuffer: PChar;
|
|
||||||
|
|
||||||
begin
|
|
||||||
Result := FBuffers[FRecordCount];
|
|
||||||
end;
|
|
||||||
|
|
||||||
Procedure TDataset.UpdateIndexDefs;
|
Procedure TDataset.UpdateIndexDefs;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
|
|||||||
@ -1044,7 +1044,6 @@ type
|
|||||||
procedure SetRecNo(Value: Longint); virtual;
|
procedure SetRecNo(Value: Longint); virtual;
|
||||||
procedure SetState(Value: TDataSetState);
|
procedure SetState(Value: TDataSetState);
|
||||||
function SetTempState(const Value: TDataSetState): TDataSetState;
|
function SetTempState(const Value: TDataSetState): TDataSetState;
|
||||||
function TempBuffer: PChar;
|
|
||||||
procedure UpdateIndexDefs; virtual;
|
procedure UpdateIndexDefs; virtual;
|
||||||
property ActiveRecord: Longint read FActiveRecord;
|
property ActiveRecord: Longint read FActiveRecord;
|
||||||
property CurrentRecord: Longint read FCurrentRecord;
|
property CurrentRecord: Longint read FCurrentRecord;
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user