paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-08 07:46:03 +02:00
Code Issues Packages Projects Releases Wiki Activity

* lookup property published but not stored. Doesn't change much, but less trouble when opening/dualmaintaining delphi forms.

Browse Source 
git-svn-id: trunk@42467 -
This commit is contained in:
marco 2019-07-20 14:40:34 +00:00
parent a670360d08
commit ed2dbc19e7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-db/src/base/db.pas
View File

@ -428,7 +428,6 @@ type
property FieldNo: Longint read FFieldNo; property FieldNo: Longint read FFieldNo;
property IsIndexField: Boolean read FIsIndexField; property IsIndexField: Boolean read FIsIndexField;
property IsNull: Boolean read GetIsNull; property IsNull: Boolean read GetIsNull;
property Lookup: Boolean read GetLookup write SetLookup; deprecated;
property NewValue: Variant read GetNewValue write SetNewValue; property NewValue: Variant read GetNewValue write SetNewValue;
property Offset: word read FOffset; property Offset: word read FOffset;
property Size: Integer read FSize write SetSize; property Size: Integer read FSize write SetSize;
@ -455,6 +454,7 @@ type
property LookupDataSet: TDataSet read FLookupDataSet write FLookupDataSet; property LookupDataSet: TDataSet read FLookupDataSet write FLookupDataSet;
property LookupKeyFields: string read FLookupKeyFields write FLookupKeyFields; property LookupKeyFields: string read FLookupKeyFields write FLookupKeyFields;
property LookupResultField: string read FLookupResultField write FLookupResultField; property LookupResultField: string read FLookupResultField write FLookupResultField;
property Lookup: Boolean read GetLookup write SetLookup stored false; deprecated;
property Origin: string read FOrigin write FOrigin; property Origin: string read FOrigin write FOrigin;
property ProviderFlags : TProviderFlags read FProviderFlags write FProviderFlags; property ProviderFlags : TProviderFlags read FProviderFlags write FProviderFlags;
property ReadOnly: Boolean read FReadOnly write SetReadOnly; property ReadOnly: Boolean read FReadOnly write SetReadOnly;