prgoptions.cpp

用于开发Atmel的AVR系列单片机的GCC集成开发环境

/**************************************************************************
Project: WinAVRIDE        Class: ISP Programmer Settings Dialog
Copyright (C) 2005  Philipp Schober

This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

History
19.Feb 2005 - First Release (V1.0)
****************************************************************************/

#include <vcl.h>
#pragma hdrstop

#include "PrgOptions.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TPrgOpt *PrgOpt;
//---------------------------------------------------------------------------
__fastcall TPrgOpt::TPrgOpt(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TPrgOpt::SaveSettings(TIniFile *prj)
{
 prj->WriteInteger ("Programmer", "Programmer", programmer);
 prj->WriteInteger ("Programmer", "Port", port);
 prj->WriteBool ("Programmer", "Parallel", parprog);
 prj->WriteBool ("Programmer", "ShortenHex", shortenhex);
}
//---------------------------------------------------------------------------
void __fastcall TPrgOpt::LoadSettings(TIniFile *prj)
{
 programmer = prj->ReadInteger ("Programmer", "Programmer", 0);
 port = prj->ReadInteger ("Programmer", "Port", 0);
 parprog = prj->ReadBool ("Programmer", "Parallel", false);
 shortenhex = prj->ReadBool ("Programmer", "ShortenHex", true);
}
//---------------------------------------------------------------------------
void __fastcall TPrgOpt::ShowWindow (void)
{
 ComboBox1->ItemIndex = programmer;
 if (ComboBox1->ItemIndex == 5)
 {
  ComboBox2->Clear ();
  ComboBox2->Items->Add ("COM1");
  ComboBox2->Items->Add ("COM2");
  ComboBox2->Items->Add ("COM3");
  ComboBox2->Items->Add ("COM4");
  ComboBox2->ItemIndex = 0;
  lastindex = 5;
  ParBox->Enabled = true;
  ParBox->Checked = parprog;
 }
 ComboBox2->ItemIndex = port;
 lastindex = programmer;
 ShortenBox->Checked = shortenhex;
 ShowModal ();
}
//---------------------------------------------------------------------------
void __fastcall TPrgOpt::OkButtonClick(TObject *Sender)
{
 programmer = ComboBox1->ItemIndex;
 port = ComboBox2->ItemIndex;
 parprog = ParBox->Checked;
 shortenhex = ShortenBox->Checked;
 ModalResult = mrOk;
}
//---------------------------------------------------------------------------
void __fastcall TPrgOpt::CancelClick(TObject *Sender)
{
 ModalResult = mrCancel;
}
//---------------------------------------------------------------------------

void __fastcall TPrgOpt::ComboBox1Change(TObject *Sender)
{
 if (ComboBox1->ItemIndex == 5 && lastindex != 5)
 {
  ComboBox2->Clear ();
  ComboBox2->Items->Add ("COM1");
  ComboBox2->Items->Add ("COM2");
  ComboBox2->Items->Add ("COM3");
  ComboBox2->Items->Add ("COM4");
  ComboBox2->ItemIndex = 0;
  ParBox->Enabled = true;
 }
 else if (lastindex == 5)
 {
  ComboBox2->Clear ();
  ComboBox2->Items->Add ("LPT1");
  ComboBox2->Items->Add ("LPT2");
  ComboBox2->Items->Add ("LPT3");
  ComboBox2->ItemIndex = 0;
  ParBox->Enabled = false;
 }
 lastindex = ComboBox1->ItemIndex;
}
//---------------------------------------------------------------------------