- 博客(6)
- 资源 (15)
- 收藏
- 关注
原创 ASP探測客戶端瀏覽器分辨率
asp里面有一个专门的语句是探测分辨率的,可以根据分辨率让服务器端自动选择发送的页面版本 程序如下 确定客户端的屏幕分辩率主要使用HTTP_UA_PIXELS这个服务器变量。 *确定客户端的分辩率。 Select case Request.SERVERVARIABLES("HTTP_UA_PIXELS") Case "800X600" Response.Redire
2005-07-30 18:32:00 1423
原创 放个N老的程序,留着以后看
把以下代码保存为 *.txt (名字自己取),在cmd下运行 debug代码经过压缩 里面有个自解程序,运行开始先自解 e100 33 f6 bf 0 20 b5 10 f3 a5 8c c8 5 0 2 50 68 13 1 cb e 1f be a1 1 bf 0 1 e11b 6 57 b8 11 1 bb 21 13 89 7 4b 4b 48 79 f9 ad 86 e0 8b c8 b
2005-07-28 08:29:00 1269
原创 巧用Delphi制作溅射屏幕
精心编写的WINDOWS程序显示启动注意事项,称之为溅射屏幕(splash screen)。利用一点儿小小的内容,即可给程序的显示添加不少色彩。 由于工程本身创建程序的主窗口,且启动溅射屏幕必须在创建主窗口之前出现,所以工程文件必须创建自己的启动屏幕。这意味着用户必须修改源代码来创建工程文件,而这通常在DELPHI编程中是不需要的。下面的过程介绍了溅射屏幕的建立过程。 1、开始一
2005-07-28 08:16:00 1070 1
原创 用INDY判断网页是否存在
function TForm1.webexists(s:string):boolean;begin result:=false; try IdHTTP1.Head(s); if pos(200 OK, IdHTTP1.Response.ResponseText) then result:=true; except end;end;
2005-07-27 13:44:00 1583 2
原创 由窗句柄获得对应可执行文件名
function GetAppName(hwindow: HWND): string; var h : HMODULE; begin SetLength(Result, 100); h:=GetClassLong(hwindow, GCL_HMODULE); GetModuleFileName(h, PChar(Result), 100); end;
2005-07-27 13:42:00 1125 2
DevExpressVCL_16.1.2 Source for delphi 7- delphi xe 10.2 Tokyo
2018-07-07
Raize Components source 6.2.3 for delphi xe 10.2 tokyo
2018-07-07
FastReport5.6.2_fullSource_D7_Delphi xe10.2
2018-07-07
TComPort For Delphi XE8
2015-07-28
黑谍店铺复制宝贝下载专家
2014-04-18
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人