-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathrcbasic_editMain.cpp
executable file
·73 lines (58 loc) · 1.33 KB
/
rcbasic_editMain.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
/***************************************************************
* Name: rcbasic_editMain.cpp
* Purpose: Code for Application Frame
* Author: ()
* Created: 2023-02-06
* Copyright: ()
* License:
**************************************************************/
#ifdef WX_PRECOMP
#include "wx_pch.h"
#endif
#ifdef __BORLANDC__
#pragma hdrstop
#endif //__BORLANDC__
#include "rcbasic_editMain.h"
//helper functions
enum wxbuildinfoformat {
short_f, long_f };
wxString wxbuildinfo(wxbuildinfoformat format)
{
wxString wxbuild(wxVERSION_STRING);
if (format == long_f )
{
#if defined(__WXMSW__)
wxbuild << _T("-Windows");
#elif defined(__WXMAC__)
wxbuild << _T("-Mac");
#elif defined(__UNIX__)
wxbuild << _T("-Linux");
#endif
#if wxUSE_UNICODE
wxbuild << _T("-Unicode build");
#else
wxbuild << _T("-ANSI build");
#endif // wxUSE_UNICODE
}
return wxbuild;
}
rcbasic_editDialog::rcbasic_editDialog(wxDialog *dlg)
: GUIDialog(dlg)
{
}
rcbasic_editDialog::~rcbasic_editDialog()
{
}
void rcbasic_editDialog::OnClose(wxCloseEvent &event)
{
Destroy();
}
void rcbasic_editDialog::OnQuit(wxCommandEvent &event)
{
Destroy();
}
void rcbasic_editDialog::OnAbout(wxCommandEvent &event)
{
wxString msg = wxbuildinfo(long_f);
wxMessageBox(msg, _("Welcome to..."));
}