sysfunc.cpp

BCB 串口通信

//---------------------------------------------------------------------------

#include "allhead.h"
#pragma hdrstop

#include <Filectrl.hpp>
#include "sysfunc.h"

//---------------------------------------------------------------------------
//#pragma package(smart_init)


//---------------------------------------------------------------------------
// path-deldir+adddir, 主要用于更改路径参数
AnsiString HFGetDir(AnsiString Path, AnsiString DelDir, AnsiString AddDir)
{
    AnsiString temp;
    int i;

    temp= Path;
    i= Path.Pos(DelDir);
    if (i>0)
        temp.Delete(i, DelDir.Length());

    DelDir = temp;
    temp +=AddDir;
    if (DirectoryExists(temp))
        return temp;
    else
        return DelDir;
}

//---------------------------------------------------------------------------
// 删除字符串的标记symb_comm, 主要用于删除ini文件中每行的注释.
AnsiString DelComment(AnsiString value, AnsiString symb_comm)
{
    int i;
    AnsiString temp;

    i= value.Pos(symb_comm);
    if (i>0)
    {
       temp= value.SubString(1, i-1);
       temp.Trim();
    }
    else
       temp = value.Trim();

    return temp;
}


//---------------------------------------------------------------------------
// 从资源文件中装载bitmap到按钮等控件.
void loadBmp(Graphics::TBitmap  *target,
             AnsiString resname)
{
    HRSRC hr;

    try
    {
        hr = FindResource(HInstance, resname.c_str(), RT_BITMAP);
        if (hr>0)
            target->LoadFromResourceName((int)HInstance, resname);
    }
    catch (...)
    {
        MessageBeep(0);
    }
}