极点博客 网络软件、编程技术博客

Delphi中利用网页打造程序界面

大家都知道,现在的网页想要多花哨就有多花哨,比起传统Windows应用程序界面单调的菜单加按钮,不知会醒目多少。而且网页素材十分丰富,制作起来也比较简单。如果你想做一个华丽无比,动感十足的程序界面,那Web界面就是你最佳的选择。
 
 BY:青色咖啡 http://Blog.t522.com 极点博客

  第一步:根据需要,

标签: delphi基础

作者:xtpyeihc 分类:先前文章 浏览:155 评论:0

1小时ASP快速入门,原文如下

 1小时ASP快速入门,原文如下:


<1>
<%
语句
……
%>
<2>定义变量dim语句
<%
dim a,b
a=10
b=”ok!”
%>
注意:定义的变量可以是数值型,也可以是字符或者其他类型的
<3>简单的控制流程语句
1. If 条件1 then

标签: 编程基础

作者:xtpyeihc 分类:先前文章 浏览:159 评论:0

用delphi 打开网页的方法

uses ShellAPI;
procedure TForm1.Button1Click(Sender: TObject);
begin
  "color: #008000">//用IE打开
  ShellExecute(Handle, 'open', 'IExplo

标签: 编程基础

作者:xtpyeihc 分类:先前文章 浏览:149 评论:0

模仿实现上兴弹窗器功能delphi代码以及功能扩充

模仿实现上兴弹窗器功能delphi代码以及功能扩充

上兴弹窗器r2..
下载地址 http://www.3800hk.com/Soft/zhly/16283.html
弹窗器功能简介:

隐蔽:生成的服务端插入IE,穿防火墙,服务启动,隐蔽性强。

动态配置:采用读取网页空间上的配置进行弹窗,用户可随时更换配置文件。

还配置有下载者,一个相同文件只会下载一次,不会重复下载!

等对方

标签: 个人作品

作者:xtpyeihc 分类:先前文章 浏览:164 评论:0

delphi Delphi中ShellExecute的妙用

ShellExecute的功能是运行一个外部程序(或者是打开一个已注册的文件、打开一个目录、打印一个文件等等),并对外部程序有一定的控制。
有几个API函数都可以实现这些功能,但是在大多数情况下ShellExecute是更多的被使用的,同时它并不是太复杂。下面举例说明它的用法。
开始一个新的应用程序
ShellExecute(Handle, 'open', PChar('c:\test\app.exe'), nil, nil, SW_SHOW);

标签: delphi基础

作者:xtpyeihc 分类:先前文章 浏览:134 评论:0

delphi 操作注册表

32位Delphi程序中可利用TRegistry对象来存取注册表文件中的信息。    
    一、创建和释放TRegistry对象  
    1.创建TRegistry对象。为了操作注册表,要创建一个TRegistry对象:ARegistry   :=   TRegistry.Create;  
    2.释放TRegistry对象。对注册表操作结束后,应释放

标签: delphi基础

作者:xtpyeihc 分类:先前文章 浏览:157 评论:0

DELPHI获取CPU信息

DELPHI获取CPU信息
一、获取CPU厂家信息

Const
CPUVendorIDs
:array[0..5] of string = ('GenuineIntel','UMC UMC
UMC','AuthenticAMD','CyrixInstead','NexGenDriven','CentaurHauls');
//将CPU厂家信息转换成字串形式
CPUVendors :array[0..5] of st

标签: delphi基础

作者:xtpyeihc 分类:先前文章 浏览:159 评论:0

delphi 动态类名。。。

delphi 动态类名。。。
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
 

标签: 个人作品

作者:xtpyeihc 分类:先前文章 浏览:145 评论:0

delphi的字符截取函数LeftStr, MidStr, RightStr拆分字符串 

delphi的字符截取函数LeftStr, MidStr, RightStr拆分字符串 
  
推荐这几个函数都包含在StrUtils中,所以需要uses StrUtils;
假设字符串是 Dstr := ’Delphi is the BEST’, 那么
LeftStr(Dstr, 5) := ’Delph’
MidStr(Dstr, 6, 7) := ’i is th’
RightStr(Dstr,

标签: delphi基础

作者:xtpyeihc 分类:先前文章 浏览:184 评论:0