微软.net精简框架常见问题及回答(中文版)(71)

王朝c#·作者佚名  2006-01-09
窄屏简体版  字體: |||超大  

private void _Click(object o, EventArgs e)

{

this.Enabled = false;

this.bShow.Text = "waiting for dlg";

dlg.Show();

}

public void DialogResultCallback(DialogResult result)

{

MessageBox.Show("dialog returned: " + (result == DialogResult.OK ? "OK" : "Cancel"));

this.Enabled = true;

this.bShow.Text = "Show Dialog:" + ++counter;

}

public static void Main()

{

Application.Run(new Test());

}

}

public class ModelessDialog : Form

{

IModelessDialogCallback parent;

Button bOK, bCancel;

public ModelessDialog(IModelessDialogCallback parent)

{

this.parent = parent;

this.Text = "Modeless Dialog";

this.bOK = new Button();

this.bOK.Parent = this;

this.bOK.Bounds = new Rectangle (10, 10, 150, 30);

this.bOK.Text = "OK";

this.bOK.Click += new EventHandler(this._Click);

this.bCancel = new Button();

this.bCancel.Parent = this;

this.bCancel.Bounds = new Rectangle (10, 50, 150, 30);

this.bCancel.Text = "Cancel";

this.bCancel.Click += new EventHandler(this._Click);

}

private void _Click(object o, EventArgs e)

{

this.Hide();

this.parent.DialogResultCallback(o == this.bOK ? DialogResult.OK : DialogResult.Cancel);

}

protected override void OnClosing(CancelEventArgs e)

{

e.Cancel = true;

this.Hide();

this.parent.DialogResultCallback(DialogResult.Cancel);

}

}

'VB

Imports System

Imports System.Drawing

Imports System.Windows.Forms

Imports System.Collections

Imports System.ComponentModel

Public Interface IModelessDialogCallback

Sub DialogResultCallback(result As DialogResult)

End Interface IModelessDialogCallback'

Public Class Test

Inherits System.Windows.Forms.Form

Implements IModelessDialogCallback

Private dlg As ModelessDialog

Private bShow As Button

Private counter As Integer = 0

Protected Overrides Sub OnLoad(e As EventArgs)

Me.Text = "Modal(less) Dialog Example"

Me.bShow = New Button()

Me.bShow.Parent = Me

Me.bShow.Bounds = New Rectangle(10, 10, 150, 30)

Me.bShow.Text = "Show Dialog"

AddHandler Me.bShow.Click, AddressOf Me._Click

Me.dlg = New ModelessDialog(Me)

End Sub 'OnLoad

Private Sub _Click(o As Object, e As EventArgs)

Me.Enabled = False

Me.bShow.Text = "waiting for dlg"

dlg.Show()

End Sub '_Click

第一頁    上一頁    第71頁/共78頁    下一頁    最後頁
第01頁 第02頁 第03頁 第04頁 第05頁 第06頁 第07頁 第08頁 第09頁 第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頁 第36頁 第37頁 第38頁 第39頁 第40頁 
第41頁 第42頁 第43頁 第44頁 第45頁 第46頁 第47頁 第48頁 第49頁 第50頁 
第51頁 第52頁 第53頁 第54頁 第55頁 第56頁 第57頁 第58頁 第59頁 第60頁 
第61頁 第62頁 第63頁 第64頁 第65頁 第66頁 第67頁 第68頁 第69頁 第70頁 
第71頁 第72頁 第73頁 第74頁 第75頁 第76頁 第77頁 第78頁 
 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航