We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent f52d1a2 commit 152c8c6Copy full SHA for 152c8c6
1 file changed
cad_source/zcad/gui/forms/uzcflinetypesload.pas
@@ -61,7 +61,7 @@ procedure TLineTypesLoadForm.LoadFromFile(FileName:string);
61
62
//если был BOM становимся за него, если нет выставляем системную кодировку
63
if AEncoding=nil then begin
64
- AEncoding:={$IfDef WINDOWS}TEncoding.ANSI{$ElseIf}TEncoding.UTF8{$endif};
+ AEncoding:={$IfDef WINDOWS}TEncoding.ANSI{$Else}TEncoding.UTF8{$endif};
65
FileStream.Seek(0,soBeginning);
66
end else
67
FileStream.Seek(Length(AEncoding.GetPreamble),soBeginning);
0 commit comments