示例#1
0
// -----------------------------------------------------------------------
// Register user infos in main ini file
void RegisterUserInfos(void)
{
    IniWriteKey("UserInfos", "CompanyName", StringReplace(TmpPrj_CompanyName, TmpPrj_CompanyName.Chr(13) + TmpPrj_CompanyName.Chr(10), TmpPrj_CompanyName.Chr(2), 1, -1, Binary_Compare), MainIniFile);
    IniWriteKey("UserInfos", "LegalCopyRight", StringReplace(TmpPrj_LegalCopyRight, TmpPrj_LegalCopyRight.Chr(13) + TmpPrj_LegalCopyRight.Chr(10), TmpPrj_LegalCopyRight.Chr(2), 1, -1, Binary_Compare), MainIniFile);
    IniWriteKey("UserInfos", "LegalTrademarks", StringReplace(TmpPrj_LegalTrademarks, TmpPrj_LegalTrademarks.Chr(13) + TmpPrj_LegalTrademarks.Chr(10), TmpPrj_LegalTrademarks.Chr(2), 1, -1, Binary_Compare), MainIniFile);
    MiscMsgBox(hMDIform.hWnd, "User infos registered.", MB_INFORMATION, Requesters);
}
示例#2
0
// -----------------------------------------------------------------------
// Display the form
void DisplayDefForm(CStr DefFile)
{
    DllDefFile = DefFile;
    RealProcList = GetModulesProc();
    DllDefArray = StringSplit(RealProcList, RealProcList.Chr(2));
    CreateModalDialog(-1, -1, 342, 295, hMDIform.hWnd, &FRMDllDef, WS_BORDER | WS_CAPTION | WS_SYSMENU, 1);
}
// -----------------------------------------------------------------------
// Select a font
void PropSelectFont(void)
{
    CStr FName;
    CStr BufString;
    long FSize = 0;
    HDC NextDC = 0;
    int i = 0;

    // Note: Font name must always be followed by font size
    if(strlen((char *) GetPropertyDatas(hCurrentObject, CurrentEditControlIndex + 1, PROPERTY_STORAGE)) != 0)
    {
        FSize = atol((char *) GetPropertyDatas(hCurrentObject, CurrentEditControlIndex + 1, PROPERTY_STORAGE));
    }
    ControlEnable(FRMDiagToolhwnd, 0);
    ControlEnable(FRMDiagTBhwnd, 0);
    ControlEnable(FRMDiagPropshwnd, 0);
    if(ComDlgChooseFont(FRMDiaghwnd, (char *) GetPropertyDatas(hCurrentObject, CurrentEditControlIndex, PROPERTY_STORAGE), FSize, 0) != 0)
    {
        for(i = 0; i <= LF_FACESIZE - 1; i++)
        {
            if(MyLogFont.lfFaceName[i] == 0) break;
            FName = FName + FName.Chr(MyLogFont.lfFaceName[i]);
        }
        if(FName.Len() != 0)
        {
            BufString = MyFont.iPointSize / 10;
            SetPropertyDatas(hCurrentObject, CurrentEditControlIndex + 1, PROPERTY_STORAGE, (long) BufString.Get_String());
            SetPropertyDatas(hCurrentObject, CurrentEditControlIndex, PROPERTY_STORAGE, (long) FName.Get_String());
            ControlSetText(CurrentEditControlSubEdit, FName);
            // Set size
            NextDC = GetDC(hPropListbox);
            GDIWriteClippedText(NextDC, PropCurrentLeft + 1, PropCurrentTop + 1, PropCurrentWidth - 1, PropCurrentHeight, (char *) GetPropertyDatas(hCurrentObject, CurrentEditControlIndex + 1, PROPERTY_STORAGE), GetSysColor(COLOR_WINDOWTEXT), WASerifFont, 0, GetSysColor(COLOR_WINDOW));
            ReleaseDC(hPropListbox, NextDC);
            if(GetPropertyDatas(hCurrentObject, CurrentEditControlIndex, PROPERTY_ROUTINE) != 0) JumpToAddr((FARPROC) GetPropertyDatas(hCurrentObject, CurrentEditControlIndex, PROPERTY_ROUTINE));
        }
    }
    ControlEnable(FRMDiagToolhwnd, 1);
    ControlEnable(FRMDiagTBhwnd, 1);
    ControlEnable(FRMDiagPropshwnd, 1);
}
示例#4
0
// -----------------------------------------------------------------------
// Load user infos from main ini file
void LoadUserInfos(void)
{
    TmpPrj_CompanyName = StringReplace(IniReadKey("UserInfos", "CompanyName", MainIniFile), TmpPrj_CompanyName.Chr(2), TmpPrj_CompanyName.Chr(13) + TmpPrj_CompanyName.Chr(10), 1, -1, Binary_Compare);
    TmpPrj_LegalCopyRight = StringReplace(IniReadKey("UserInfos", "LegalCopyRight", MainIniFile), TmpPrj_LegalCopyRight.Chr(2), TmpPrj_LegalCopyRight.Chr(13) + TmpPrj_LegalCopyRight.Chr(10), 1, -1, Binary_Compare);
    TmpPrj_LegalTrademarks = StringReplace(IniReadKey("UserInfos", "LegalTrademarks", MainIniFile), TmpPrj_LegalTrademarks.Chr(2), TmpPrj_LegalTrademarks.Chr(13) + TmpPrj_LegalTrademarks.Chr(10), 1, -1, Binary_Compare);
}