forked from Frieve-A/Frieve-Editor
-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathfofullscreen.cpp
More file actions
31 lines (28 loc) · 980 Bytes
/
Copy pathfofullscreen.cpp
File metadata and controls
31 lines (28 loc) · 980 Bytes
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
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "fofullscreen.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFo_FullScreen *Fo_FullScreen;
//---------------------------------------------------------------------------
__fastcall TFo_FullScreen::TFo_FullScreen(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFo_FullScreen::FormShow(TObject *Sender)
{
Left = 0;
Top = 0;
Width = Screen->Width;
Height = Screen->Height;
}
//---------------------------------------------------------------------------
void __fastcall TFo_FullScreen::FormResize(TObject *Sender)
{
Bu_Enter->Left = Width + 100;
Bu_Dummy->Left = Width + 100;
}
//---------------------------------------------------------------------------