说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

在Delphi程序的About窗口中建立URL连接

HTML文档下载 WORD文档下载 PDF文档下载
在Delphi程序的About窗口中建立URL连接

我们知道大多数应用程序都有一个“关于”的窗口,在该窗口中是一些关于程序的说明,以及作者介绍联系等。你如果有自己的Internet网站地址,那么就可以让用户直接点击“关于”窗口中的网址,自动调用浏览器与你站点连接,。本文就告诉你地Delphi程序中如何实现该功能。

1. 在你的“关于”窗口中添加一个标签Labell,其属性按如下设置:

Label1.Caption www.cfan.cn.net

Label1.Cursor crHandPoint

Label1.Color clolive

2. 在Labell的OnClick事件中输入以下代码:

var TempString:array[0..79] of char;

begin

StrPCopy(TempString

Labell.Caption);

OpenObject(TempString);

end;

3. 添加OnClick中的OpenObject过程

procedure TForm1.OpenObject(sObjectPath:PChar);

Begin

ShellExecute(O

NIl

sObjectPath

Nil

Nil

SW_NORMAL);

end;

4. 将ShellAPI添加到Uses中

完整的程序如下:

unit Unit1;

interface

uses

Windows

Messages

SysUtils

Classes

Graphics

Controls

Forms

Dialogs

StdCtrls

ShellApi;

type

TForml=class(TForm)

Labell:TLabel;

procedure LabellClick(Sender:TObject);

procedure OpenObject(sObjectPath:PChar);

private

{Private declarations}

public

{Public declarations}

end;

var

Forml:TForml;

implementation

{$R *.DFM}

procedure TForml..LabellClick(Sender:TObject);

var TempString:array[0..79] of char;

begin

StrPCopy(TempString

Labell.Caption);

OpenObject(TempString);

end;

procedure TForm1.OpenObject(sObjectPath:PChar);

Begin

ShellExecute(O

Nil

sObjectPath

Nil

Nil

SW_NORMAL);

end;

end.

该程序在Delphi3.0中调试通过

Snapchat存安全漏洞 460万用户信息被窃 年底广告高峰:AdMob团队支招“马上赚钱” 从远程调用框架认识Zookeeper 盘点Hadoop生态圈:13个让大象飞起来的开源工具 【开源推荐】Ejoy2D:“风魂”游戏引擎作者云风的又一力作 Web应用在IE11里的实际使用性能 回顾2013年十个值得关注的WordPress设计主题 为什么Google眼镜注定会失败? 2013移动开发工具盘点:最火原型设计工具 2013年12月份浏览器份额:IE 11暴涨3倍 【PPT集萃】十位一线专家分享Spark现状与未来(二) 2014年,怎么做产品才能获得成功? 年末新游盘点:2014年移动游戏四大趋势 IDC:全球有1850万程序猿 4成爱好者在写代码 PHP开发框架流行度排名:Laravel居首 2013年度最强AngularJS资源合集 研发周报:回顾2013、技术栈的选择、开源成趋势 TIOBE 2014年1月编程语言排行榜:Transact-SQL力挫Objective-C 夺得桂冠 IBM:这五个智能技术的发展,将会改变我们生活 一周消息树: 微软的2013,Surface的2014 Amazon CTO Werner Vogels:云和SaaS正在快速风靡全球 “人类先知”Isaac Asimov 50年前的科技预测大多应验了 2014年10大Web设计趋势 Google野心:App Indexing改写应用搜索格局 Cocos2d-x,老牌引擎的新进化 Kingdom Rush创始人专访:游戏与电影元素混搭 超实用的JavaScript技巧及最佳实践(下) 盖茨和鲍尔默或成挑选微软新CEO的最大阻碍 移动开发进阶:触发式邮件深入分析 King.com传奇再续!Farm Heroes Saga强势登陆iOS、Android 2013综述稿:Clojure这一年及大事件 delphi可不可以用于自动控制方面的开发呢 如何使对话框程序执行就让整个屏幕背景变黑色?? 想了解有关程序考试的一些情况? 不同系统就不可以直接电缆直接吗? 怎样使用PQMAGIC对硬盘进行调整分区 memory fault--core dumped的问题 有谁知道怎么解win98的开机密码? 用 procedure 与 trigger 、database link 能完成吗? flowerofwind,rjcludy()请回答 COM中的一个怪问题:我将::CoUninitialize();去掉后程序不出错,添上出现非法操作,是啥问题??? 请问?????? 如何在程序中播放rm格式的文件??? edit怎么用啊? JB6盘中不含 Borland Enterprise Server AppServer5.0,各位快载一个上去吧! 如何改变显示的分辨率? 那里有c#编译器免费下载?谢谢 如何在vc中播放rm格式的文件??? 那位大侠知道怎么创建并使用一个变量,每次只让一个进程访问???给个例子吧,大大大 大 delphi中怎么编写中断,获取外部设备传来的信息?急救!! 数值模拟与计算仿真,高手请帮忙! 请问:dos下图形放大算法或思路?还有.........(高手请进) 求教!!!!SOS!! --请问如何将一个BMP图形文件转成JPG图形文件,高分请教师--- 高分给出,win98的怪问题! 打印统计问题 请教 : html的javascript 中报错:document.Form1.client_name.value不是对象 VC++里面如何从文本文件中一行一行读取文件? 请问,如何用mail函数批量发送邮件.多谢. 各位请教一下,Jsp 的服务resin在win2000下是怎样配置的 各位兄弟: 有谁知道 侯杰 的 <多线程程序设计> 什么时候才能买到??? 哪里有VFP3.0下载? system.ini和win.ini的作用 怎样生成安装包,多谢! 如何在两个不同的应用程序之间拖动文本字符 请问,PTSTR 和 PSTR 有什么不同? 反对上海电信变相涨价的行为。我能不能告中国电信“违约”和“欺诈”呢。 求救!误删Office2000注册表! 生成.exe出错 在Excel中,如何让某些行不能滚动? 在--成都--程序员能拿多少--¥--???? 换了17寸纯平显示器,开心,放分. 错装PB7,不能无create datawindows的图标,全是XX,为什么? 请问怎样遍历一个页面中服务器端的所有对象? 能否跟我说说——自动控制方面——与delphi编程的基本常识?我一直想了解,但不知道我们编的程序如何去跟那些硬件搞在一起而且控制硬件呢? 程序出错 发现一个不错的网站!www.ffboy.com 兩個Recordset之間數据轉入和轉出問題???. 高手請進......(一定給分) 大家推荐一下 ,win2k 下的 XML 编辑器。 请问男女之间存不存在真正的友情? 请教一下,怎样打印 java applet绘出的图形?,要用java 编写 高手请进!!!关于数据库 很菜的问题!字符串转化的问题? 为什么这一题不可以认为安培力做功代数和为零所以机械能守恒?(2005广东卷)如图所示,两根足够长的固定平行金属光滑导轨位于同一水平面,道轨上横放着两根相同的导体棒ab、cd与导轨构 生物的生命活动都需要水,即使在干旱的环境里,生物提也有相应的结构去适应,例如生活在沙漠地区的骆驼,它的胃分为3个室,第1个室附生20~30个水脬,作贮水用,通过关闭汗腺可以正在较长的时 江河中的水不停的流入大海,可是海洋里的水却不会溢出来,江河里的水也一直流不完,你知道这是什么原因吗 求高中物理机械能守恒的练习现在已经高三了,复习到现在发现以前机械能守恒学得很不好,有的题做起来挺累,希望大家可以给一些有关这方面的复习或是加强的练习.不要太简单的,不过也不 只有重力和弹力作用时,机械能守恒.这句话为什么不对 江河中的日夜不停地流入海洋.海洋中里的水却也总也不会溢出来,江河里的水也一直流不完.这是什么原因? 自然界的水分是怎样循环的 只有重力和弹力作用时,机械能一定守恒.为什么 江河中的水流入海洋,海洋里的水为什么也不溢出来江河中的水日夜不停地流入海洋.海洋里的水却总也不溢出来,江河里的水也一直流不完.这是什么原因?我们能自己做出自己的解释吗? 有关洛伦兹力和安培力的描述,正确的是() A.通电直导线在匀强磁场中不一定受到安培力的作用 B.电有关洛伦兹力和安培力的描述,正确的是()A.通电直导线在匀强磁场中不一定受到安培力 电场力做功 机械能守恒吗 机械能守恒时,物体一定只受重力和弹力的作用!为什么错 洛伦兹力与安培力的一些问题?带点粒子在磁场中受到洛伦兹力,带电导线在磁场中受到安培力.可以这样说,洛伦兹力是安培力的微观本质原因,而安培力是洛伦兹力的宏观表现.有这样一个关系 机械能守恒时,物体一定只受重力或弹性力的作用这句话错在哪?请举一下例子, 物体的机械能守恒,一定只受重力和弹力作用.请解释为什么错误 安培力和洛伦兹力,哪个是磁场力? 机械能守恒 为什么除重力外有 力做正功 机械能会增大? 判断:只有重力和弹力作用时,机械能才能守恒. 原子是怎样构成分子的(例如水分子)要写出过程,就是他构成的过程.一楼和2楼的怎么说得是完全不同吖,水是由水分子还是离子组成吖。这个才是关键。老师说是分子,但它又有化合价, 对数函数求导证明)f(x)=loga^xf'(x)=lim (loga^(x+Δx)-loga^x)/Δx=lim loga^[(x+Δx)/x]/Δx=lim loga^(1+Δx/x)/Δx=lim ln(1+Δx/x)/(lna*Δx)=lim x*ln(1+Δx/x)/(x*lna*Δx)=lim (x/Δx)*ln(1+Δx/x)/(x*lna)=lim ln[(1+Δx/x)^(x/Δx)]/(x*lna) ①=li 外力只有重力和弹力做功,机械能守恒吗? 在轨道上的导体棒在磁场的作用下什么时候安培力为0 除了静止那种情况以外 对数函数求导计算问题如图,对数函数的导数公式:(logaX)导等于1/xloga e,不懂,不知道怎么算这题. 重力弹力均做功的条件下机械能守恒么 从原子结构上解释水分子的构成 自然界的水包括什么? 机械能守恒为什么只有重力或弹力做功?弹力是只指弹簧的拉力吗?能讲一下为什么是重力或弹力这个条件而不是别的什么摩擦力啊什么的?讲的细致一点行吗?我的物理不是很好 就是构成水分子的氢,氧原子重新组成()和()的过程 水的物理性质如何?自然界的水一般是怎么样的? 对数函数怎么求导 一个水分子是由几个水原子组成? 水和自然界的水有什么差别? 使水在水自然界日夜不停的循环的主要原因是什么是什么原因 水分子是由什么构成的,离子还是原子氢氧根离子和一个氢离子还是氢原子和氧原子 自然界的水通过什么使水得到净化 若函数在【-1,1】上连续,在(-1,1)上可导,且函数导数的绝对值小于等于M成立,y(0)=0.则必有,函数的绝对值小于等于M吗,为什么 导体棒斜着切割磁场,怎么计算导体棒两端电势差?用安培力F=BLV该怎么用? 高分求复变量的对数函数的求导公式的推导(急!)实变量的指数函数e^x的导数等于e^x,这个我会推导,但是复变量的指数函数e^z(z=x+iy)的导数等于e^z,就是(e^z)'=e^z这个我就不会推导了.现在急等 设函数:f:R→R在R上二阶可导,并且满足f(x)的绝对值小于等于1,f(x)的二阶导数的绝对值小于等于1.求证,fx一阶导数必小于等于2 对磁场切割磁场线运动的导体棒,电流、磁感应强度恒定不变,那么由左手定则得出安培力的方向,右手定则得出运动方向,由此可以得到,切割磁场运动的导体棒速度和力的方向一定相反,安培力 求导数,f(x)=loga为底的x(X>0),有具体的对数函数求导公式吗? 设函数:f:R→R在R上二阶可导,并且满足f(x)的绝对值小于等于1,f(x)的二阶导数的绝对值小于等于1.证 关于反函数求导,有Ψ(y)的导数与f(x)的导数互为倒数的说法.这种说法中的Ψ(y)的y是指新函数的y还是指原函数f(x)中x对应的y? 既有重力做功又有弹簧弹力做功,机械能还守恒吗比如一弹簧下端连一个小物体,吊在屋顶上,将其拉到水平位置从静止释放,请问对小物体来说机械能守恒吗? 物理什么情况下重力等于安培力? 高二物理安培力的功导体切割磁场问题! 只受重力和弹簧弹力做功时物体机械能守恒 这句话对吗 【电磁炮】为什么安培力等于阻力时速度最大 在磁场边界上算不算有安培力? 比如一根导体棒在磁场中切割,运动到磁场边界上,算是出去了(没有安培力比如一根导体棒在磁场中切割,运动到磁场边界上,算是出去了(没有安培力了),还是 只有重力、库仑力和弹簧弹力做功的系统机械能守恒 之句话对还是错 为什么安培力做负功时等于产生的热量 电磁感应中导体棒切割磁场使得灯泡发光,这里的安培力做功等于灯泡的热量还是电功 [把小球放在竖直的弹簧上] 是不是同时有重力和弹力做功?此时机械能守恒吗? 安培力什么时候不做功?怎么有的题明明有安培力却说:电阻R上产生的的热量等于金属棒重力势能的减少 轻杆AB长2L,A端连在固定轴上,B端固定一个为2m的小球,中点c固定质量为m的小球,AB可以绕着A转动,现将轻杆置于水平位置,然后又静止释放,不计各阻力,求:1 AB杆转到竖直位置时,两小球速度大小2 自然界水是怎么循环运动的 请问江河中的水日夜不停地流入海洋,海洋里的水却总也不会溢出来,江河里的水也一直流不完,这是什么原因? 机械能守恒习题如图一轻杆长1米,可绕O轴载竖直平面无摩擦转动,OA=0.6M,OB=0.4M,质量相等的两小球分别固定于A,B两端,先把干水平,然后竖直释放,求杆转到竖直位置时两小球速度分别是多少?A------ 向浮动着云、流动着得水一样自然是什么词? 证明:如果函数f(x)在[a,b]上可导,且(f(x)导数的绝对值)小于等于M,则,[(f(b)-f(a))的绝对值 ...证明:如果函数f(x)在[a,b]上可导,且(f(x)导数的绝对值)小于等于M,则,[(f(b)-f(a))的绝对值
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn