谁可相欹 发表于 2015-1-16 22:19:00

ASP.NET编程:关于 OnMouseWheelDown、OnMouseWheelU...

可怜的程序员,还是逃不出移植的命运!测试筹办,在空缺窗体上增加Memo1和Button1,然后激活Form1的以下事务(巅枫同砚体贴的):
  OnMouseEnter、OnMouseLeave、OnMouseWheel、OnMouseWheelDown、OnMouseWheelUp,还用到其OnCreate事务.
  然后依据以下测试代码,一试便知:
 unit Unit1; 
 
interface 
 
uses 
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
  Dialogs, StdCtrls; 
 
type 
  TForm1 = class(TForm) 
    Memo1: TMemo; 
    Button1: TButton; 
    procedure FormCreate(Sender: TObject); 
    procedure FormMouseEnter(Sender: TObject); 
    procedure FormMouseLeave(Sender: TObject); 
    procedure FormMouseWheel(Sender: TObject; Shift: TShiftState; 
      WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); 
    procedure FormMouseWheelDown(Sender: TObject; Shift: TShiftState; 
      MousePos: TPoint; var Handled: Boolean); 
    procedure FormMouseWheelUp(Sender: TObject; Shift: TShiftState; 
      MousePos: TPoint; var Handled: Boolean); 
  end; 
 
var 
  Form1: TForm1; 
 
implementation 
 
{$R *.dfm} 
 
procedure TForm1.FormCreate(Sender: TObject); 
begin 
  Memo1.ScrollBars := ssBoth; 
  Self.AutoScroll := True; 
end; 
 
procedure TForm1.FormMouseEnter(Sender: TObject); 
begin 
  Memo1.Lines.Add(Form1_OnMouseEnter); 
end; 
 
procedure TForm1.FormMouseLeave(Sender: TObject); 
begin 
  Memo1.Lines.Add(Form1_OnMouseLeave); 
end; 
 
procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState; 
  WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); 
begin 
  Memo1.Lines.Add(Form1_OnMouseWheel); 
end; 
 
procedure TForm1.FormMouseWheelDown(Sender: TObject; Shift: TShiftState; 
  MousePos: TPoint; var Handled: Boolean); 
begin 
  Memo1.Lines.Add(Form1_OnMouseWheelDown); 
  Button1.Top := Button1.Top - 4; 
end; 
 
procedure TForm1.FormMouseWheelUp(Sender: TObject; Shift: TShiftState; 
  MousePos: TPoint; var Handled: Boolean); 
begin 
  Memo1.Lines.Add(Form1_OnMouseWheelUp); 
  Button1.Top := Button1.Top + 4; 
end; 
 
end. 
刚刚打开这篇专题,猛然见到HAL9000发表的《对于大型公司项目平台选择j2ee的几层认识》系列,深受启发。

admin 发表于 2015-1-19 08:18:59

是目前ASP在UNIX/Linux上的应用可以说几乎为0)。所以平台的局限性和ASP自身的安全性限制了ASP的广泛应用。

第二个灵魂 发表于 2015-1-27 06:19:23

对于中小项目来说.net技术是完全可以胜任,但为什么现在大型公司或网站都选择php或java呢?就是因为微软不够开放,没有提供从硬件到应用服务器再到业务应用的整套解决方案。

深爱那片海 发表于 2015-2-5 03:56:29

现在的ASP.net分为两个版本:1.1和2.0Asp.net1.1用VS2003(visualstudio2003)编程。Asp.net2.0用VS2005(visualstudio2005)编程。现在一般开发用的是VS2003。

小魔女 发表于 2015-2-11 04:10:17

主流网站开发语言之ASP:ASP是微软(Microsoft)所开发的一种后台脚本语言,它的语法和VisualBASIC类似,可以像SSI(ServerSideInclude)那样把后台脚本代码内嵌到HTML页面中。虽然ASP简单易用,但是它自身存在着许多缺陷,最重要的就是安全性问题。

海妖 发表于 2015-3-1 21:24:46

Servlet却在响应第一个请求的时候被载入,一旦Servlet被载入,便处于已执行状态。对于以后其他用户的请求,它并不打开进程,而是打开一个线程(Thread),将结果发送给客户。由于线程与线程之间可以通过生成自己的父线程(ParentThread)来实现资源共享,这样就减轻了服务器的负担,所以,JavaServlet可以用来做大规模的应用服务。

透明 发表于 2015-3-11 00:19:19

是目前ASP在UNIX/Linux上的应用可以说几乎为0)。所以平台的局限性和ASP自身的安全性限制了ASP的广泛应用。

不帅 发表于 2015-3-17 17:00:42

它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。

飘飘悠悠 发表于 2015-3-24 14:28:37

ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点,理论上可以使用任何编程语言包括C++,VB,JS等等,当然,最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)。
页: [1]
查看完整版本: ASP.NET编程:关于 OnMouseWheelDown、OnMouseWheelU...