forked from Frieve-A/Frieve-Editor
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathfoabout.cpp
More file actions
44 lines (36 loc) · 1.22 KB
/
Copy pathfoabout.cpp
File metadata and controls
44 lines (36 loc) · 1.22 KB
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
//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "foabout.h"
#include "document.h"
#include "setting.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TFo_About *Fo_About;
//---------------------------------------------------------------------
void TFo_About::ApplyLanguageSetting()
{
if (!FileExists(LanguageFileName())){
return;
}
TFastIni *Ini = new TFastIni(LanguageFileName());
Caption = Ini->ReadString("About", "Caption", Caption);
Bu_OK->Caption = Ini->ReadString("Dialog", "Bu_OK", Bu_OK->Caption);
delete Ini;
}
//---------------------------------------------------------------------
__fastcall TFo_About::TFo_About(TComponent* AOwner)
: TForm(AOwner)
{
}
//---------------------------------------------------------------------
void __fastcall TFo_About::FormShow(TObject *Sender)
{
ApplyLanguageSetting();
ProductName->Caption =
AnsiString(AppTitle) +
AnsiString(" Version ") +
FormatFloat("0.00", AppVersion / 100.0);
ProgramIcon->Picture->Assign(Application->Icon);
}
//---------------------------------------------------------------------