paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-14 11:49:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Need fielddefs

Browse Source 
(cherry picked from commit 1b4ad74b68)
This commit is contained in:
Michaël Van Canneyt 2022-02-18 16:38:24 +01:00 committed by marcoonthegit
parent b8ad0cfabf
commit 7fe9c4ba73
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
packages/fcl-db/src/codegen/fpcgtypesafedataset.pp
View File

@ -128,6 +128,7 @@ Type
Constructor Create(AOwner : TComponent); override;
Destructor Destroy; override;
Class Function NeedsSQL: Boolean; override;
Class Function NeedsFieldDefs : Boolean; override;
Property SafeOpts : TGenTypeSafeDatasetOptions Read GetSafeOpts;
end;
@ -818,6 +819,12 @@ begin
Result:=True;
end;
Class Function TDDTypeSafeDatasetCodeGenerator.NeedsFieldDefs : Boolean;
begin
Result:=True;
end;
{ TGenTypeSafeDatasetOptions }
function TGenTypeSafeDatasetOptions.GetInterfaceName: String;