00001 #include "../../include/TxtFunzione/PnlFunzione.h"
00002
00003 IMPLEMENT_CLASS(PnlFunzione,TBasePanel)
00004
00005 BEGIN_EVENT_TABLE(PnlFunzione,TBasePanel)
00006
00007 EVT_KEY_DOWN(PnlFunzione::OnChar)
00008 EVT_SIZE(PnlFunzione::OnSize)
00009 EVT_LEFT_DOWN(PnlFunzione::OnLeftDown)
00010 EVT_MOTION(PnlFunzione::OnMotion)
00011 END_EVENT_TABLE();
00012
00013 void PnlFunzione::OnChar(wxKeyEvent& event)
00014 {
00015 if(event.m_keyCode==13)
00016 event.m_keyCode= WXK_DOWN;
00017 if ((event.m_keyCode== WXK_DOWN)||(event.m_keyCode== WXK_RIGHT)||(event.m_keyCode== WXK_UP)||(event.m_keyCode== WXK_LEFT))
00018 { GetParent()->SetFocus();
00019 event.ResumePropagation(1);
00020 }else
00021 {
00022
00023 funzione->SetFocus();
00024
00025 }
00026
00027 event.Skip();
00028 }
00029 void PnlFunzione::OnLeftDown(wxMouseEvent& event)
00030 {
00031 event.m_x=20;
00032 event.m_y=20;
00033 event.Skip();
00034 }
00035 void PnlFunzione::OnMotion(wxMouseEvent& event)
00036 { if(event.m_leftDown==0)
00037 {
00038 event.m_x=30;
00039 event.m_y=30;
00040 }
00041 event.Skip();
00042 }
00043
00044
00045
00046 PnlFunzione::PnlFunzione(wxWindow* parent,
00047 const wxSize& size ,
00048 wxWindowID id ,
00049 const wxPoint& pos ,
00050 long style ,
00051 const wxString& name, gestione* gpannello,char primocarattere): TBasePanel(parent,
00052 id,
00053 pos,
00054 size,
00055 style,
00056 name,1)
00057 {
00058 ImpostaUtilita(gpannello);
00059
00060 ImpostaSelezione();
00061 funzione=new TxtFunzione(this,-1,_T(""),wxPoint(7,7),size,wxNO_3D|wxNO_BORDER |wxTE_MULTILINE|wxTE_AUTO_URL,wxDefaultValidator,_T("TxTFunzione"), primocarattere);
00062
00063
00064
00065
00066 }
00067
00068 int PnlFunzione::GetMinWidth()
00069 {
00070 return 10;
00071 }
00072
00073 int PnlFunzione::GetMinHeight()
00074 {
00075 return 50;
00076 }
00077
00078 void PnlFunzione::OnSize(wxSizeEvent& event)
00079 {
00080 funzione->SetSize(GetSize());
00081
00082 event.Skip();
00083 }
00084
00085
00086
00087