2006年4月14日

在这里工作也有半年了,有得有失. 近来心里十分的茅盾, 项目已经黄色第5周了.我还是没有去改变它. 我不知道是自己不行, 还是自己不想. 学了不多的自我激励方法, 可是都不见效果. 也知道这个时候只有自己才能解救自己.

posted @ 2006-11-21 13:25 rodney 阅读(365) | 评论 (0)编辑 收藏
 
以下内容转载于http://www.aspxboy.com/private/5294/default.aspx,感谢该作者的分享.
1.     如何设置一个From的边界

2.     如何建立一个透明的From

3.     如何设置窗体在屏幕中的位置

4.     如何使最小化和最大化按钮不可用

5.     如何使一个窗体不见

6.     如何设置使窗体成为非矩形的.

7.     如何使一个窗体在屏幕的最顶端.

8.     如何显示一个Model和非Model的窗体

9.     如何制作一个MDI的窗体

10.  如何将你的窗体不显示在任务条上.

11.  如何制作一个带启动屏幕的窗体.

12.  如何使你的窗体TrayIcon.

13.  如何修改控制窗体的尺寸和长宽尺寸.

14.  如何建立一个Windows Explorer风格的窗体.

15.  如何设置初始的启动窗体

16.  如何建立一个有背景图像的窗体
==========================================================================================

1.     如何设置一个From的边界

form总共有七种不同的边界风格让你设置,你可以在设计时刻也可以运行时通过代码动态的来设置它.这七种边界风格分别是:

none (System.Windows.Forms.FormBorderStyle.None )

fixed 3D (System.Windows.Forms.FormBorderStyle.Fixed3D)

fixed Dialog (System.Windows.Forms.FormBorderStyle.FixedDialog)

fixed Single(System.Windows.Forms.FormBorderStyle.FixedSingle)

fixed Tool Window(System.Windows.Forms.FormBorderStyle.FixedToolWindow)

sizable(system.windows.forms.formborderstyle.sizable)

sizable  Tool Window

(system.windows.forms.formborderstyle.sizabletoolwindow)

在设计方式下在vs.net IDE的 Properties window中设置FormBorderStyle属性就可以了.

在运行方式下你可以用代码来完成:

dlgbx1.formborderstyle = System.Windows.Forms.FormBorderStyle.FixedDialog
这七种边界类型VB6中就有,没有什么大的变化,运行方式下你需要对照不同的枚举变量进行设置.

 

2.     如何建立一个透明的From

你可以通过两种方法在设计时刻和运行时刻来做到这一点.

设计时刻,你可以在vs.net IDE的 Properties window, 设置Opacity 属性达到这个效果.这个值从0.0到1.0 . 0表示完全透明,1.0表示完全不透明.

运行时刻你可以用下面的编码设置窗体的opactiy属性来做到.具体:

frmtransparentform.opacity = 0.76; ( C# )

看得出现在很简单了,你已经不用再去了解什么alpha变量了.透明始终只是一种效果,不要滥用它.

 

3.     如何设置窗体在屏幕中的位置

你可以设置窗体的startposition属性,vs.net一般给你一个保守的选项” WindowsDefaultLocation“ 这样系统在Load窗体时将根据用户当前的计算机设置来确定一个值,你也可以在设计时将它改成另一个值”Center”.

如果你一定要在设计方式下确定窗体在屏幕出现的位置你可以先设置startposition为manual,然后设置location的x和y的值.

运行时用代码实现似乎更简洁一些:

  Form1.Location = new Point (100, 100) ( VB.NET )
当然你也可以分别修改的Location的X和Y值,对应的是窗体的Left和Top属性,比如:

form1.left += 200 ( VB.NET )

form1.top -= 100 ( VB.NET )

另外一个属性将也将影响窗体在屏幕的位置:desktoplocation 这个属性主要是在你设置窗体的位置相对于任务栏时非常实用(当你把任务条放在屏幕的顶或左边时,其实相应改动了desktop coordinates (0,0)),你可以这样设置这个不出现在设计属性窗口中的属性,

form1.desktoplocation = new Point (100,100)

窗体在屏幕中的位置将主要取决于各自用户具体的硬件和设置情况,所以保守的作法是用默认的” WindowsDefaultLocation”或 ”Center”;专业的作法是自己先获取系统的设置然后编码动态计算后进行设置,不然很容易在屏幕上找不到你的窗体.

 

4.     如何使最小化和最大化按钮不可用

在设置窗体的form.minimizebox和form.maximizebox 当为True时表示显示,False时表示不可.用编程方式见下:

frmmaxmin.minnimizebox = False ( VB.NET)

frmmaxmin.maxmnimizebox = True  ( VB.NET )

 

5.     如何使一个窗体不见

我想最直接的办法是你调用 Hide()方法来做到这一点.不过我想提供另一种方法,看了之后你会获得一些其它的启发. ( VB.NET )

    Private Const WS_EX_TOOLWINDOW As Int32 = &H80

    Private Const WS_POPUP As Int32 = &H80000000

    Private Const WS_VISIBLE As Int32 = &H10000000

    Private Const WS_SYSMENU As Int32 = &H80000

    Private Const WS_MAXIMIZEBOX As Int32 = &H10000

 

    Protected Overrides ReadOnly Property CreateParams() As System.Windows.Forms.CreateParams

        Get

            Dim cp As System.Windows.Forms.CreateParams

            cp = MyBase.CreateParams

            cp.ExStyle = WS_EX_TOOLWINDOW

            cp.Style = WS_POPUP Or WS_VISIBLE Or WS_SYSMENU Or WS_MAXIMIZEBOX

            cp.Height = 0

            cp.Width = 0

            Return cp

        End Get

    End Property

    原来是把Height 和Width都设置成0 ,我想这种方式和Hide()调用的底层可能是不同的。

 

6.     如何设置使窗体成为非矩形的.

这个问题我想我提供的不是最专业的作法,至少它还不能达到我期望的那样,也就是说它在某些事件中它还会变回矩形.但至少我可以告诉你:如果试图调用原来的win32’s API SetWindowRng是不行的,我曾如此的尝试过.现在你可能需要知道有关窗体的Region属性

     ' // ( VB.NET ) 

    Public Sub SetWindowRegion()

 

        Dim FormPath As System.Drawing.Drawing2D.GraphicsPath

        Dim Reg As Drawing.Region

        Dim lRet As Long

 

        FormPath = New Drawing2D.GraphicsPath()

        FormPath.AddEllipse(New Rectangle(0, 0, 250, 120))

 

        Me.Region = New Region(FormPath)

 

    End Sub

 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Me.Region = Nothing

        SetWindowRegion()

    End Sub

 

    Protected Overrides Sub OnResize(ByVal e As System.EventArgs)

          Me.Region = Nothing

          SetWindowRegion()

    End Sub

 

7.     如何使一个窗体在屏幕的最顶端.

这是很实用的一个功能,现在你不用在调用其它api了,只用设置topmost 属性为True就可以了.对于这个属性在设计时刻和运行时刻都是可以进行修改的.代码方式:

         myTopForm.TopMost = True ( VB.NET)
 

8.     如何显示一个Model和非Model的窗体

model和modeless的窗体主要将取决于你的应用,最多的是用在显示对话框.当你需要model的窗体时你调用myform. ShowDialog而非Model的调用MyForm.Show,对于ShowDialog有一个可选参数ower可以让你为一个窗体建立父子关系.比如:

' Visual Basic
Private Sub mnuAbout_Click(…args…)
   Dim f As New FormOption
   f.ShowDialog Me
End Sub
有一点需要注意的是对于ShowDialog来说,当执行到这一句,窗体显示,但这之后的代码将不会执行,只到窗口关闭之后才继续执行,而对于Show来说是即时的,显示窗体之后将立即执行下面的代码.
9.     如何制作一个MDI的窗体

1.     建立一个新的Windows Application项目

2.     分别加入两个窗体Form1 、Form2

3.     设置Form1的IsMdiContainer属性为True。使它成为MDI主窗体。

4.     在Form2中加入一个RichTextBox控件,并设置Dock为:Fill

5.     在Tools 窗体中拖一个MainMenu到窗体Form1,然后建立一个菜单File|Windows|Help三个菜单项,File中包括New、Exit菜单项;Windows中包括Cascade、Horizontal等。

6.     设置Windows菜单项的MdiList属性=True, 这样每一个MDI子窗口将自动加在Windows菜单项下面。

7.     双击New菜单项,然后加入以下代码:

     private void menuNew_Click(object sender, System.EventArgs e)

     {

         Form2  NewMdiChild ;

         NewMdiChild = new Form2() ;

         NewMdiChild.MdiParent = this ;

         NewMdiChild.Show() ;

 

     }

8.     在Windows的Cascade等菜单项中加入以下代码:

     private void menuWindowCasca_Click(object sender, System.EventArgs e)

     {

         this.LayoutMdi( MdiLayout.Cascade) ;

        

     }

另外还有以下常用的:

this.layoutmdi(mdilayout.tilehorizontal);

this.layoutmdi(mdilayout.tilevertical);

9.     F5运行。

最终版的vs.net 不知是否会有一个通用的模板,不过用完全手工的方式产生一个MDI的窗口,显得有些繁琐,不如VS.NET的IDE方式下那么简洁。

 

10.     如何将你的窗体不显示在任务条上.

当窗体的边界风格是tools Window时它都不会出现在任务条上的.另外上面标题5中介绍的方法不仅窗体看不见,也不会出现在任务条上.

    如果你现在在Dotnet的世界,这件事也变的简单,任何的Winform窗体现在都有ShowInTaskbar属性,所以你只要简单的设置这个属性就可以了。同样你可以选择在属性窗口中将ShowInTaskbar由True改为False。或是用代码的方式:

    MyTaskBarFrm.ShowInTaskbar = false ; ( C# )

 

11.     如何制作一个带启动屏幕的窗体.

需要你准备两个winform的窗体,一个叫它:splashscreen,把它做成一个漂亮的窗体。然后你需要一个主窗体叫它:form1吧,然后在这个窗体加入下面的代码。

     // ( C# )

     protected override void OnLoad ( System.EventArgs e )

     {

         //make load take a long time

         Thread.Sleep(2000);

 

         base.OnLoad(e);

 

     }

然后在main中加入这样的代码:

     [STAThread]

     static void Main()

     {

         SplashScreen splashForm = new SplashScreen();

         splashForm.Show();

 

         Form1 mainForm = new Form1() ;

         mainForm.Load += new EventHandler(splashForm.MainScreen_Load);

         Application.Run(mainForm);

 

     }

不要忘了加上对threading的引用: using System.Threading;

 

12.     如何使你的窗体TrayIcon.

实现这个功能你可以运用notifyicon控件来达到,从tools Windows中将NotifyIcon拖到你的窗体上然后在下面的事件加入如下代码,F5。

    

   ' // VB.NET

    Private mIconA As Icon = New Icon("Icon1.ico")

    Private mIconB As Icon = New Icon("Icon2.ico")

    Private mIconDisplayed As Boolean

   

    Public Sub New()

        MyBase.New

 

        Form1 = Me

 

        'This call is required by the Win Form Designer.

        InitializeComponent

 

        'TODO: Add any initialization after the InitializeComponent() call

       

        'this form isn't used directly so hide it immediately

        Me.Hide()

       

        'setup the tray icon

        Initializenotifyicon()

    End Sub

   

    Private Sub Initializenotifyicon()

        'setup the default icon

        notifyicon = New System.Windows.Forms.NotifyIcon()

        NotifyIcon.Icon = mIconA

        NotifyIcon.Text = "Right Click for the menu"

        NotifyIcon.Visible = True

        mIconDisplayed = True

 

        'Insert all MenuItem objects into an array and add them to

        'the context menu simultaneously

        Dim mnuItms(3) As MenuItem

        mnuItms(0) = New MenuItem("Show Form...", New EventHandler(AddressOf Me.ShowFormSelect))

        mnuItms(0).DefaultItem = True

        mnuItms(1) = New MenuItem("Toggle Image", New EventHandler(AddressOf Me.ToggleImageSelect))

        mnuItms(2) = New MenuItem("-")

        mnuItms(3) = New MenuItem("Exit", New EventHandler(AddressOf Me.ExitSelect))

        Dim notifyiconMnu As ContextMenu = New ContextMenu(mnuItms)

        notifyicon.ContextMenu = notifyiconMnu

    End Sub

 

    Public Sub ShowFormSelect(ByVal sender As Object, ByVal e As System.EventArgs)

        'Display the settings dialog

        Dim SettingsForm As New SettingsForm()

        SettingsForm.ShowDialog()

 

    End Sub

 

    Public Sub ToggleImageSelect(ByVal sender As Object, ByVal e As System.EventArgs)

        'called when the user selects the 'Toggle Image' context menu

 

        'determine which icon is currently visible and switch it

        If mIconDisplayed Then

            'called when the user selects the 'Show Form' context menu

            NotifyIcon.Icon = mIconB

            NotifyIcon.Text = "Sad"

            mIconDisplayed = False

        Else

            NotifyIcon.Icon = mIconA

            NotifyIcon.Text = "Happy"

            mIconDisplayed = True

        End If

 

    End Sub

 

    Public Sub ExitSelect(ByVal sender As Object, ByVal e As System.EventArgs)

        'called when the user selects the 'Exit' context menu

 

        'hide the tray icon

        NotifyIcon.Visible = False

 

        'close up

        Me.Close()

    End Sub

 

    'Form overrides dispose to clean up the component list.

    Public Overloads Overrides Sub Dispose()

        MyBase.Dispose()

        components.Dispose()

    End Sub

    图标文件你自己准备了,如果成功你可以看到有关NotifyIcond的各种功能了。

 

13.     如何修改控制窗体的尺寸和长宽尺寸.

主要是修改winform的size, Width 和Height属性。同样它们都是可以在设计和运行时刻进行修改和设置。

form1.size = New System.Drawing.Size(100, 100) ( VB.NET )

form1.width += 100  (VB.NET )

form1.height -= 20  (VB.NET )

 

14.     如何建立一个Windows Explorer风格的窗体.

1.建立一个新的windows Application

2.从toolbox窗口拖一个treeview控件、、一个splitterk控件、一个listview控件,分别在属性窗口中设置treeview的dock属性为::left;设置listview控件的dock属性为:fill

3: F5 运行

 

15.     如何设置初始的启动窗体

无论是c#还是visual Basic的Winform项目中你都可以在Solution Explorer窗口中右键你的Project,然后选择属性,从你Project的属性页中选择你启动的窗体或是Main()方法。

有些不同的是在目前的vs.net Beta2中C#项目会自动产生Main() 方法,Visual Basic.Net 的项目中你必须自己添加Main()代码,C#中你可以将Form1改成任何你可以启动的窗体名:

     // ( C# )

        static void Main()

        {

            Application.Run(new Form1());

        }

 

16.     如何建立一个有背景图像的窗体

现在的winform中所有的窗体都有一个backgroundimage属性,只用对它赋值就可以了。普通窗体可以在运行模式也可以在运行模式完成这个设置。比如在initializecomponent()或窗体的构造函数中加入这样的代码:

this.backgroundimage = new Bitmap("C:\\DotNetApp\\WinForm\\Tile.bmp" ) ;

    对于MDI的主窗体要麻烦一些,在VS.NET的IDE窗体中,当你设置完IsMdiContainer属性为True后,你需要查看一下InitializeComponent()中是否有这样的代码 ( C# ):

            this.mdiClient1.Dock = System.Windows.Forms.DockStyle.Fill;

            this.mdiClient1.Name = "mdiClient1";

或是在窗口的属性窗口组合框中看到mdiclient1 System.Windows.Forms.mdiClient.这就是主MDI窗口,不过我没有在dotnet的文档中找到任何有关System.Windows.Forms.mdiClient的说明。然后你可以在InitializeComponent()或窗体的构造函数中加入这样的代码( C# ):

this.mdiclient1.backgroundimage  = new Bitmap("C:\\DotNetApp\\WinForm\\Tile.bmp" ) ;

    网上有一个ImageView的例子,里面演示了给MDI主窗体中背景上加入一行Logo文字的方法,这样使你的MDI窗体看起来很商业化,具体的你可以这样做:

1.   先在VS.NET 自动产生代码的InitializeComponent中看是否有这样的语句( C# ):

this.controls.addrange(new System.Windows.Forms.Control[] {this.mdiClient1});

    又是这个mdiClient (haha)

2.   建立以下两个函数用于显示这个Logo字符:

// ( C# )

        protected  void Mdi_OnPaint (  Object s,  System.Windows.Forms.PaintEventArgs e )

        {

            Control c = (Control)s;

           

 

            Rectangle r1 = c.ClientRectangle;

            r1.Width -= 4;

            r1.Height -= 4;

 

            Rectangle r2 = r1;

            r2.Width -= 1;

            r2.Height -= 1;

 

            Font f = new Font("Tahoma", 8);

 

            String str = "MyWinform.NET ?2001 MyWinform Application V1.0";

 

            StringFormat sf = new StringFormat();

            sf.Alignment = StringAlignment.Far;

            sf.LineAlignment = StringAlignment.Far;

 

            e.Graphics.DrawString(str, f, new SolidBrush(SystemColors.ControlDarkDark), r1, sf);

            e.Graphics.DrawString(str, f, new SolidBrush(SystemColors.ControlLight), r2, sf);

 

        }

 

        protected  void Mdi_OnResize ( Object s ,  System.EventArgs e )

        {

           

            Control c = (Control)s;

            c.Invalidate();

        }

3.   在InitializeComponent()或窗体的构造函数中加入这样的代码:

( C# )

    this.Controls[0].Paint += new PaintEventHandler( Mdi_OnPaint ) ;

    this.Controls[0].Resize += new EventHandler( Mdi_OnResize ) ;

        注意将它加在InitializeComponent()后面或是在InitializeComponent函数中this.Controls.AddRange函数之后。

posted @ 2006-05-10 10:01 rodney 阅读(565) | 评论 (0)编辑 收藏
 

昨天下班是计算机已经关机了。可今天早上一开到启动Windows时系统一片蓝屏。我用安全模式也进入不了。后来把硬盘拆下来,安装到同事的机子上进行硬盘检查。如果分区,坏道等。结果没有什么问题,但为了资料的安全,我把有用的资料都copy到他机子上。把硬盘重新安装回我的机子上。结果怎么样。。。
神了一点问题也没有。真是虚惊一场呀。

posted @ 2006-04-25 09:33 rodney 阅读(703) | 评论 (0)编辑 收藏
 

我用记事本打开一个以前的分页程序。把其中的一部份代码copy到我的现在的程序中,可是编译器提示illegal character \12288错误。我按它提示的错误找到发生错误的行。我用别的变量名试了一下是可以的。难道是这个变量名输入时用了中文的输入法。我check一下,可是还是没有解决。我又重新声明了一个与这个变量名一样的变量,把原来的注释起来。后来发现可以了,我再把现在的注释掉,用原来的变量,还是不行。我把它删除掉重新写了一遍包括空格也删除。OK,就可以了。我想可能还是有中文的输入字符或是空格。

以面的问题可真是不是问题的问题,如果遇到同样的问题的朋友看看是否也是犯了同样的错。

最后发现是一个中文的空格,我在删除该变量时发现有一个空格的距离较大。

posted @ 2006-04-21 09:37 rodney 阅读(1018) | 评论 (0)编辑 收藏
 

因我的机子内存才512M要运行JBuilder2006,还要运行oracle9i时速度很慢,所以我先把oracle的几个服务关了。后来我要使用oracle是一直连接不上,提示“没有TNS监听”。我一查看服务,果然那个oracleOraHome90TNSListener没有启动,我一接点击启动,可还是提示那句没有TNS监听。这是为什么呢?lt;br />第一种可能是否把计算机名改了。如果是就按下面的步骤做?lt;br />把安装目录下的listener.ora打开察看。如:d:\oracle\ora90\network\admin\listener.ora.
打开该配置文件后发现如下一段配置信息:
LISTENER =
  (DESCRIPTION_LIST =
    (DESCRIPTION =
      (ADDRESS_LIST =
        (ADDRESS = (PROTOCOL = IPC)(KEY = EXTPROC0))
      )
      (ADDRESS_LIST =
        (ADDRESS = (PROTOCOL = TCP)(HOST = local)(PORT = 1521))
      )
    )
  )
看到这一行HOST=local这个是计算机名字,这个名字要与现在的计算机名对应。如果不知道自己的计算机名是什么可以到“我的电脑”的属性中有一个“网络标识”的tab?你在完整的计算机名称后面看到的就是你的计算机名了?lt;br />以下内容转载http://www3.ccw.com.cn/club/essence/200202/8252.htm版权归原作?
近来,浏览BBS时,常看到“急急急!如何启动OMS?”的字眼,就针对以上这类问题,我有些经验想和大家共同分享?lt;br />能否正常启动OEM或OMS关键有以下两点:
    第一.Oracle的系统服务是否开启;
    第二.登录时用的用户名和口令是否正确?lt;br />
    那么先针对第一点谈谈Oracle的系统服务。在完全安装的情况下,Oracle的系统服务共?1项:
    1.Oracle OLAP 9.0.1.0.1
    2.Oracle OLAP Agent
    3.OracleOraHome90Agent
    4.OracleOraHome90ClientCache
    5.OracleOraHome90HTTPServer
    6.OracleOraHome90ManagementServer(0.5M)
    7.OracleOraHome90PagingServer
    8.OracleOraHome90SNMPPeerEncapsulator
    9.OracleOraHome90SNMPPeerMasterAgent
    10.OracleOraHome90TNSListener(5.2M)
    11.OracleServiceORACLE(70M)
        (注:OraHome90是可以在安装时改变的Oracle的主目录名称,是安装时的默认?

    其中最重要的服务有3个,分别是OracleOraHome90ManagementServer、OracleOraHome90TNSListener?lt;br />OracleServiceORACLE。下面就来看一下有哪些启动错误与它们有关?lt;br />
    1.Oracle系统提示:Ora-12541:TNS:没有监听器;
    2.操作系统提示:在本地计算机无法启动OMS服务
                     错误?053:服务并未及时响应来控制请求附带?lt;br />    以上两种错误提示大都是由OracleOraHome90TNSListener监听服务引起的?lt;br />解决方法:控制面?>管理工具->服务->右键单击“OracleOraHome90TNSListener”,再单击“启动”?lt;br />
    3.Oracle系统提示:Ora-12500:TNS:监听程序无法启动专用服务器进程;
    该错误是由OracleServiceORACLE专用服务器进程引起的?lt;br />解决方法:控制面?>管理工具->服务->右键单击“OracleServiceORACLE”,再单击“启动”?lt;br />
    4.Oracle系统提示:VTK-1000:无法连接到Management Server?lt;br />                       请验证您已输入Oracle Management Server的正确主机名和状态?lt;br />    该错误引起的原因有两种,一是OracleOraHome90ManagementServer还没启动;二是没有输入主机名?lt;br />解决方法:控制面?>管理工具->服务->右键单击“OracleOraHome90ManagementServer”,再单击“启动?
或是输入您这台计算机的完整名称?lt;br />小结:这三个服务的启动或关闭还有先后的顺序。一般来讲,启动时必须先启动OracleOraHome90TNSListener启动OracleOraHome90ManagementServer或OracleServiceORACLE,在启动OracleOraHome90ManagementServer时,同时也启动了OracleServiceORACLE。而关闭时必须先关闭OracleOraHome90ManagementServer再关闭OracleOraHome90TNSListener或OracleServiceORACLE,关闭OracleOraHome90ManagementServer时,若有提示输入用户名和口令,请输入sysman的用户名和口令,以确保成功的执行。有些其他提示如:资源已被占用,I/O重复,端口已被使用等等之类的话,那最好与系统管理员联系,再寻求解决办法?lt;br />

 

posted @ 2006-04-20 08:52 rodney 阅读(1012) | 评论 (1)编辑 收藏
 

type Status report

message /zz3in1/SrvTest

description The requested resource (/zz3in1/SrvTest) is not available.
这是为什呢?
用过了../../SrvTest 这个是不行的。././SrvTest这样可以。还有./SrvTest也可以。

posted @ 2006-04-17 17:01 rodney 阅读(351) | 评论 (0)编辑 收藏
 
用document.getElementById("01").innerHTML/innerText都可以。如:<tr><td id="01">Hello</td></tr>要把Hello取出来就可以用document.getElementById("01").innerHTML/innerText。
但是用innerHTML与用innerText有什么区别吗?用innerHTML会把这个标记中的所有HTML标记与值取出来。innerText只会取最后的值。
posted @ 2006-04-14 12:49 rodney 阅读(485) | 评论 (0)编辑 收藏