Initial commit

2026-06-13 00:05:19 +08:00
commit 754cd7ccdb
402 changed files with 123771 additions and 0 deletions
@@ -0,0 +1,24 @@
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+
+#include "SplashFormUnit.h"
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma resource "*.dfm"
+TSplashForm *SplashForm;
+//---------------------------------------------------------------------------
+__fastcall TSplashForm::TSplashForm(TComponent* Owner)
+	: TForm(Owner)
+{
+	m_lblProgress->ControlStyle>>csOpaque;
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TSplashForm::ShowProgress( String strMsg )
+{
+	m_lblProgress->Caption = strMsg;
+	Update();
+}
+//---------------------------------------------------------------------------
+