/
dimferon
/
AstrobloQ
Обзор
Документация
Войти
/
dimferon
/
AstrobloQ
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
source/fmxcpp/fcGalaxy.cpp
53 строки
1 KB
glscene
Updated plugins
14 сен 2024, 23:05
14 сен 2024, 23:05
e0344f5
Код
Авторство
О чём код?
//--------------------------------------------------------------------------- #include <fmx.h> #pragma hdrstop #include "fcGalaxy.h" #include "fcAbout.h" #include "fcSettings.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.fmx" TFormGalaxyc *FormGalaxyc; //--------------------------------------------------------------------------- __fastcall TFormGalaxyc::TFormGalaxyc(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TFormGalaxyc::miAboutClick(TObject* Sender) { TFormAbout* FormAbout; FormAbout = new TFormAbout(this); try { FormAbout->ShowModal(); } __finally { FormAbout->Free(); } } //--------------------------------------------------------------------------- void __fastcall TFormGalaxyc::miSettingsClick(TObject *Sender) { FormSettings->Show(); } //--------------------------------------------------------------------------- void __fastcall TFormGalaxyc::miExitClick(TObject *Sender) { Close(); } //--------------------------------------------------------------------------- void __fastcall TFormGalaxyc::miOpenClick(TObject *Sender) { // } //---------------------------------------------------------------------------