Delphi Socket 简单示例(Server)

Delphi 数列的排列组合一例，演示0~N位数的任意组合，组合的数字在0~5之间，需要输入1~6整数，排列结果会显示在文本框组件中。要点代码如下： 　　ssList := TStringList.Create; 　　try 　　 if (nBase < 1) then 　　 begin 　　 end 　　 else 　　 begin 　　 if (sList.Count = 0) then 　　 begin 　　 for nIdx := 0 to num-1 do 　　 ssList.Add(a[nIdx]); 　　 end 　　 else 　　 begin 　　 for nIdx := 0 to num-1 do 　　 for nSidx := 0 to sList.Count-1 do 　　 if (Pos(a[nIdx], sList.Strings[nSidx]) = 0) then 　　 ssList.Add(a[nIdx]+sList.Strings[nSidx]); 　　 end; 　　 Combine(nBase-1, ssList); 　　 end; 　　 if ssList.Count > 0 then 　　 begin 　　 sList.Clear; 　　 sList.Text := ssList.Text;sslist.Count 　　 end; 　　finally 　　 ssList.Free; 　　end;

获取及设置屏幕分辨率，调用的windows系统api。(get&set screen pix)

说明：  webservice 例程，webservice的一个简单的客户端程序，适合于初学者学习！(webservice)

Configurador de etiquetas dinamico

用Delphi制作的程序，可以获取和设置系统时间。简单实用。-Delphi production procedures, and can access the system time. Simple and practical.

说明：  Sjs Djd dkd Dmd Dhrhrjrjrjrjjrr Dm

一个电力的巡检项目,用到三个控件,可自己去下载,-a power of the Tour, used three controls can be downloaded to own,

delphi,实现ado分页实现。这是转载。-delphi achieve ado Pagination achieve. This is reproduced.

早期开发的食堂收费系统，包括充值，收费，买卖等等管理模块。(Early development of the cafeteria fare collection system, including recharge, charge, sale, and so the management module.)

DELPHI倒计时时钟源码,支持自定义倒计时秒数功能-DELPHI countdown clock source code to support custom features countdown seconds