BCB的RadioGroup控件的ItemIndex属性BUG！

楚天清秋 — Mon, 05 Jul 2010 07:53:00 GMT

环境WindowsXP，BCB6.0（UPD4 (English)
Form1（主Form），Form1上有Button1，点击Button1显示Form2。
Form2上有一个RadioGroup1和Edit1，在Form2的OnShow事件中，
进行RadioGroup1->ItemIndex = StrToInt(Edit1->Text);赋值操作。Edit1->Text默认值0。
Form2显示后，在界面上选择与StrToInt(Edit1->Text)不同的选项后关闭Form2。假设选择了第二项。
回到Form1，重新打开Form2，这时应该显示的是RadioGroup1->ItemIndex = 0；
可是结果却显示为第二项。

PS：Form1，Form2都是自动创建的Form。

From1.cpp代码如下
//----------------------------Head Begin-----------------------------------------------
#ifndef Unit1H
#define Unit1H
#include
#include
#include
#include
#include
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
        TButton *Button1;
        void __fastcall Button1Click(TObject *Sender);
private: // User declarations
public:  // User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
//---------------------------Head End------------------------------------------------

//---------------------------Cpp Begin------------------------------------------------
#include
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form2->Show();
}
//--------------------------Cpp End-------------------------------------------------

Form2代码如下
//--------------------------Form2 Head Begin-------------------------------------------------

#ifndef Unit2H
#define Unit2H
//---------------------------------------------------------------------------
#include
#include
#include
#include
#include
//---------------------------------------------------------------------------
class TForm2 : public TForm
{
__published: // IDE-managed Components
    TRadioGroup *RadioGroup1;
    TEdit *Edit1;
    void __fastcall FormShow(TObject *Sender);
private: // User declarations
public:  // User declarations
    __fastcall TForm2(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm2 *Form2;
//---------------------------------------------------------------------------
#endif
//-----------------------------Form2 Head End----------------------------------------------

//-----------------------------From2 Cpp Begin----------------------------------------------

#include
#pragma hdrstop

#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm2::FormShow(TObject *Sender)
{
RadioGroup1->ItemIndex = StrToInt(Edit1->Text);

}
//------------------------------From2 Cpp End---------------------------------------------

解决方法：
在TForm2::FormShow加入RadioGroup1->SetFocus();

void __fastcall TForm2::FormShow(TObject *Sender)
{
RadioGroup1->SetFocus(); //加入
RadioGroup1->ItemIndex = StrToInt(Edit1->Text);

}

楚天清秋 2010-07-05 15:53 发表评论

关于多国语言系统制作的注意事项

楚天清秋 — Sun, 20 Jun 2010 05:12:00 GMT

什么和国际接轨的废话就不多说了。
以下是制作多国语言系统时碰到的一些需要注意的Point。

参考IDE：BCB6.0
环境：日文系统，中文系统下设计界面
现象：在中文系统，日文系统下设计的1024*768的界面，在英文OS下显示溢出（只能显示界面一部分）。
         （当然前提是英文OS的屏幕分辨率也为1024*768，不然不溢出或变形才怪！）
结论：情况1：如果在设计时把Form的Font->Charset属性设置成SHIFTJIS_CHARSET，Name设置成ＭＳＰゴシック
          之类的汉字字体，在中文，日文OS下显示也许正常，在英文OS下就会溢出屏幕。大概会扩大1.3倍
          左右。所以如果想在英文OS下显示正常，需要把字体设置成ANSI_CHARSET-Arial
          (or ANSI_CHARSET-Times New Roman)。
          情况2：如果已经把字体设置为ANSI_CHARSET-Arial了，还是显示溢出，或者出现了滚动条。
          这种情况一般是由于系统的显示风格（桌面->右键->Property->Themes->Themes下拉框）不同的原因。
          Windows自己也有风格可以选择，现在大部分熟悉的是较为美观的XP风格（Windows XP风格），
          其实之前一直是使用Windows Classic风格的，不然就不用给他取名为经典风格了，^_^
           简单的说，Windows XP风格是Windows Classic风格的美化版。美化后的Windows XP风格，典型的变化
           就是窗口的各个部件（标题栏之类）的大小发生了变化。Windows XP风格的窗口标题栏比
           Windows Classic风格的窗口标题栏的Height稍微变大了。这就是导致显示溢出或者出现滚动条的原因。

楚天清秋 2010-06-20 13:12 发表评论

C++博客-wifecooky-随笔分类-C++ Builder

BCB的RadioGroup控件的ItemIndex属性BUG！

关于多国语言系统制作的注意事项