如果程序在裝載時需要進行較長時間的處理，最好使用啟動畫面，一方面美化程序，一方面可以不使用戶面對著一片空白的程序界面。我手頭上一個小項目主界面啟動時需要檢查用戶文件及運行環境是否有效，需要一段時間處理，因此想到要添加一個啟動畫面，在網上搜了一陣，發現下面兩個方案：1、用C#給程序加啟動畫面并只允許一個應用程序實例運行http://www.zahui.com/html/14/36790.htm2、HOW TO:濺射屏幕(Splash Screen),也叫程序啟動畫面的制作(.NET2003)http://lzmtw.VEVb.com/archive/2005/10/31/265782.html第一個方案在實現與界面分離上做得不夠好，啟動界面(一個窗體)依賴于特定窗體，主窗體還必須添加一個PReLoad方法完成裝載任務，只能在代碼級重用。而且那個只允許一個實例的寫法也太....第二個方案框架很好，但細微處理可能存在一點問題，需要判斷主窗體的WindowState，整個代碼也較復雜。我改動了一下，基本結構仿照第二個方案。功能:為程序添加啟動界面，顯示啟動界面的同時加載主窗體，主窗體加載完畢后關閉啟動界面，顯示主窗體。啟動畫面停留的時間是設定的時間和主窗體裝載所需時間兩個的最大值。啟動畫面在另一個線程上運行。plus:我的水平還很差，見笑。程序代碼如下：//啟動窗體虛基類,繼承自applicationContextusing System.Windows.Forms;using System.Threading;using System;//啟動畫面虛基類,啟動畫面會停留一段時間，該時間是設定的時間和主窗體構造所需時間兩個的最大值public abstract class SplashScreenApplicationContext : ApplicationContext{private Form _SplashScreenForm;//啟動窗體private Form _PrimaryForm;//主窗體private System.Timers.Timer _SplashScreenTimer;private int _SplashScreenTimerInterVal = 5000;//默認是啟動窗體顯示5秒private bool _bSplashScreenClosed = false;private delegate void DisposeDelegate();//關閉委托，下面需要使用控件的Invoke方法，該方法需要這個委托public SplashScreenApplicationContext(){this.ShowSplashScreen();//這里創建和顯示啟動窗體this.MainFormLoad();//這里創建和顯示啟動主窗體}protected abstract void OnCreateSplashScreenForm();protected abstract void OnCreateMainForm();protected abstract void SetSeconds();protected Form SplashScreenForm{set{this._SplashScreenForm = value;}}protected Form PrimaryForm{//在派生類中重寫OnCreateMainForm方法，在MainFormLoad方法中調用OnCreateMainForm方法//,在這里才會真正調用Form1(主窗體)的構造函數，即在啟動窗體顯示后再調用主窗體的構造函數//，以避免這種情況:主窗體構造所需時間較長,在屏幕上許久沒有響應，看不到啟動窗體set{this._PrimaryForm = value;}}protected int SecondsShow{//未設置啟動畫面停留時間時，使用默認時間set{if (value != 0){this._SplashScreenTimerInterVal = 1000 * value;}}}private void ShowSplashScreen(){this.SetSeconds();this.OnCreateSplashScreenForm();this._SplashScreenTimer = new System.Timers.Timer(((double)(this._SplashScreenTimerInterVal)));_SplashScreenTimer.Elapsed += new System.Timers.ElapsedEventHandler(new System.Timers.ElapsedEventHandler(this.SplashScreenDisplayTimeUp));this._SplashScreenTimer.AutoReset = false;Thread DisplaySpashScreenThread = new Thread(new ThreadStart(DisplaySplashScreen));DisplaySpashScreenThread.Start();}private void DisplaySplashScreen(){this._SplashScreenTimer.Enabled = true;Application.Run(this._SplashScreenForm);}private void SplashScreenDisplayTimeUp(object sender, System.Timers.ElapsedEventArgs e){this._SplashScreenTimer.Dispose();this._SplashScreenTimer = null;this._bSplashScreenClosed = true;}private void MainFormLoad(){this.OnCreateMainForm();while (!(this._bSplashScreenClosed)){Application.DoEvents();}DisposeDelegate SplashScreenFormDisposeDelegate = new DisposeDelegate(this._SplashScreenForm.Dispose );this._SplashScreenForm.Invoke(SplashScreenFormDisposeDelegate);this._SplashScreenForm = null;//必須先顯示，再激活，否則主窗體不能在啟動窗體消失后出現this._PrimaryForm.Show();this._PrimaryForm.Activate();this._PrimaryForm.Closed += new EventHandler(_PrimaryForm_Closed);}private void _PrimaryForm_Closed(object sender, EventArgs e){base.ExitThread();}}使用方法:定義一個啟動類，應用程序從啟動類啟動，該類會使用繼承自啟動窗體虛基類的一個啟動窗體類，在該類中定義啟動窗體和主窗體。啟動窗體和主窗體的代碼略去，注意要刪除機器生成的窗體代碼的Main方法部分。public class StartUpClass{[STAThread]static void Main(){Application.Run(new mycontext());}}//啟動窗體類(繼承自啟動窗體虛基類),啟動畫面會停留一段時間，該時間是設定的時間和主窗體構造所需時間兩個的最大值public class mycontext : SplashScreenApplicationContext{protected override void OnCreateSplashScreenForm(){this.SplashScreenForm = new FormStart();//啟動窗體}protected override void OnCreateMainForm(){this.PrimaryForm = new FormMain();//主窗體}protected override void SetSeconds(){this.SecondsShow = 2;//啟動窗體顯示的時間(秒)}}程序在vs2003下調試通過HOW TO:濺射屏幕(Splash Screen),也叫程序啟動畫面的制作(.NET2003)Posted on 2005-10-31 20:40水如煙(LzmTW)閱讀(1800)評論(1)編輯收藏網摘所屬分類:n、HOW TO系列-->Author:水如煙(LzmTW) 看到有人提起,就想動手做做。可能要花兩天時間，因為時間是零零碎碎的。 哎，很多常用的東西，在2005版已經有了。當初看到好多人寫基于2003的控件，這2005一出哪，全都沒用了。心血白費了。這微軟未免也太缺德了。應該說，2003是.NET的試用版，到了2005才算是正式版吧。或許基于2005的自寫控件、組件壽命會長一些。否則，不罵娘才怪。 現在寫寫，也算是練練習吧。 濺射屏幕，即SplashScreenForm，有以下特點： 首先,程序是主窗體程序; 其次,SplashScreenForm在主窗體加載完畢后退出。 一般來說，SplashScreenForm比較簡潔，窗體的內容只是顯示程序主題、版權等信息；復雜些的，顯示主程序的加載項目情況。 微軟的SplashScreenForm向來簡潔，Adobe的復雜些，就畫窗體也花了一番心思。以下做的，以微軟的作標準。 按照功能實現與界面分離的原則，這個類當然不能依賴于某個特定的SplashScreenForm或MainForm。參考了.NET2005的做法，繼承了System.Windows.Forms.ApplicationContext做了一個SplashScreenApplicationContextClass基類。具體使用時，再繼承這個類賦與特定參數，交Application.Run(ApplicationContext)來運行。因為基礎知識不好，好多東西只知道用而不知為什么這樣用，免不了的會出現這樣那樣的問題，請指正。 總體思路是：濺射屏幕顯示的同時加載主窗體，主窗體加載完畢后關閉濺射屏幕，程序交給主窗體。濺射屏幕顯示的時間由兩個因素決定，一個是事前設定的濺射屏幕顯示的時間，一個是主窗體加載所需要的時間，實際顯示時間是兩者中的最大值。 SplashScreenApplicationContextClass為什么要做為基類設計并要實現？主要考慮到主窗體在初始化時就需要時間，Sub New()是需要時間的，并非所有的程序都將初始事項放到Load()里頭。類：Imports System.Windows.FormsImports System.ThreadingPublic MustInherit Class SplashScreenApplicationContextClassInherits System.Windows.Forms.ApplicationContextPrivate _SplashScreenForm As FormPrivate _SplashScreenTimer As System.Timers.TimerPrivate _SplashScreenTimerInterVal As Integer = 5000Private _MainFormFinshLoad As Boolean = FalsePrivate _MainFormWindowState As Windows.Forms.FormWindowStatePrivate _CloseSplashScreen As Boolean = FalsePrivate Delegate Sub DisposeDelegate()Protected WriteOnly Property SplashScreenForm() As FormSet(ByVal Value As Form)Me._SplashScreenForm = ValueEnd SetEnd PropertyProtected WriteOnly Property SecondsShow() As IntegerSet(ByVal Value As Integer)If Value <> 0 ThenMe._SplashScreenTimerInterVal = 1000 * ValueEnd IfEnd SetEnd PropertySub New()Me.ShowSplashScreen()Me.MainFormLoad()End SubPrivate Sub DoEvents()Application.DoEvents()End SubProtected MustOverride Sub OnCreateSplashScreenForm()Protected MustOverride Sub OnCreateMainForm()Protected MustOverride Sub SetSeconds()Private Sub ShowSplashScreen()Me.SetSeconds()Me.OnCreateSplashScreenForm()Me._SplashScreenTimer = New System.Timers.Timer(CType(Me._SplashScreenTimerInterVal, Double))AddHandler _SplashScreenTimer.Elapsed, New System.Timers.ElapsedEventHandler(AddressOf Me.SplashScreenDisplayTimeUp)Me._SplashScreenTimer.AutoReset = FalseDim DisplaySpashScreenThread As New Thread(New ThreadStart(AddressOf Me.DisplaySplashScreen))DisplaySpashScreenThread.Start()End SubPrivate Sub DisplaySplashScreen()Me._SplashScreenTimer.Enabled = TrueApplication.Run(Me._SplashScreenForm)End SubPrivate Sub SplashScreenDisplayTimeUp(ByVal sender As System.Object, ByVal e As System.timers.ElapsedEventArgs)Me._SplashScreenTimer.Dispose()Me._SplashScreenTimer = NothingMe._CloseSplashScreen = TrueEnd SubPrivate Sub MainFormLoad()Me.OnCreateMainForm()_MainFormWindowState = Me.MainForm.WindowState '保存主窗體狀態Me.MainForm.WindowState = FormWindowState.Normal '非Normal情形下，主窗體會Show出來AddHandler Me.MainForm.Load, New EventHandler(AddressOf Me.MainFormLoadingDone)End SubPrivate Sub MainFormLoadingDone(ByVal sender As Object, ByVal e As EventArgs)RemoveHandler Me.MainForm.Load, New EventHandler(AddressOf Me.MainFormLoadingDone)Do While Not Me._CloseSplashScreenMe.DoEvents()LoopMe.HideSplashScreen()End SubPrivate Sub HideSplashScreen()MainFormActivate()'先激活主窗體再關閉啟動窗體，是為了保證程序為當前活動程序Dim SplashScreenFormDisposeDelegate As DisposeDelegate = New DisposeDelegate(AddressOf Me._SplashScreenForm.Dispose)Me._SplashScreenForm.Invoke(SplashScreenFormDisposeDelegate)Me._SplashScreenForm = NothingEnd SubPrivate Sub MainFormActivate()If _MainFormWindowState = FormWindowState.Minimized Then _MainFormWindowState = FormWindowState.NormalIf Me.MainForm.WindowState <> _MainFormWindowState Then Me.MainForm.WindowState = _MainFormWindowStateMe.MainForm.Activate()End SubEnd Class使用：（SplashScreenForm我還是隨便用一個Form來代替）Public Class AppPublic Shared Sub Main()Dim t As New MyContextApplication.Run(t)End SubEnd ClassPublic Class MyContextInherits SplashScreenApplicationContextClassProtected Overrides Sub OnCreateMainForm()Me.MainForm = New Form2End SubProtected Overrides Sub OnCreateSplashScreenForm()Me.SplashScreenForm = New Form1End SubProtected Overrides Sub SetSeconds()Me.SecondsShow = 3 '顯示3秒,若是0則取默認值5秒End SubEnd Class