// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// Получить имя файла с помощью графической панели открытия файла
static string SelectFileNameGUI(string SettingsPath, string DestPath)
{
string TmpS = CAbc.EMPTY;
string Result = CAbc.EMPTY;
string SettingsFileName = null;
if (SettingsPath != null)
{
if (SettingsPath.Trim().Length > 0)
{
SettingsFileName = SettingsPath.Trim() + "\\" + CCommon.GetUserName() + ".ldr";
if (CCommon.FileExists(SettingsFileName))
{
TmpS = CCommon.LoadText(SettingsFileName, CAbc.CHARSET_WINDOWS);
}
if (TmpS == null)
{
TmpS = CAbc.EMPTY;
}
}
}
TmpS = TmpS.Trim();
TmpS = CCommon.OpenFileBox(
"Укажите А-файл для загрузки"
, TmpS
, "А-файлы (?A*.*)|?a*.*"
);
if (TmpS == null)
{
return(Result);
}
TmpS = TmpS.Trim();
if (TmpS.Length == 0)
{
return(Result);
}
if (SettingsFileName != null)
{
CCommon.SaveText(SettingsFileName, CCommon.GetDirName(TmpS), CAbc.CHARSET_WINDOWS);
}
Result = DestPath.Trim() + "\\" + CCommon.GetFileName(TmpS);
if (CCommon.FileExists(Result))
{
CCommon.Print("", "Выбранный файл уже существует в целевом каталоге : ", Result, "", "Нажмите ENTER для выхода...");
CCommon.Input();
Result = CAbc.EMPTY;
}
else
if (!CCommon.CopyFile(TmpS, Result))
{
CCommon.Print("Ошибка копирования файла в целевой каталог : ", Result, "", "Нажмите ENTER для выхода...");
CCommon.Input();
Result = CAbc.EMPTY;
}
return(Result);
}
}//FOLD01
// -------------------------------------------------------------
// Получить уникальное число на основе содержимого пути к файлу
public static int GetUniqNum( string FileName ) {//fold01
int Result = 0
, Mask = 0xFFFF ;
string DirName = CCommon.GetCurDir();
if ( FileName != null )
if ( CCommon.GetDirName( FileName ).Length > 1 )
DirName = CCommon.GetDirName( FileName );
for ( int I = 0 ; I < DirName.Length ; I++ )
Result = ( Result * 5 + CCommon.Ord( DirName[ I ] ) ) & Mask;
return Result;
}//FOLD01