/*************
* palind.cpp *
*************/

/* projektiin: palind.cpp
               palind.rc
               joko palidll.cpp tai pal_dll.lib
                  riippuen haluaako käyttää pal_dll.dll tiedostoa.

*/
#include <owl\pch.h>
#include <owl\static.h>
#include <owl\edit.h>
#include "palind.rh"
#include "palilib.h"

static const char *EI = "Ei ole";
static const char *ON = "Kyllä on";



//------------------------------------------------------------------------------

class TPalindromiDialog : public TDialog {

  char teksti[500];
  TEdit palind;
  TStatic onko;


public:

  TPalindromiDialog(TWindow *Parent, TResId resid, TModule *module = 0)
     : TDialog(Parent, resid ,module),
       palind(this,IDC_EDIT1_PALIND),
       onko(this,ONKO)
      { }

  ~TPalindromiDialog();
  void TextChangeg();


  DECLARE_RESPONSE_TABLE(TPalindromiDialog);

};

DEFINE_RESPONSE_TABLE1(TPalindromiDialog,TDialog)
EV_EN_CHANGE(IDC_EDIT1_PALIND,TextChangeg),

END_RESPONSE_TABLE;


TPalindromiDialog::~TPalindromiDialog()
{
}

 void TPalindromiDialog::TextChangeg()   {
   palind.GetText(teksti,sizeof(teksti) );
#if 1
   int apu = kysy_onko(teksti);
   if ( apu ) onko.SetText(ON);
#else
   cPalindromi palindromi;
   int apu = palindromi.onko(teksti);
   if ( apu ) onko.SetText(ON);
#endif
   else onko.SetText(EI);

 }




//------------------------------------------------------------------------------
class TPalindApp : public TApplication {
public:
  TPalindApp(const char *name ) : TApplication(name) {}
  void InitMainWindow() {
               TDecoratedFrame *fw = new TDecoratedFrame(0, Name,
    							  new TPalindromiDialog (0, T_PALINDROMI)    );

    fw->SetFlag(wfShrinkToClient);
    SetMainWindow(fw);

  }
};



//------------------------------------------------------------------------------
int OwlMain(int ,char far * [])
{
 return TPalindApp("Onko palindromi").Run();
}






/*
int main (void)
{
 int onko;
 onko = palindromi("innostunut sonni");
 printf("%d\n",onko);
 return 0;
} */