-
Notifications
You must be signed in to change notification settings - Fork 225
/
IdcSplitSize.cpp
35 lines (32 loc) · 1.2 KB
/
IdcSplitSize.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
//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "IdcSplitSize.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
extern int SplitSize;
TFIdcSplitSize *FIdcSplitSize;
//---------------------------------------------------------------------
__fastcall TFIdcSplitSize::TFIdcSplitSize(TComponent* AOwner)
: TForm(AOwner)
{
Caption = "Split size: 1 Mbyte";
}
//---------------------------------------------------------------------
void __fastcall TFIdcSplitSize::OKBtnClick(TObject *Sender)
{
SplitSize = (1 << (tbSplitSize->Position + 19));//MBytes
ModalResult = mrOk;
}
//---------------------------------------------------------------------------
void __fastcall TFIdcSplitSize::CancelBtnClick(TObject *Sender)
{
SplitSize = 0;
ModalResult = mrCancel;
}
//---------------------------------------------------------------------------
void __fastcall TFIdcSplitSize::tbSplitSizeChange(TObject *Sender)
{
Caption = "Split size: " + String(tbSplitSize->Position) + " MByte";
}
//---------------------------------------------------------------------------