//---------------------------------------------------------------------------

#include <fmx.h>
#pragma hdrstop

#include "PDF_main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "FMX.TMSBaseControl"
#pragma link "FMX.TMSCustomComponent"
#pragma link "FMX.TMSMemo"
#pragma link "FMX.TMSMemoPDFIO"
#pragma link "FMX.TMSPDFIO"
#pragma resource "*.fmx"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
	if (SaveDialog1->Execute()) {
        TMSFMXMemoPDFIO1->Save(SaveDialog1->FileName);
	}
}
//---------------------------------------------------------------------------