怕忘记了，写在这儿！
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
i,j:integer;
r:real;
ch:char;
s:string[7];
begin
i:=10;
j:=100;
r:=1.0;
ch:='b';
s:='1234567890';
showmessage(inttostr(i)+inttostr(j));
showmessage(floattostr(r));
showmessage(ch);
showmessage(b);
end;
end.
......
操作步骤如下：
1.建立 res 文件
建立一个文本文件，名字可以自己起，我这里叫：UAC.manifest，内容：
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v3">
<security>
<requestedPrivileges>
<requestedExecutionLevel level="requireAdministrator"/>
</requestedPrivileges>
</security>
</trustInfo>
</assembly>
建立文本文件，名为 UAC.rc，内容：
1 24 UAC.manifest
编译成 uac.res 文件，运行：
brcc32 uac.rc -fouac.res
2.在代码中引入
打开项目文件，加入
{$R uac.res}
3.编译程序
这时程序就支持 Win7/VISTA 了，在运行的时候，会弹出 WINDOWS 的提示框，询问用户是否允许以管理员身份运行
......
<td width="270" height="28" align="center" valign="middle" bgcolor="#EDF9EC"><span>
<SCRIPT language=JavaScript >
function RunGLNL(){
var today=new Date();
var d=new Array("星期日","星期一","星期二","星期三","星期四","星期五","星期六");
var DDDD=(today.getYear()<100 ? today.getYear()+1900:today.getYear())+"年"+(today.getMonth()+1)+"月"+today.getDate()+"日";
DDDD = DDDD + " " + d[today.getDay()];
DDDD = DDDD+ " " + (CnDateofDateStr(today));
//DDDD = DDDD+ " " + SolarTerm(today);
document.write(DDDD);
}
function DaysNumberofDate(DateGL){
return parseInt((Date.parse(DateGL)-Date.parse(DateGL.getYear()+"/1/1"))/86400000)+1;
}
function CnDateofDate(DateGL){
var CnData=new Array(
0x16,0x2a,0xda,0x00,0x83,0x49,0xb6,0x05,0x0e,0x64,0xbb,0x00,0x19,0xb2,0x5b,0x00,
0x87,0x6a,0x57,0x04,0x12,0x75,0x2b,0x00,0x1d,0xb6,0x95,0x00,0x8a,0xad,0x55,0x02,
0x15,0x55,0xaa,0x00,0x82,0x55,0x6c,0x07,0x0d,0xc9,0x76,0x00,0x17,0x64,0xb7,0x00,
0x86,0xe4,0xae,0x05,0x11,0xea,0x56 ......
在JavaScript中，var用来声明变量，但是这个语法并不严格要求，很多时修改，我们可以直接使用一个变量而不用var声明它。
诸如此类。这有一个问题，比如说在代码中的某一行，我想使用的一个已声明的变量x，结果由于打字或者拼写错误，这个变量被写成y了，结果相当于“隐式”声明了一个变量y，在实际编程过程中，这种错误有时比较难以发现。
除此之外，今天通过同事介绍，了解到这种“隐式声明”中的别外一个问题。
当你在当前上下文内进行这种“隐式”声明时，JavaScript引擎会先在当前上下文中寻找是否之前有声明此变量，如果没有，再到上一级的上下文中去寻找，如果一直未找到，会最后在window上声明这个变量！
比如:
window. y = "hello";
function func(){
y = "OH, NO!!!";
}
func();
alert(window.y); //#=> display "OH, NO!!!"
当上下文中的任意一层有这种“隐式”定义的变量时，那么该层的该变量会被修改，而不会在window上生成一个新的变量。（这种bug也挺讨厌的，尤其是封装的比较复杂的代码）
比如� ......
作者：Truly
日期：2007.7.24
前言
OO(面向对象)概念的提出是软件开发工程发展的一次革命，多年来我们借助它使得很多大型应用程序得以顺利实现。如果您还没有掌握并使用OO进行程序设计和开发，那么您无疑还停留在软件开发的石器时代。大多数编程语言，尤其是近年问世的一些语言，都很好的支持了面向对象，您可能对此了如执掌，但是一些语言在OO方面却无法与其它高级语言相比，在这些语言上进行面向对象程序设计和开发会有些困难，例如本文要讨论的JavaScript。JavaScript是一门古老的语言，但是随着近期Web2.0 技术的热捧，这门语言又重新焕发出青春的光辉，借助于JavaScript客户端技术，我们的Web体验变得丰富而又精彩，为了设计和开发更加完善、复杂的客户端应用，我们必须掌握JavaScript上的OO方法，这正是本文要讨论的。 前几天阅读了MSDN的《使用面向对象的技术创建高级 Web 应用程序》一文，觉得还有些东西有必要继续探讨补充一下，就有了本文。
目录
开始
对象的声明
成员的声明
全局变量和局部变量
命名空间
开始
JavaScript是一门相当灵活的语言，语法也相当宽松，并且入门门槛很低，您可以不费什么力气就编写出一大堆可以运行 ......
效果图如下：
点“添加参与人”按钮可以添加一行，每行后面都有一个删除按钮，可以删除所在行，“清空”则删除所有的行。
这种效果在需要批量添加数据的时候非常有用，可以在客户端添加完一批数据，然后通过AJAX一次提交给服务器处理，下面是完整代码：
Body部份：
<div>
<table width="613" border="0" cellpadding="2" cellspacing="1" id="SignFrame">
<tr id="trHeader">
<td width="27" bgcolor="#96E0E2">序号</td>
<td width="64" bgcolor="#96E0E2">用户姓名</td>
<td width="98" bgcolor="#96E0E2">电子邮箱</td>
& ......
最新文章 :