Exemple #1
0
// ---------------------------------------------------------------------------
// lang.ini loading
void __fastcall LoadLang(TForm1* form, String inifile)
{
	if (TFile::Exists(inifile)) {
		TStringList *sect = new TStringList();
		TMemIniFile *ini = new TMemIniFile(inifile);

		ini->ReadSectionValues("Lang.TMenuItem.Caption", sect);
		for (int i = 0; i < sect->Count; ++i) {
			String key = sect->Names[i];
			String val = sect->Values[key];
			TMenuItem *item = static_cast<TMenuItem*>(form->FindComponent(key));
			if (item != NULL) {
				item->Caption = val;
			}
		}

		ini->ReadSectionValues("Lang.TToolButton.Hint", sect);
		for (int i = 0; i < sect->Count; ++i) {
			String key = sect->Names[i];
			String val = sect->Values[key];
			TToolButton *item = static_cast<TToolButton*>(form->FindComponent(key));
			if (item != NULL) {
				item->Hint = val;
			}
		}

		form->SlideShowStart = ini->ReadString("Lang.Etc", "SlideShowStart", "Slide Show Start");
		form->SlideShowStop = ini->ReadString("Lang.Etc", "SlideShowStop", "Slide Show Stop");
		form->mnuPlaySlideShow->Caption = SlideShowStart;

		delete ini;
		delete sect;
	}
}
Exemple #2
0
//---------------------------------------------------------------------------
void __fastcall TRADIOSetDlg::LoadBtnClick(TObject *Sender)
{
//
	TOpenDialog *pBox = new TOpenDialog(this);
	pBox->Options >> ofCreatePrompt;
	pBox->Options << ofFileMustExist;
	if( sys.m_MsgEng ){
		pBox->Title = "Open command file";
		pBox->Filter = "Command files(*.rcm)|*.rcm|";
	}
	else {
		pBox->Title = "コマンド定義ファイルを開く";
		pBox->Filter = "コマンド定義ファイル(*.rcm)|*.rcm|";
	}
	pBox->FileName = "";
	pBox->DefaultExt = "rcm";
	pBox->InitialDir = sys.m_BgnDir;
	if( pBox->Execute() == TRUE ){
		CWaitCursor w;
		TMemIniFile *pIniFile = new TMemIniFile(pBox->FileName);
		CmdInit->Text = pIniFile->ReadString("RADIO", "CmdInit", CmdInit->Text);
		CmdRx->Text = pIniFile->ReadString("RADIO", "CmdRx", CmdRx->Text);
		CmdTx->Text = pIniFile->ReadString("RADIO", "CmdTx", CmdTx->Text);
		Cmdxx->Text = pIniFile->ReadString("RADIO", "Cmdxx", Cmdxx->Text);
		m_PollType = pIniFile->ReadInteger("RADIO", "PollType", 0);
		RGFS->ItemIndex = pIniFile->ReadInteger("RADIO", "Offset", 0);
		PollInt->Text = (pIniFile->ReadInteger("RADIO", "PollInterval", 0) + 2)/10.0;
		AddrScan->Checked = 0;
		delete pIniFile;
		SetMaker();
		UpdateUI();
	}
    delete pBox;
}
Exemple #3
0
//---------------------------------------------------------------------------
void __fastcall TRADIOSetDlg::LoadBtnClick(TObject *Sender)
{
//
	TOpenDialog *pBox = MmttyWd->OpenDialog;
	pBox->Options >> ofCreatePrompt;
	pBox->Options << ofFileMustExist;
	if(Font->Charset != SHIFTJIS_CHARSET){
		pBox->Title = "Open command file";
		pBox->Filter = "Command files(*.rcm)|*.rcm|";
	}
	else {
		pBox->Title = "コマンド定義ファイルを開く";
		pBox->Filter = "コマンド定義ファイル(*.rcm)|*.rcm|";
	}
	pBox->FileName = "";
	pBox->DefaultExt = "rcm";
	pBox->InitialDir = BgnDir;
	NormalWindow(this);
	if( pBox->Execute() == TRUE ){
		CWaitCursor w;
		TMemIniFile *pIniFile = new TMemIniFile(pBox->FileName);
		CmdInit->Text = pIniFile->ReadString("RADIO", "CmdInit", CmdInit->Text);
		CmdRx->Text = pIniFile->ReadString("RADIO", "CmdRx", CmdRx->Text);
		CmdTx->Text = pIniFile->ReadString("RADIO", "CmdTx", CmdTx->Text);
		Cmdxx->Text = pIniFile->ReadString("RADIO", "Cmdxx", Cmdxx->Text);
		m_PollType = pIniFile->ReadInteger("RADIO", "PollType", 0);
		FreqOffset->ItemIndex = pIniFile->ReadInteger("RADIO", "PollOffset", 5);
		PollInt->Text = (pIniFile->ReadInteger("RADIO", "PollInterval", 0) + 5)/10.0;
		AddrScan->Checked = 0;
		delete pIniFile;
		SetMaker();
		UpdateUI();
	}
	TopWindow(this);
}
Exemple #4
0
//---------------------------------------------------------------------------
void __fastcall TRADIOSetDlg::SaveBtnClick(TObject *Sender)
{
	TSaveDialog *pBox = MmttyWd->SaveDialog;
	if( (Font->Charset != SHIFTJIS_CHARSET) ){
		pBox->Title = "Save command file";
		pBox->Filter = "Command files(*.rcm)|*.rcm|";
	}
	else {
		pBox->Title = "コマンド定義ファイルの作成";
		pBox->Filter = "コマンド定義ファイル(*.rcm)|*.rcm|";
	}
	pBox->FileName = "MyRIG.rcm";
	pBox->DefaultExt = "rcm";
	pBox->InitialDir = BgnDir;
	NormalWindow(this);
	if( pBox->Execute() == TRUE ){
		CWaitCursor w;
		TMemIniFile *pIniFile = new TMemIniFile(pBox->FileName);
		pIniFile->WriteString("RADIO", "CmdInit", CmdInit->Text);
		pIniFile->WriteString("RADIO", "CmdRx", CmdRx->Text);
		pIniFile->WriteString("RADIO", "CmdTx", CmdTx->Text);
		pIniFile->WriteString("RADIO", "Cmdxx", Cmdxx->Text);
		pIniFile->WriteInteger("RADIO", "PollType", m_PollType);
		pIniFile->WriteInteger("RADIO", "PollOffset", FreqOffset->ItemIndex);
		double d;
		int dd = 5;
		if( sscanf(AnsiString(PollInt->Text).c_str(), "%lf", &d) == 1 ){	//JA7UDE 0428
			if( d >= 0.5 ){
				dd = int((d * 10.0) - 5);
				if( dd < 0 ) dd = 0;
			}
		}
		pIniFile->WriteInteger("RADIO", "PollInterval", dd);
		pIniFile->UpdateFile();
		delete pIniFile;
	}
	TopWindow(this);
}
Exemple #5
0
//---------------------------------------------------------------------------
void __fastcall TRADIOSetDlg::SaveBtnClick(TObject *Sender)
{
	TSaveDialog *pBox = new TSaveDialog(this);
	if( sys.m_MsgEng ){
		pBox->Title = "Save command file";
		pBox->Filter = "Command files(*.rcm)|*.rcm|";
	}
	else {
		pBox->Title = "コマンド定義ファイルの作成";
		pBox->Filter = "コマンド定義ファイル(*.rcm)|*.rcm|";
	}
	pBox->FileName = "MyRIG.rcm";
	pBox->DefaultExt = "rcm";
	pBox->InitialDir = sys.m_BgnDir;
	if( pBox->Execute() == TRUE ){
		CWaitCursor w;
		TMemIniFile *pIniFile = new TMemIniFile(pBox->FileName);
		pIniFile->WriteString("RADIO", "CmdInit", CmdInit->Text);
		pIniFile->WriteString("RADIO", "CmdRx", CmdRx->Text);
		pIniFile->WriteString("RADIO", "CmdTx", CmdTx->Text);
		pIniFile->WriteString("RADIO", "Cmdxx", Cmdxx->Text);
		pIniFile->WriteInteger("RADIO", "PollType", m_PollType);
		pIniFile->ReadInteger("RADIO", "Offset", RGFS->ItemIndex);
		double d;
		int dd = 5;
		if( sscanf(AnsiString(PollInt->Text).c_str(), "%lf", &d) == 1 ){	//JA7UDE 0428
			if( d >= 0.2 ){
				dd = int((d * 10.0) - 2);
				if( dd < 0 ) dd = 0;
			}
		}
		pIniFile->WriteInteger("RADIO", "PollInterval", dd);
		pIniFile->UpdateFile();
		delete pIniFile;
	}
    delete pBox;
}
void TTrdItf_DDABOSS::SetConfig(void)
{
	if( FSetupFile== NULL ) return ;

	TMemIniFile *ini = new TMemIniFile( FSetupFile );
	try
	{
		ini->WriteString(PLUGINNAME,"pUser",FSet.pUser);
		ini->WriteString(PLUGINNAME,"pWtfs",FSet.pWtfs);
		ini->WriteString(PLUGINNAME,"pYyb",FSet.pYyb);
		ini->WriteString(PLUGINNAME,"pRight",FSet.pRight);
		ini->WriteString(PLUGINNAME,"pDest",FSet.pDest);
		ini->WriteString(PLUGINNAME,"pemote",FSet.pRemote);
		ini->UpdateFile();
	}
	__finally
	{
  	delete ini;
	}
}
bool TTrdItf_DDABOSS::GetConfig(void)
{
	if( FSetupFile== NULL ) return false;

	TMemIniFile *ini = new TMemIniFile( FSetupFile );
	try
	{
		// 判断是否存在插件的设置,没有的话返回false以便系统能够生成默认的设置
		if( ini->SectionExists(PLUGINNAME) == false ) return false;
		lstrcpyn(FSet.pUser,ini->ReadString(PLUGINNAME,"pUser",FSet.pUser).c_str(),9);
		lstrcpyn(FSet.pWtfs,ini->ReadString(PLUGINNAME,"pWtfs",FSet.pWtfs).c_str(),2);
		lstrcpyn(FSet.pYyb,ini->ReadString(PLUGINNAME,"pYyb",FSet.pYyb).c_str(),9);
		lstrcpyn(FSet.pRight,ini->ReadString(PLUGINNAME,"pRight",FSet.pRight).c_str(),99);
		lstrcpyn(FSet.pDest,ini->ReadString(PLUGINNAME,"pDest",FSet.pDest).c_str(),49);
		lstrcpyn(FSet.pRemote,ini->ReadString(PLUGINNAME,"pRemote",FSet.pRemote).c_str(),99);
	}
	__finally
	{
		delete ini;
	}
	return true;
}
Exemple #8
0
bool RecvEventsTh::GetConfig(const char * setupfile)
{
	TMemIniFile *ini = new TMemIniFile( setupfile );
	try
	{
		// 判断是否存在插件的设置,没有的话返回false以便系统能够生成默认的设置
		if( ini->SectionExists(PLUGINNAME) == false ) return false;

		SvrIp            = ini->ReadString (PLUGINNAME,"SvrIP",SvrIp);
		PushPort          = ini->ReadInteger(PLUGINNAME,"PushPort",PushPort);
		debug_mode       = ini->ReadBool(PLUGINNAME,"debug_mode",debug_mode);
		JysID            =ini->ReadString (PLUGINNAME,"jysID",JysID);
	}
	__finally
	{
		delete ini;
	}
	return true;
}