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