mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2025-04-14 20:50:03 +02:00
* Fix bug ID 37737: always set parentcomponent
This commit is contained in:
parent
4b28b7b3b5
commit
784e85a9dd
@ -5829,8 +5829,8 @@ end;
|
||||
procedure TField.SetParentComponent(Value: TComponent);
|
||||
|
||||
begin
|
||||
if not (csLoading in ComponentState) then
|
||||
DataSet := Value as TDataSet;
|
||||
// if not (csLoading in ComponentState) then
|
||||
DataSet := Value as TDataSet;
|
||||
end;
|
||||
|
||||
procedure TField.SetSize(AValue: Integer);
|
||||
|
Loading…
Reference in New Issue
Block a user