fixed lazdoc options loading/saving

git-svn-id: trunk@7736 -
This commit is contained in:
mattias 2005-09-18 23:00:33 +00:00
parent 6a2d38bc49
commit 3b3c877682

View File

@ -1146,7 +1146,9 @@ begin
LoadPascalFileExt(Path+'');
//lazdoc
FLazDocPathList.Text := XMLConfig.GetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
if FLazDocPathList<>nil then
FLazDocPathList.Text :=
XMLConfig.GetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
if FileVersion>=103 then begin
fCharcaseFileAction:=CharCaseFileActionNameToType(XMLConfig.GetValue(
@ -1359,7 +1361,8 @@ begin
AmbiguousFileActionNames[afaAsk]);
//lazdoc
XMLConfig.SetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
if FLazDocPathList<>nil then
XMLConfig.SetValue(Path+'LazDoc/Paths', FLazDocPathList.Text);
// object inspector
FObjectInspectorOptions.SaveBounds:=false;