mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-08-08 14:15:53 +02:00
* Remove some debug statements
This commit is contained in:
parent
7f311b408c
commit
8de41029b1
@ -194,13 +194,9 @@ Var
|
|||||||
|
|
||||||
begin
|
begin
|
||||||
inherited InternalOpen;
|
inherited InternalOpen;
|
||||||
Writeln('Checking ID field ',IDField, ' as key field');
|
|
||||||
for I:=0 to Fields.Count-1 do
|
for I:=0 to Fields.Count-1 do
|
||||||
If SameText(Fields[i].FieldName,IDField) then
|
If SameText(Fields[i].FieldName,IDField) then
|
||||||
begin
|
|
||||||
Fields[i].ProviderFlags:=Fields[i].ProviderFlags+[pfInKey];
|
Fields[i].ProviderFlags:=Fields[i].ProviderFlags+[pfInKey];
|
||||||
Writeln('Setting ID field ',IDField, ' as key field');
|
|
||||||
end;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TExtJSJSONDataSet.DoResolveRecordUpdate(anUpdate: TRecordUpdateDescriptor): Boolean;
|
function TExtJSJSONDataSet.DoResolveRecordUpdate(anUpdate: TRecordUpdateDescriptor): Boolean;
|
||||||
|
Loading…
Reference in New Issue
Block a user