From 4289e7ad30a602aac03d50efcdb05a0479ac3f46 Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 24 Jun 2023 12:29:22 +0200 Subject: [PATCH] lazdelphi: do not store default values --- components/compilers/delphi/delphitool.pas | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/components/compilers/delphi/delphitool.pas b/components/compilers/delphi/delphitool.pas index da48069ea4..5653d687e2 100644 --- a/components/compilers/delphi/delphitool.pas +++ b/components/compilers/delphi/delphitool.pas @@ -577,12 +577,18 @@ end; procedure TLazProjectDelphiOptions.SetADO(AValue: String); begin - CustomData[pKeyAdditionalOptions]:=aValue + if AValue<>'' then + CustomData[pKeyAdditionalOptions]:=aValue + else + CustomData.Remove(pKeyAdditionalOptions); end; procedure TLazProjectDelphiOptions.SetDCF(AValue: Boolean); begin - CustomData[pKeyGenConfigFile]:=IntToStr(Ord(aValue)); + if AValue then + CustomData[pKeyGenConfigFile]:=IntToStr(Ord(aValue)) + else + CustomData.Remove(pKeyGenConfigFile); end;