我考虑了很久，还是决定先把代码发布出来，早点接受大家的反馈。
Delphi Spring Framework的目标是为企业应用程序提供强劲而灵活的基础架构。整个框架基于Embarcadero RAD Studio 2010平台，充分利用了新的语言特性（如泛型、匿名方法和反射），并借鉴了.net和java平台上其他同类框架的一些思想，希望能给大家带来全 ......
procedure TForm1.Button1Click(Sender: TObject);
var 测试:String;
begin
测试:='abc';
ShowMessage(测试);
end;
靠，太强了。
我才知道，相当落伍，是不是？
知道就不落伍了
哈哈
这样都行啊
受楼主启发，我试了一下，窗体、控件也能用汉字！：
估计� ......
我想实现一个界面，就是比如今天与2009年5月8号差距几年又几月又几天，如何判断，几天是不大于一个月的，而且也不是那种限定一个月30天或者多少的，我要根据实际来的，程序一打开，就显示，比如今天是2009年10月29号，那打开程序就显示，今天距离2009年5月8号有0年2月24天这样。请问如何实现呢
DateUtils单元中有很多函数� ......
temp:String;
result,R:single;
temp:= '-0.0396';
result:= StrToFloat(temp); //结果不是-0.0396,而是一个相差甚远的数值
if TryStrToFloat(temp,R) then //听别人说的用这个安全，可是结果跟StrToFloat一模一样
result:=R;
请问这个 ......
活跃一下D版的气氛，出个趣味只是题。
下面的代码中，定义了一个记录类型，定义了2个同名的方法（同不同名无所谓），v1和v2的x字段都初始化为10，分别调用2个方法后。提问：
1、v1.x与v2.x的值分别为多少？（要求不要在机上测试）
2、加入从记录定义中去掉y字段，v1.x与v2.x的值又分别为多少？（要求不要在机� ......
在同一个窗体中：
function TfrmFILESHARE.GetChecker(const DirCode:Integer;const Stage:Integer):TStrings;
var
iDirCode:Integer;
begin
//获取目录的审批者
iDirCode:=DirCode;
while iDirCode>0 do
begin
dm.qry.SQL.Text:=' ......
最新文章 :