Delphi自适应分辨率（比较完美的一个方法）
procedure TfrmMain.FormCreate(Sender: TObject); //主窗体FormCreate事件
var FWidth:integer;
begin
if (screen.Width <> 1024) then //假设你设计程序时的分辨率为1024
begin
FWidth:=width;
scaled:=true;
Font.Size:=(Width div FWidth)*Font.Size;
scaleby(screen.Width,1024);
Height:=longint(Height)*longint(Screen.Height) DIV 768;
Width:=longint(Width)*longint(Screen.Width) DIV 1024;
end;
end;
这是以前项目用过的一段自适应分辨率的代码，效果还不错，不过字体最好调整为宋体。
相关文档：
delphi指针简单入门:
看一个指针用法的例子：
1 var
2 X, Y: Integer; // X and Y 整数类型
3 ......
在讨论这个话题之前，必须要说明的是，如果你刚学习delphi，请不要模仿，因为谈不上转型；如果你用delphi已经成习惯，并且熟悉html语言、有BS结构基础、对JAVA语法没有障碍（如果你看不懂简单的基础JAVA代码，建议你还是继续你的d吧），希望这段内容对你有所帮助，此话题不讨论具体技术，只说说我的学习步骤和心得。
1、 � ......
Delphi 中将对象作为参数传递的使用 举例分析
2009-07-24 13:40
下面的单击事件，将要调用一个以对象为参数的方法，并将结果显示出来。
procedure TForm1.btn1Click(Sender: TObject);
var
lStrings: TStrings;
begin
lStrings:= TStringList.Create;
try
lStrings.Add('chen');
&nbs ......
delphi TStringList 用法详解
//TStringList 常用方法与属性
:
var
List: TStringList;
i: Integer;
begin
List := TStringList.Create;
List.Add('Strings1'); {添加}
List.Add('Strings2');
List.Exch ......
很早做过的一个delphi项目，把里面用到的技术总结一下，主要是针对象我这样的delphi新手，技术上做个积累吧！
假设我们的数据库配置文件ServerInfo.ini内容如下：
[ServerInfo]
ServerIP=192.168.1.5
SQLDBName=Data
SQLUserID=sa
SQLPwd=
我们定义一个连接数据库的过 ......
