static void OnSaveClicked(WndButton* pWnd){
int file_index;
TCHAR task_name[MAX_PATH];
WndProperty* wp;
DataFieldFileReader *dfe;
wp = (WndProperty*)wf->FindByName(TEXT("prpFile"));
if (!wp) return;
dfe = (DataFieldFileReader*)wp->GetDataField();
file_index = dfe->GetAsInteger();
// TODO enhancement: suggest a good new name not already in the list
_tcscpy(task_name,TEXT("NEW"));
dlgTextEntryShowModal(task_name, 10); // max length
if (_tcslen(task_name)>0) {
_tcscat(task_name, TEXT(LKS_TSK));
dfe->Lookup(task_name);
file_index = dfe->GetAsInteger();
if (file_index==0) {
// good, this file is unique..
dfe->addFile(task_name, task_name);
dfe->Lookup(task_name);
wp->RefreshDisplay();
}
} else {
// TODO code: report error, task not saved since no name was given
return;
}
if (file_index>0) {
// file already exists! ask if want to overwrite
TCHAR sTmp[500];
_sntprintf(sTmp, array_size(sTmp), TEXT("%s: '%s'"),
// LKTOKEN _@M696_ = "Task file already exists"
MsgToken(696),
dfe->GetAsString());
if(MessageBoxX(
sTmp,
// LKTOKEN _@M510_ = "Overwrite?"
MsgToken(510),
mbYesNo) != IdYes) {
return;
}
}
TCHAR file_name[MAX_PATH];
LocalPath(file_name,TEXT(LKD_TASKS), task_name);
SaveTask(file_name);
UpdateCaption();
}
void
dlgLoggerReplayShowModal(void)
{
wf = LoadDialog(CallBackTable,
XCSoarInterface::main_window, _T("IDR_XML_LOGGERREPLAY"));
if (!wf)
return;
WndProperty* wp;
wp = (WndProperty*)wf->FindByName(_T("prpRate"));
if (wp) {
DataFieldFloat &df = *(DataFieldFloat *)wp->GetDataField();
df.SetAsFloat(replay->GetTimeScale());
wp->RefreshDisplay();
}
wp = (WndProperty*)wf->FindByName(_T("prpFile"));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
dfe->ScanDirectoryTop(_T("*.nmea"));
dfe->ScanDirectoryTop(_T("*.igc"));
dfe->Lookup(replay->GetFilename());
wp->RefreshDisplay();
}
wf->ShowModal();
delete wf;
}
WndProperty *
RowFormWidget::AddFileReader(const TCHAR *label, const TCHAR *help,
const TCHAR *registry_key, const TCHAR *filters,
bool nullable)
{
WndProperty *edit = Add(label, help);
DataFieldFileReader *df = new DataFieldFileReader(NULL);
edit->SetDataField(df);
if (nullable)
df->AddNull();
size_t length;
while ((length = _tcslen(filters)) > 0) {
df->ScanDirectoryTop(filters);
filters += length + 1;
}
TCHAR path[MAX_PATH];
if (Profile::GetPath(registry_key, path))
df->Lookup(path);
edit->RefreshDisplay();
return edit;
}
static void setVariables(void) {
WndProperty *wp;
TCHAR temptext[MAX_PATH];
TCHAR tmp[MAX_PATH];
for (unsigned int i=0 ; i < NO_WP_FILES; i++)
{
_tcscpy(temptext,szWaypointFile[i]);
_sntprintf(tmp,MAX_PATH,_T("prpFile%1u"),i+1);
wp = (WndProperty*)wf->FindByName(tmp);
if (wp) {
DataFieldFileReader* dfe = static_cast<DataFieldFileReader*>(wp->GetDataField());
if(dfe) {
dfe->ScanDirectoryTop(_T(LKD_WAYPOINTS), _T("*" LKS_WP_WINPILOT));
dfe->ScanDirectoryTop(_T(LKD_WAYPOINTS), _T("*" LKS_WP_XCSOAR));
dfe->ScanDirectoryTop(_T(LKD_WAYPOINTS), _T("*" LKS_WP_CUP));
dfe->ScanDirectoryTop(_T(LKD_WAYPOINTS), _T("*" LKS_WP_COMPE));
dfe->ScanDirectoryTop(_T(LKD_WAYPOINTS), _T("*" LKS_OPENAIP));
dfe->Lookup(temptext);
_sntprintf(tmp,MAX_PATH,_T("%s %1u "), MsgToken(2341),i+1); // _@M2341_ "Waypoint File"
wp->SetCaption(tmp);
}
wp->RefreshDisplay();
}
}
}
void dlgLoggerReplayShowModal(void){
wf = dlgLoadFromXML(CallBackTable, IDR_XML_LOGGERREPLAY);
WndProperty* wp;
if (wf) {
wp = (WndProperty*)wf->FindByName(TEXT("prpRate"));
if (wp) {
wp->GetDataField()->SetAsFloat(ReplayLogger::TimeScale);
wp->RefreshDisplay();
}
wp = (WndProperty*)wf->FindByName(TEXT("prpIGCFile"));
if (wp) {
DataFieldFileReader* dfe = static_cast<DataFieldFileReader*>(wp->GetDataField());
if(dfe) {
dfe->ScanDirectoryTop(_T(LKD_LOGS), _T("*" LKS_IGC));
dfe->Lookup(ReplayLogger::GetFilename());
}
wp->RefreshDisplay();
}
wf->ShowModal();
delete wf;
}
wf = NULL;
}
void
ShowReplayDialog()
{
wf = LoadDialog(CallBackTable, UIGlobals::GetMainWindow(),
_T("IDR_XML_LOGGERREPLAY"));
if (!wf)
return;
WndProperty* wp;
wp = (WndProperty*)wf->FindByName(_T("prpFile"));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
dfe->ScanDirectoryTop(_T("*.nmea"));
dfe->ScanDirectoryTop(_T("*.igc"));
dfe->Lookup(replay->GetFilename());
wp->RefreshDisplay();
}
LoadFormProperty(*wf, _T("prpRate"), replay->GetTimeScale());
wf->ShowModal();
delete wf;
}
void dlgLoggerReplayShowModal(void){
TCHAR tsuf[10];
TCHAR filename[MAX_PATH];
LocalPathS(filename, TEXT("dlgLoggerReplay.xml"));
wf = dlgLoadFromXML(CallBackTable,
filename,
TEXT("IDR_XML_LOGGERREPLAY"));
WndProperty* wp;
if (wf) {
wp = (WndProperty*)wf->FindByName(TEXT("prpRate"));
if (wp) {
wp->GetDataField()->SetAsFloat(ReplayLogger::TimeScale);
wp->RefreshDisplay();
}
wp = (WndProperty*)wf->FindByName(TEXT("prpIGCFile"));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
// dfe->ScanDirectoryTop(_T(""),TEXT("*.igc"));
_stprintf(tsuf,_T("*%s"),_T(LKS_IGC));
dfe->ScanDirectoryTop(_T(LKD_LOGS),tsuf);
dfe->Lookup(ReplayLogger::GetFilename());
wp->RefreshDisplay();
}
wf->ShowModal();
delete wf;
}
wf = NULL;
}
bool
dlgStartupShowModal()
{
LogStartUp(_T("Startup dialog"));
logo = new LogoView();
wf = LoadDialog(CallBackTable, XCSoarInterface::main_window,
Layout::landscape ? _T("IDR_XML_STARTUP_L") :
_T("IDR_XML_STARTUP"));
assert(wf != NULL);
WndProperty* wp = ((WndProperty *)wf->FindByName(_T("prpProfile")));
assert(wp != NULL);
DataFieldFileReader* dfe = (DataFieldFileReader*)wp->GetDataField();
assert(dfe != NULL);
((WndButton *)wf->FindByName(_T("cmdClose")))
->SetOnClickNotify(OnCloseClicked);
((WndButton *)wf->FindByName(_T("cmdQuit")))->SetOnClickNotify(OnQuit);
dfe->ScanDirectoryTop(_T("*.prf"));
dfe->Lookup(startProfileFile);
wp->RefreshDisplay();
if (dfe->GetNumFiles() <= 2) {
delete wf;
delete logo;
return true;
}
if (wf->ShowModal() != mrOK) {
delete wf;
delete logo;
return false;
}
const TCHAR *path = dfe->GetPathFile();
if (!string_is_empty(path)) {
_tcscpy(startProfileFile, path);
/* When a profile from a secondary data path is used, this path
becomes the primary data path */
TCHAR temp[MAX_PATH];
SetPrimaryDataPath(DirName(path, temp));
}
delete wf;
delete logo;
return true;
}
static void UpdateFilePointer(void) {
WndProperty *wp = (WndProperty*)wf->FindByName(TEXT("prpFile"));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
if (_tcslen(LastTaskFileName)>0) {
dfe->Lookup(LastTaskFileName);
} else {
dfe->Set(0);
}
wp->RefreshDisplay();
}
}
bool
dlgStartupShowModal()
{
LogStartUp(_T("Startup dialog"));
logo = new LogoView();
wf = LoadDialog(CallBackTable, XCSoarInterface::main_window,
Layout::landscape ? _T("IDR_XML_STARTUP_L") :
_T("IDR_XML_STARTUP"));
assert(wf != NULL);
WndProperty* wp = ((WndProperty *)wf->FindByName(_T("prpProfile")));
assert(wp != NULL);
DataFieldFileReader* dfe = (DataFieldFileReader*)wp->GetDataField();
assert(dfe != NULL);
((WndButton *)wf->FindByName(_T("cmdClose")))
->SetOnClickNotify(OnCloseClicked);
((WndButton *)wf->FindByName(_T("cmdQuit")))->SetOnClickNotify(OnQuit);
dfe->SetNotNullable();
dfe->ScanDirectoryTop(_T("*.prf"));
dfe->Lookup(Profile::GetPath());
wp->RefreshDisplay();
if (dfe->GetNumFiles() <= 1) {
SelectProfile(dfe->GetPathFile());
delete wf;
delete logo;
return true;
}
if (wf->ShowModal() != mrOK) {
delete wf;
delete logo;
return false;
}
SelectProfile(dfe->GetPathFile());
delete wf;
delete logo;
return true;
}
static void OnSaveClicked(WindowControl * Sender, WndListFrame::ListInfo_t *ListInfo){
(void)ListInfo; (void)Sender;
int file_index;
TCHAR task_name[MAX_PATH];
TCHAR file_name[MAX_PATH];
WndProperty* wp;
DataFieldFileReader *dfe;
wp = (WndProperty*)wf->FindByName(TEXT("prpFile"));
if (!wp) return;
dfe = (DataFieldFileReader*)wp->GetDataField();
file_index = dfe->GetAsInteger();
// TODO enhancement: suggest a good new name not already in the list
_tcscpy(task_name,TEXT("NEW"));
dlgTextEntryShowModal(task_name, 10); // max length
if (_tcslen(task_name)>0) {
_tcscat(task_name, TEXT(LKS_TSK));
LocalPath(file_name,TEXT(LKD_TASKS));
_tcscat(file_name,TEXT("\\"));
_tcscat(file_name,task_name); // 091101
dfe->Lookup(file_name);
file_index = dfe->GetAsInteger();
if (file_index==0) {
// good, this file is unique..
dfe->addFile(task_name, file_name);
dfe->Lookup(file_name);
wp->RefreshDisplay();
}
} else {
// TODO code: report error, task not saved since no name was given
return;
}
if (file_index>0) {
// file already exists! ask if want to overwrite
_stprintf(file_name, TEXT("%s: '%s'"),
// LKTOKEN _@M696_ = "Task file already exists"
gettext(TEXT("_@M696_")),
dfe->GetAsString());
if(MessageBoxX(hWndMapWindow,
file_name,
// LKTOKEN _@M510_ = "Overwrite?"
gettext(TEXT("_@M510_")),
MB_YESNO|MB_ICONQUESTION) != IDYES) {
return;
}
}
SaveTask(dfe->GetPathFile());
UpdateCaption();
}
short dlgStartupShowModal(void){
WndProperty* wp;
#if TESTBENCH
StartupStore(TEXT(". Startup dialog, RUN_MODE=%d %s"),RUN_MODE,NEWLINE);
#endif
char filename[MAX_PATH];
strcpy(filename,"");
// FLY SIM PROFILE EXIT
if (RUN_MODE==RUN_WELCOME) {
if (!ScreenLandscape) {
LocalPathS(filename, TEXT("dlgFlySim_L.xml"));
wf = dlgLoadFromXML(CallBackTable, filename, hWndMainWindow, TEXT("IDR_XML_FLYSIM_L"));
} else {
LocalPathS(filename, TEXT("dlgFlySim.xml"));
wf = dlgLoadFromXML(CallBackTable, filename, hWndMainWindow, TEXT("IDR_XML_FLYSIM"));
}
if (!wf) {
return 0;
}
}
// PROFILE AIRCRAFT CLOSE
if (RUN_MODE==RUN_DUALPROF) {
if (!ScreenLandscape) {
LocalPathS(filename, TEXT("dlgDualProfile_L.xml"));
wf = dlgLoadFromXML(CallBackTable, filename, hWndMainWindow, TEXT("IDR_XML_DUALPROFILE_L"));
} else {
LocalPathS(filename, TEXT("dlgDualProfile.xml"));
wf = dlgLoadFromXML(CallBackTable, filename, hWndMainWindow, TEXT("IDR_XML_DUALPROFILE"));
}
if (!wf) return 0;
}
// CHOOSE PROFILE
if (RUN_MODE==RUN_PROFILE || RUN_MODE==RUN_AIRCRAFT || RUN_MODE==RUN_PILOT) {
if (!ScreenLandscape) {
LocalPathS(filename, TEXT("dlgStartup_L.xml"));
wf = dlgLoadFromXML(CallBackTable, filename, hWndMainWindow, TEXT("IDR_XML_STARTUP_L"));
} else {
LocalPathS(filename, TEXT("dlgStartup.xml"));
wf = dlgLoadFromXML(CallBackTable, filename, hWndMainWindow, TEXT("IDR_XML_STARTUP"));
}
if (!wf) return 0;
}
wSplash = (WndOwnerDrawFrame*)wf->FindByName(TEXT("frmSplash"));
wSplash->SetWidth(ScreenSizeX);
int PROFWIDTH=0, PROFACCEPTWIDTH=0, PROFHEIGHT=0, PROFSEPARATOR=0;
if (RUN_MODE==RUN_WELCOME) {
((WndButton *)wf->FindByName(TEXT("cmdFLY"))) ->SetOnClickNotify(OnFLYClicked);
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetOnClickNotify(OnSIMClicked);
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetOnClickNotify(OnDUALPROFILEClicked);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetOnClickNotify(OnEXITClicked);
if (ScreenLandscape) {
PROFWIDTH=(ScreenSizeX-IBLSCALE(320))/3;
switch(ScreenSize) {
case ss800x480:
case ss400x240:
((WndButton *)wf->FindByName(TEXT("cmdFLY"))) ->SetWidth(IBLSCALE(110));
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetWidth(IBLSCALE(110));
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetLeft(IBLSCALE(208)+PROFWIDTH*3);
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetLeft(IBLSCALE(88)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetWidth(IBLSCALE(92)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetLeft(IBLSCALE(161)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetWidth(IBLSCALE(65)+PROFWIDTH/5);
break;
case ss480x272:
((WndButton *)wf->FindByName(TEXT("cmdFLY"))) ->SetWidth(IBLSCALE(117));
((WndButton *)wf->FindByName(TEXT("cmdFLY"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdFLY"))) ->SetTop(IBLSCALE(197));
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetWidth(IBLSCALE(117));
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetLeft(IBLSCALE(201)+PROFWIDTH*3);
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetTop(IBLSCALE(197));
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetLeft(IBLSCALE(88)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetWidth(IBLSCALE(99)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetTop(IBLSCALE(197));
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetLeft(IBLSCALE(161)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetWidth(IBLSCALE(65)+PROFWIDTH/5);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetTop(IBLSCALE(197));
break;
case ss640x480:
case ss320x240:
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetLeft(IBLSCALE(93)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetWidth(IBLSCALE(73)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetLeft(IBLSCALE(166)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetWidth(IBLSCALE(60)+PROFWIDTH/5);
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetLeft(IBLSCALE(228)+PROFWIDTH*3);
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetWidth(IBLSCALE(88));
break;
default:
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetLeft(IBLSCALE(93)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetWidth(IBLSCALE(73)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetLeft(IBLSCALE(166)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetWidth(IBLSCALE(60)+PROFWIDTH/5);
((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetLeft(IBLSCALE(228)+PROFWIDTH*3);
break;
}
} else {
PROFWIDTH=IBLSCALE(236);
PROFACCEPTWIDTH=NIBLSCALE(45);
PROFHEIGHT=NIBLSCALE(25);
PROFSEPARATOR=NIBLSCALE(2);
}
}
if (RUN_MODE==RUN_DUALPROF) {
((WndButton *)wf->FindByName(TEXT("cmdAIRCRAFT"))) ->SetOnClickNotify(OnAIRCRAFTClicked);
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetOnClickNotify(OnPROFILEClicked);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetOnClickNotify(OnPILOTClicked);
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetOnClickNotify(OnCloseClicked);
//((WndButton *)wf->FindByName(TEXT("cmdFLY"))) ->SetOnClickNotify(OnFLYClicked);
//((WndButton *)wf->FindByName(TEXT("cmdSIM"))) ->SetOnClickNotify(OnSIMClicked);
//((WndButton *)wf->FindByName(TEXT("cmdDUALPROFILE"))) ->SetOnClickNotify(OnDUALPROFILEClicked);
//((WndButton *)wf->FindByName(TEXT("cmdEXIT"))) ->SetOnClickNotify(OnEXITClicked);
if (ScreenLandscape) {
PROFWIDTH=(ScreenSizeX-IBLSCALE(320))/3;
switch(ScreenSize) {
case ss800x480:
case ss400x240:
((WndButton *)wf->FindByName(TEXT("cmdAIRCRAFT"))) ->SetWidth(IBLSCALE(110));
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetWidth(IBLSCALE(110));
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetLeft(IBLSCALE(208)+PROFWIDTH*3);
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetLeft(IBLSCALE(88)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetWidth(IBLSCALE(92)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetLeft(IBLSCALE(161)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetWidth(IBLSCALE(65)+PROFWIDTH/5);
break;
case ss480x272:
((WndButton *)wf->FindByName(TEXT("cmdAIRCRAFT"))) ->SetWidth(IBLSCALE(117));
((WndButton *)wf->FindByName(TEXT("cmdAIRCRAFT"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdAIRCRAFT"))) ->SetTop(IBLSCALE(197));
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetWidth(IBLSCALE(117));
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetLeft(IBLSCALE(201)+PROFWIDTH*3);
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetTop(IBLSCALE(197));
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetLeft(IBLSCALE(88)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetWidth(IBLSCALE(99)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetTop(IBLSCALE(197));
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetLeft(IBLSCALE(161)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetWidth(IBLSCALE(65)+PROFWIDTH/5);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetHeight(IBLSCALE(38));
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetTop(IBLSCALE(197));
break;
case ss640x480:
case ss320x240:
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetLeft(IBLSCALE(93)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetWidth(IBLSCALE(73)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetLeft(IBLSCALE(166)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetWidth(IBLSCALE(60)+PROFWIDTH/5);
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetLeft(IBLSCALE(228)+PROFWIDTH*3);
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetWidth(IBLSCALE(88));
break;
default:
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetLeft(IBLSCALE(93)+PROFWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdPROFILE"))) ->SetWidth(IBLSCALE(73)+PROFWIDTH/6);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetLeft(IBLSCALE(166)+PROFWIDTH*2);
((WndButton *)wf->FindByName(TEXT("cmdPILOT"))) ->SetWidth(IBLSCALE(60)+PROFWIDTH/5);
((WndButton *)wf->FindByName(TEXT("cmdCLOSE"))) ->SetLeft(IBLSCALE(228)+PROFWIDTH*3);
break;
}
} else {
PROFWIDTH=IBLSCALE(236);
PROFACCEPTWIDTH=NIBLSCALE(45);
PROFHEIGHT=NIBLSCALE(25);
PROFSEPARATOR=NIBLSCALE(2);
}
}
if (RUN_MODE==RUN_PROFILE || RUN_MODE==RUN_AIRCRAFT || RUN_MODE==RUN_PILOT) {
((WndButton *)wf->FindByName(TEXT("cmdClose"))) ->SetOnClickNotify(OnCloseClicked);
if (ScreenLandscape) {
PROFWIDTH=IBLSCALE(256);
PROFACCEPTWIDTH=NIBLSCALE(60);
PROFHEIGHT=NIBLSCALE(30);
PROFSEPARATOR=NIBLSCALE(4);
((WndButton *)wf->FindByName(TEXT("cmdClose"))) ->SetWidth(PROFACCEPTWIDTH);
((WndButton *)wf->FindByName(TEXT("cmdClose"))) ->
SetLeft((((ScreenSizeX-PROFWIDTH-PROFSEPARATOR-PROFACCEPTWIDTH)/2)+PROFSEPARATOR+PROFWIDTH)-NIBLSCALE(2));
((WndButton *)wf->FindByName(TEXT("cmdClose"))) ->SetHeight(PROFHEIGHT-NIBLSCALE(4));
} else {
PROFWIDTH=IBLSCALE(236);
PROFACCEPTWIDTH=NIBLSCALE(45);
PROFHEIGHT=NIBLSCALE(25);
PROFSEPARATOR=NIBLSCALE(2);
((WndButton *)wf->FindByName(TEXT("cmdClose"))) ->SetWidth(ScreenSizeX-NIBLSCALE(6));
((WndButton *)wf->FindByName(TEXT("cmdClose"))) -> SetLeft(NIBLSCALE(2));
}
}
TCHAR temp[MAX_PATH];
wf->SetHeight(ScreenSizeY);
wf->SetWidth(ScreenSizeX);
wp = ((WndProperty *)wf->FindByName(TEXT("prpProfile")));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
if (RUN_MODE==RUN_PROFILE) {
_stprintf(temp,_T("*%S"),LKS_PRF);
dfe->ScanDirectoryTop(_T(LKD_CONF),temp);
dfe->addFile(gettext(_T("_@M1741_")),_T("PROFILE_RESET"));
dfe->Lookup(startProfileFile);
}
if (RUN_MODE==RUN_AIRCRAFT) {
_stprintf(temp,_T("*%S"),LKS_AIRCRAFT);
dfe->ScanDirectoryTop(_T(LKD_CONF),temp);
dfe->Lookup(startAircraftFile);
}
if (RUN_MODE==RUN_PILOT) {
_stprintf(temp,_T("*%S"),LKS_PILOT);
dfe->ScanDirectoryTop(_T(LKD_CONF),temp);
dfe->Lookup(startPilotFile);
}
wp->SetHeight(PROFHEIGHT);
wp->SetWidth(PROFWIDTH);
if (ScreenLandscape)
wp->SetLeft(((ScreenSizeX-PROFWIDTH-PROFSEPARATOR-PROFACCEPTWIDTH)/2)-NIBLSCALE(2));
else
wp->SetLeft(0);
wp->RefreshDisplay();
}
if (!CheckRootDir()) {
TCHAR mydir[MAX_PATH];
TCHAR mes[MAX_PATH];
LocalPath(mydir,_T(""));
_stprintf(mes,_T("%s"),mydir);
MessageBoxX(hWndMainWindow, _T("NO LK8000 DIRECTORY\nCheck Installation!"), _T("FATAL ERROR 000"), MB_OK|MB_ICONQUESTION);
MessageBoxX(hWndMainWindow, mes, _T("NO LK8000 DIRECTORY"), MB_OK|MB_ICONQUESTION, true);
RUN_MODE=RUN_EXIT;
Shutdown();
goto _exit;
}
if (!CheckDataDir()) {
TCHAR mydir[MAX_PATH];
TCHAR mes[MAX_PATH];
LocalPath(mydir,_T(LKD_SYSTEM));
_stprintf(mes,_T("%s"),mydir);
MessageBoxX(hWndMainWindow, _T("NO SYSTEM DIRECTORY\nCheck Installation!"), _T("FATAL ERROR 001"), MB_OK|MB_ICONQUESTION);
MessageBoxX(hWndMainWindow, mes, _T("NO SYSTEM DIRECTORY"), MB_OK|MB_ICONQUESTION, true);
RUN_MODE=RUN_EXIT;
Shutdown();
goto _exit;
}
if (!CheckLanguageDir()) {
TCHAR mydir[MAX_PATH];
TCHAR mes[MAX_PATH];
StartupStore(_T("... CHECK LANGUAGE DIRECTORY FAILED!%s"),NEWLINE);
LocalPath(mydir,_T(LKD_LANGUAGE));
_stprintf(mes,_T("%s"),mydir);
MessageBoxX(hWndMainWindow, _T("LANGUAGE DIRECTORY CHECK FAIL\nCheck Language Install"), _T("FATAL ERROR 002"), MB_OK|MB_ICONQUESTION);
MessageBoxX(hWndMainWindow, mes, _T("NO LANGUAGE DIRECTORY"), MB_OK|MB_ICONQUESTION, true);
RUN_MODE=RUN_EXIT;
Shutdown();
goto _exit;
}
if (!CheckLanguageEngMsg()) {
TCHAR mydir[MAX_PATH];
TCHAR mes[MAX_PATH];
StartupStore(_T("... CHECK LANGUAGE ENG_MSG FAILED!%s"),NEWLINE);
LocalPath(mydir,_T(LKD_LANGUAGE));
_stprintf(mes,_T("%s/ENG_MSG.TXT"),mydir);
MessageBoxX(hWndMainWindow, _T("ENG_MSG.TXT MISSING in LANGUAGE\nCheck Language Install"), _T("FATAL ERROR 012"), MB_OK|MB_ICONQUESTION);
MessageBoxX(hWndMainWindow, mes, _T("MISSING FILE!"), MB_OK|MB_ICONQUESTION, true);
RUN_MODE=RUN_EXIT;
Shutdown();
goto _exit;
}
if (!CheckSystemDefaultMenu()) {
TCHAR mydir[MAX_PATH];
TCHAR mes[MAX_PATH];
StartupStore(_T("... CHECK SYSTEM DEFAULT_MENU.TXT FAILED!%s"),NEWLINE);
LocalPath(mydir,_T(LKD_SYSTEM));
_stprintf(mes,_T("%s/DEFAULT_MENU.TXT"),mydir);
MessageBoxX(hWndMainWindow, _T("DEFAULT_MENU.TXT MISSING in SYSTEM\nCheck System Install"), _T("FATAL ERROR 022"), MB_OK|MB_ICONQUESTION);
MessageBoxX(hWndMainWindow, mes, _T("MISSING FILE!"), MB_OK|MB_ICONQUESTION, true);
RUN_MODE=RUN_EXIT;
Shutdown();
goto _exit;
}
if (!CheckSystemBitmaps()) {
TCHAR mydir[MAX_PATH];
TCHAR mes[MAX_PATH];
StartupStore(_T("... CHECK SYSTEM _BITMAPSH FAILED!%s"),NEWLINE);
LocalPath(mydir,_T(LKD_BITMAPS));
_stprintf(mes,_T("%s/_BITMAPSH"),mydir);
MessageBoxX(hWndMainWindow, _T("_BITMAPSH MISSING in SYSTEM Bitmaps\nCheck System Install"), _T("FATAL ERROR 032"), MB_OK|MB_ICONQUESTION);
MessageBoxX(hWndMainWindow, mes, _T("MISSING FILE!"), MB_OK|MB_ICONQUESTION, true);
RUN_MODE=RUN_EXIT;
Shutdown();
goto _exit;
}
if (!CheckPolarsDir()) {
TCHAR mydir[MAX_PATH];
TCHAR mes[MAX_PATH];
StartupStore(_T("... CHECK POLARS DIRECTORY FAILED!%s"),NEWLINE);
LocalPath(mydir,_T(LKD_POLARS));
_stprintf(mes,_T("%s"),mydir);
MessageBoxX(hWndMainWindow, _T("NO POLARS DIRECTORY\nCheck Install"), _T("FATAL ERROR 003"), MB_OK|MB_ICONQUESTION);
MessageBoxX(hWndMainWindow, mes, _T("NO POLARS DIRECTORY"), MB_OK|MB_ICONQUESTION, true);
RUN_MODE=RUN_EXIT;
Shutdown();
goto _exit;
}
// Standby for a system request to close the application during this phase.
wf->SetTimerNotify(OnTimerNotify);
#if 0
srand(GetTickCount());
#endif
wf->ShowModal();
if (RUN_MODE==RUN_SHUTDOWN) goto _exit;
wp = (WndProperty*)wf->FindByName(TEXT("prpProfile"));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
if (RUN_MODE==RUN_PROFILE) {
if (_tcslen(dfe->GetPathFile())>0) {
if (_tcscmp(dfe->GetPathFile(),startProfileFile) ) { // if they are not the same
_tcscpy(startProfileFile,dfe->GetPathFile());
if (_tcscmp(startProfileFile,_T("PROFILE_RESET"))==0) {
#if TESTBENCH
StartupStore(_T("... Selected FULL RESET virtual profile\n"));
#endif
if (MessageBoxX(NULL, gettext(TEXT("_@M1758_")),
gettext(TEXT("_@M1757_")), MB_OK|MB_ICONQUESTION));
fullresetasked=true;
} else {
#if TESTBENCH
StartupStore(_T("... Selected new profile, preloading..\n"));
#endif
LKProfileLoad(startProfileFile);
fullresetasked=false;
}
}
}
}
if (RUN_MODE==RUN_AIRCRAFT) {
if (_tcslen(dfe->GetPathFile())>0) {
if (_tcscmp(dfe->GetPathFile(),startAircraftFile) ) { // if they are not the same
_tcscpy(startAircraftFile,dfe->GetPathFile());
#if TESTBENCH
StartupStore(_T("... Selected new aircraft, preloading..\n"));
#endif
LKProfileLoad(startAircraftFile);
}
}
}
if (RUN_MODE==RUN_PILOT) {
if (_tcslen(dfe->GetPathFile())>0) {
if (_tcscmp(dfe->GetPathFile(),startPilotFile) ) { // if they are not the same
_tcscpy(startPilotFile,dfe->GetPathFile());
#if TESTBENCH
StartupStore(_T("... Selected new pilot, preloading..\n"));
#endif
LKProfileLoad(startPilotFile);
}
}
}
RUN_MODE=RUN_DUALPROF;
}
if (RUN_MODE==RUN_EXIT) {
if (EnableSoundModes) LKSound(_T("LK_SLIDE.WAV"));
if (MessageBoxX(hWndMainWindow,
// LKTOKEN _@M198_ = "Confirm Exit?"
gettext(TEXT("_@M198_")),
TEXT("LK8000"), MB_YESNO|MB_ICONQUESTION) == IDYES) {
Shutdown();
} else
RUN_MODE=RUN_WELCOME;
}
_exit:
if (wf!=NULL) {
delete wf;
wf = NULL;
}
if (RUN_MODE==RUN_FLY || RUN_MODE==RUN_SIM) {
if (EnableSoundModes) LKSound(_T("LK_SLIDE.WAV"));
return 0; // do not repeat dialog
}
if (RUN_MODE==RUN_EXIT || RUN_MODE==RUN_SHUTDOWN)
return -1; // terminate
else
return 1; // repeat dialog
}
void dlgStartupShowModal(void){
WndProperty* wp;
StartupStore(TEXT("Startup dialog\n"));
if (!InfoBoxLayout::landscape) {
wf = dlgLoadFromXML(CallBackTable,
TEXT("dlgStartup_L.xml"),
XCSoarInterface::main_window,
TEXT("IDR_XML_STARTUP_L"));
} else {
wf = dlgLoadFromXML(CallBackTable,
TEXT("dlgStartup.xml"),
XCSoarInterface::main_window,
TEXT("IDR_XML_STARTUP"));
}
if (!wf) return;
wSplash = (WndOwnerDrawFrame*)wf->FindByName(TEXT("frmSplash"));
((WndButton *)wf->FindByName(TEXT("cmdClose")))
->SetOnClickNotify(OnCloseClicked);
TCHAR temp[MAX_PATH];
_stprintf(temp,TEXT("XCSoar: Version %s"), XCSoar_Version);
wf->SetCaption(temp);
wp = ((WndProperty *)wf->FindByName(TEXT("prpDisclaimer")));
if (wp)
wp->SetText(TEXT("Pilot assumes complete\r\nresponsibility to operate\r\nthe aircraft safely.\r\nMaintain effective lookout.\r\n"));
wp = ((WndProperty *)wf->FindByName(TEXT("prpProfile")));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
if (is_altair())
dfe->ScanDirectoryTop(TEXT("config/*.prf"));
else
dfe->ScanDirectoryTop(TEXT("*.prf"));
dfe->Lookup(startProfileFile);
wp->RefreshDisplay();
if (dfe->GetNumFiles()<=2) {
delete wf;
wf = NULL;
return;
}
}
wf->ShowModal();
wp = (WndProperty*)wf->FindByName(TEXT("prpProfile"));
if (wp) {
DataFieldFileReader* dfe;
dfe = (DataFieldFileReader*)wp->GetDataField();
if (_tcslen(dfe->GetPathFile())>0) {
_tcscpy(startProfileFile,dfe->GetPathFile());
}
}
delete wf;
wf = NULL;
}
static void OnSaveNewClicked(WindowControl * Sender) {
(void)Sender;
int file_index;
TCHAR file_name[MAX_PATH];
TCHAR profile_name[MAX_PATH];
TCHAR tmptext[MAX_PATH];
WndProperty* wp;
DataFieldFileReader *dfe;
wp = (WndProperty*)wf->FindByName(TEXT("prpFile"));
if (!wp) return;
dfe = (DataFieldFileReader*) wp->GetDataField();
_tcscpy(profile_name,_T(""));
dlgTextEntryShowModal(profile_name, 13); // max length including termination 0
if (_tcslen(profile_name)<=0) return;
_tcscat(profile_name, TEXT(LKS_PRF));
LocalPath(file_name,TEXT(LKD_CONF));
_tcscat(file_name,TEXT("\\"));
_tcscat(file_name,profile_name);
dfe->Lookup(file_name);
file_index = dfe->GetAsInteger();
if (file_index==0) {
_stprintf(tmptext, TEXT("%s: %s"),
// LKTOKEN _@M458_ = "New profile"
gettext(TEXT("_@M458_")),
profile_name);
if(MessageBoxX(hWndMapWindow, tmptext,
// LKTOKEN _@M579_ = "Save ?"
gettext(TEXT("_@M579_")),
MB_YESNO|MB_ICONQUESTION) == IDYES) {
WriteProfile(file_name);
dfe->addFile(profile_name, file_name);
MessageBoxX(hWndMapWindow,
// LKTOKEN _@M535_ = "Profile saved!"
gettext(TEXT("_@M535_")),
_T(""), MB_OK|MB_ICONEXCLAMATION);
dfe->Set(0);
return;
}
}
if (file_index>0) {
_stprintf(tmptext, TEXT("%s: %s"),
// LKTOKEN _@M533_ = "Profile already exists"
gettext(TEXT("_@M533_")),
profile_name);
if (CheckClubVersion() ) {
MessageBoxX(hWndMapWindow, tmptext,
// LKTOKEN _@M162_ = "Cannot overwrite!"
gettext(TEXT("_@M162_")),
MB_OK|MB_ICONEXCLAMATION);
} else {
if(MessageBoxX(hWndMapWindow, tmptext,
// LKTOKEN _@M510_ = "Overwrite?"
gettext(TEXT("_@M510_")),
MB_YESNO|MB_ICONQUESTION) == IDYES) {
WriteProfile(file_name);
MessageBoxX(hWndMapWindow,
// LKTOKEN _@M535_ = "Profile saved!"
gettext(TEXT("_@M535_")),
_T(""), MB_OK|MB_ICONEXCLAMATION);
return;
}
}
dfe->Set(0);
}
}
static WndForm* InitStartup(BYTE mode) {
WndForm * pWndForm = dlgLoadFromXML(CallBackTable, ScreenLandscape ? IDR_XML_STARTUP_L : IDR_XML_STARTUP_P);
if(pWndForm) {
WindowControl * pWndClose = pWndForm->FindByName(TEXT("cmdClose"));
WndProperty* pWndProfile = static_cast<WndProperty*>(pWndForm->FindByName(TEXT("prpProfile")));
if (ScreenLandscape) {
const int PROFWIDTH = IBLSCALE(256);
const int PROFACCEPTWIDTH = NIBLSCALE(60);
const int PROFHEIGHT = NIBLSCALE(30);
const int PROFSEPARATOR = NIBLSCALE(4);
if(pWndClose) {
pWndClose->SetWidth(PROFACCEPTWIDTH);
pWndClose->SetLeft((((ScreenSizeX - PROFWIDTH - PROFSEPARATOR - PROFACCEPTWIDTH) / 2) + PROFSEPARATOR + PROFWIDTH) - NIBLSCALE(2));
pWndClose->SetHeight(PROFHEIGHT - NIBLSCALE(4));
}
if(pWndProfile) {
pWndProfile->SetLeft(((ScreenSizeX - PROFWIDTH - PROFSEPARATOR - PROFACCEPTWIDTH) / 2) - NIBLSCALE(2));
pWndProfile->SetHeight(PROFHEIGHT);
pWndProfile->SetWidth(PROFWIDTH);
}
} else {
const int PROFWIDTH = IBLSCALE(236);
const int PROFHEIGHT = NIBLSCALE(25);
int h = ScreenSizeY - IBLSCALE(65); //
if(pWndClose) {
pWndClose->SetWidth(ScreenSizeX - NIBLSCALE(6));
pWndClose->SetLeft(NIBLSCALE(2));
pWndClose->SetTop(h);
}
if(pWndProfile) {
pWndProfile->SetTop(h + IBLSCALE(35));
pWndProfile->SetLeft(0);
pWndProfile->SetHeight(PROFHEIGHT);
pWndProfile->SetWidth(PROFWIDTH);
}
}
//
// File selection shared by PROFILEs choices
//
if (pWndProfile) {
DataFieldFileReader* dfe = static_cast<DataFieldFileReader*>(pWndProfile->GetDataField());
if(dfe) {
if (mode == RUN_PROFILE) {
dfe->ScanDirectoryTop(_T(LKD_CONF), _T("*" LKS_PRF));
dfe->addFile(MsgToken(1741), _T("PROFILE_RESET"));
dfe->Lookup(startProfileFile);
} else if (mode == RUN_AIRCRAFT) {
dfe->ScanDirectoryTop(_T(LKD_CONF), _T("*" LKS_AIRCRAFT));
dfe->Lookup(startAircraftFile);
} else if (mode == RUN_DEVICE) {
dfe->ScanDirectoryTop(_T(LKD_CONF), _T("*" LKS_DEVICE));
dfe->Lookup(startDeviceFile);
} else if (mode == RUN_PILOT) {
dfe->ScanDirectoryTop(_T(LKD_CONF), _T("*" LKS_PILOT));
dfe->Lookup(startPilotFile);
}
}
pWndProfile->RefreshDisplay();
}
}
return pWndForm;
}
