WhiteWind
|
Posted: Sun Aug 13, 2006 19:14 Post subject: |
|
|
Quote: | По моему бесполезная функция, ни разу ей не пользовался =) |
Не скажи, бывает очень полезна. Допустим есть такой код:
Code: |
Lang:=Ini.ReadString('Main', 'Lang', Lang);
ReportFileName:=Ini.ReadString('Report', 'FileName', '');
ReportBegin:=Ini.ReadString('Report', 'Begin', '');
ReportFile:=Ini.ReadString('Report', 'File', '');
ReportEnd:=Ini.ReadString('Report', 'End', '');
SRFileName:=Ini.ReadString('SearchReplace', 'SRFileName', '');
SRSearchExpr:=Ini.ReadString('SearchReplace', 'SRSearchExpr', '');
SRReplace:=Ini.ReadString('SearchReplace', 'SRReplace', '');
SROverwrite:=Ini.ReadBool('SearchReplace', 'SROverwrite', False);
SRSearchFiles:=Ini.ReadBool('SearchReplace', 'SRSearchFiles', False);
SRRenameFiles:=Ini.ReadBool('SearchReplace', 'SRRenameFiles', True);
SRKeepOldFiles:=Ini.ReadBool('SearchReplace', 'SRKeepOldFiles', True);
SRCreateDirs:=Ini.ReadBool('SearchReplace', 'SRCreateDirs', False);
RegExprEnabledSnR:=Ini.ReadBool('SearchReplace', 'RegExprEnabledSnR', True);
RegExprExpandSpacesSnR:=Ini.ReadBool('SearchReplace', 'RegExprExpandSpacesSnR', False);
|
И надо сделать обратное - запись в ини файл. Включаем запись макроса, аккуратно (с копированием/вставкой) проделываем это
с первой строчкой, а остальные - одним нажатием. |
|