@@ -877,17 +877,49 @@ private void _loadForm_Click(object sender, EventArgs e)
877877 {
878878 return ;
879879 }
880- string strOSD = File . ReadAllText ( OpenFileDialog1 . FileName ) ;
881- //string strOSD = File.ReadAllText("C:\\444\\Форма1сохран\\Форма1сохран.osd");
880+ string strFile = File . ReadAllText ( OpenFileDialog1 . FileName ) ;
881+ //string strOSDBefore = File.ReadAllText("C:\\444\\Форма1сохран\\Форма1сохран.osd");
882882
883883 OneScriptFormsDesigner . block2 = true ;
884- strOSD = strOSD . Replace ( " " , "" ) ;
885884
886885 string [ ] result = null ;
887886 string [ ] stringSeparators = new string [ ] { Environment . NewLine } ;
888887 string ComponentBlok = null ;
889888 string rootBlok = null ;
890889
890+ string strOSD = "" ;
891+ result = strFile . Split ( stringSeparators , StringSplitOptions . RemoveEmptyEntries ) ;
892+ for ( int i = 0 ; i < result . Length ; i ++ )
893+ {
894+ string strres = result [ i ] ;
895+ if ( strres . Contains ( ".ВыбранныйПуть = \u0022 " ) ||
896+ strres . Contains ( ".Заголовок = \u0022 " ) ||
897+ strres . Contains ( ".ИмяФайла = \u0022 " ) ||
898+ strres . Contains ( ".НачальныйКаталог = \u0022 " ) ||
899+ strres . Contains ( ".Описание = \u0022 " ) ||
900+ strres . Contains ( ".ПолныйПуть = \u0022 " ) ||
901+ strres . Contains ( ".ПользовательскийФормат = \u0022 " ) ||
902+ strres . Contains ( ".Путь = \u0022 " ) ||
903+ strres . Contains ( ".РазделительПути = \u0022 " ) ||
904+ strres . Contains ( ".Текст = \u0022 " ) ||
905+ strres . Contains ( ".ТекстЗаголовка = \u0022 " ) ||
906+ strres . Contains ( ".ТекстПодсказки = \u0022 " ) ||
907+ strres . Contains ( ".Фильтр = \u0022 " )
908+ )
909+ {
910+ string strBefore = OneScriptFormsDesigner . ParseBetween ( strres , null , " = \u0022 " ) ;
911+ string strAfter = OneScriptFormsDesigner . ParseBetween ( strres , "= \u0022 " , null ) ;
912+ strOSD = strOSD + strBefore . Replace ( " " , "" ) + "=\u0022 " + strAfter + Environment . NewLine ;
913+ }
914+ else
915+ {
916+ strOSD = strOSD + strres . Replace ( " " , "" ) + Environment . NewLine ;
917+ }
918+ }
919+ result = null ;
920+
921+ strOSD = strOSD . Trim ( ) ;
922+
891923 // Соберем из блока конструкторов имена компонентов в CompNames.
892924 List < string > CompNames = new List < string > ( ) ;
893925 Dictionary < string , object > dictObjects = new Dictionary < string , object > ( ) ; // Словарь для соответствия имени переменной в скрипте объекту в библиотеке.
0 commit comments