/************* * teht1.cpp * *************/ /* projektiin: teht1.cpp teht1.rc ALI\optdlg.c mukaan tarvitaan: teht1.rh Nimi ei toimi??? */ #include #include #include #include "optdlg.h" #include "teht1.rh" #include "kysy.h" #define INIFILE ".\\kysy.ini" typedef struct { char nimi[50]; // int sukupuoli; /* 0=mies, 1=nainen */ int jtt; int ohjelmointi; int ohjelmistot; } OA2; KontrolliKuvaus kontr[] = { {IDC_EDIT_NIMI, IDC_EDIT_NIMI, C_edte, N_P_K(OA2,nimi), T_str, 0, NULL }, {IDC_MIES, IDC_NAINEN,C_arbu, N_P_K(OA2,sukupuoli),T_int, 0, NULL }, {IDC_JTT, IDC_JTT, C_acbo, N_P_K(OA2,jtt), T_int, 3, NULL }, {IDC_OHJELMOINTI, IDC_OHJELMOINTI, C_acbo, N_P_K(OA2,ohjelmointi), T_int, 3, NULL }, {IDC_OHJELMISTOT, IDC_OHJELMISTOT, C_acbo, N_P_K(OA2,ohjelmistot), T_int, 3, NULL }, {0, 0, 0, NULL, 0, 0, 0, 0, NULL } }; OA2 optiot; // Globaali HYI! DialogiParam optioDlgParam2 = { "DIALOG_KYSY", /* dialogin nimi */ D_modal, /* dial. tyyppi: hallitseva */ kontr, /* kontrollien kuvaustaulukko*/ INIFILE, /* talletustiedosto */ "Optiot", /* ini-tiedoston kappale */ &optiot, /* arvotietue */ sizeof( OA2 ) /* arvotietueen koko */ }; //------------------------------------------------------------------------------ class TPaaDialog : public TDialog { char kaytnimi[500]; TStatic kayt; public: TPaaDialog(TWindow *Parent, TResId resid, TModule *module = 0); ~TPaaDialog(); void IdokClicked(); virtual void SetupWindow(); DECLARE_RESPONSE_TABLE(TPaaDialog); }; DEFINE_RESPONSE_TABLE1(TPaaDialog,TDialog) EV_BN_CLICKED(IDOK ,IdokClicked), END_RESPONSE_TABLE; TPaaDialog::TPaaDialog(TWindow *Parent, TResId resid, TModule *module) : TDialog(Parent, resid ,module), kayt(this,TEXT_NIMI) { if ( !AlustaOptiot( &optioDlgParam2 ) ) MessageBox("Arvotietueen haku ei onnistu"); } TPaaDialog::~TPaaDialog() { } void TPaaDialog::SetupWindow() { TDialog::SetupWindow(); kayt.SetText(optiot.nimi); // if ( optiot.jtt == 0 ) ... "pönttö ewi ooooo " } void TPaaDialog::IdokClicked() { int ipal = OptioDialogi(*this, &optioDlgParam2 ); if ( !TalletaOptiot( &optioDlgParam2 ) ) MessageBox("Arvotietueen vienti ei onnistu"); } //------------------------------------------------------------------------------ class TPaaApp : public TApplication { public: TPaaApp(const char *name ) : TApplication(name) {} void InitMainWindow() { TDecoratedFrame *fw = new TDecoratedFrame(0, Name, new TPaaDialog (0, T_DIALOG_PAA) ); fw->SetFlag(wfShrinkToClient); SetMainWindow(fw); } }; //------------------------------------------------------------------------------ int OwlMain(int ,char far * []) { return TPaaApp("Onko palindromi").Run(); } /* int main (void) { int onko; onko = palindromi("innostunut sonni"); printf("%d\n",onko); return 0; } */