Delphi 编程技巧常见实例问答
1. delphi怎样调用外部EXE文件？
uses WinProcs;
.
begin
WinExec(……);
.
end.
和调用Pascal库函数没什么两样。
2. Delphi hint的字体和色彩如何改变
Delphi中Tapplication的属性有HintColor及HintPause。可以通过设置HintColor改变应用程序中的Hint的颜色、通过设置HintPause改变触发Hint的时间。但遗憾的是：Delphi中Hint的字体不可以改变。
3. Delphi里如何计算日期
算时间在delphi中是最容易的，如下：
var ss : TDateTime
其实Tdatetime是一个双精度的浮点数，它的小数点前表示天数：如， ss := ss + 20 表示从ss开始向后20天，如果 ss = 234.567 它就表示 234.567天,当然是从公元0年开始计算的！
4. 如何用Delphi编ScreenSaver? (null)
屏幕保护程序无非是扩展名换成了.SCR的可执行程序，它接受两种命令行参数：
s 运行命令参数
c 配置命令参数
Windows通过向程序发-s命令行参数来启动程序。要注意的是：程序的窗口是无边框和标题；窗口大小应与屏幕大小一样；还要注意窗口的事件的处理。
5. Delphi 中如何改目录的名字
调用RenameFile函数，如:
RenameFile(’c:wang emp’, ’c:wang mp’);
6. DELPHI显示JPEG图像文件
只要 uses中加入 JPEG就行，JPEG单元里是有一个TJPEGImage类,可定义一变量如Jpeg,用LoadFromFile调入某个JPEG文件, 然后用Form的Canvas.Draw(x,y,Jpeg)即可显示.
7. Delphi中对Jpeg格式文件的处理…
(1).在 Uses 中加入 JPEG 单元;
(2).定义一个全程变量,例如 var AJPEG : TJPEGImage;
(3).在 Form 的 OnCreate 事件中加入 :
Canvas.Pen.Color:=clBlack;
Canvas.Pen.Style:=psSolid;
Canvas.Brush.color:=clBtnFace;
Canvas.Brush.Style:=bsSolid; //此上是设置 Canvas 的一些属性,便于以后
//Clear Form and Load a new JPEG file;
Ajpeg:=TJpegImage.Create;//动态生成Ajpeg;
Ajpeg.LoadFromFile(’D:Temp.jpg’) //生成 Ajpeg 后,调入 JPEG 文件
(4).在 Form 的 OnPain 事件中加入Canvas.Rectangle(2,2,560,430); //画一个黑框的矩形将图片围住;
x:=10; y:=10;
Form1.Canvas.Draw(x,y,Ajpeg); //以(x,y)为左上角输出 JPEG 文件;
//实际上其作用是当图形被破坏是使图形恢复;
(5).在’Load’或’Browse’按钮的 onClick 事件中加入:
begin
if OpenPictureDialog1.Execute then
begin
Ajpeg.Free; //释放旧Ajpeg;
Ajpeg:=TJpegImage.Create; //产生一个新的Ajpeg;
Ajpeg.LoadFromFile(OpenPictureDialog1.Filename); //载入JPEG文件;
end;
Canvas.Rectangle(2,2,560,430); //将Form Clear;
x:=10;
y:=10;
Form1.Canvas.Draw(x,y,Ajpeg); //显示新的Ajpeg;
end;
8. DELPHI3启动画面
in your *.dbr files do it
begin
{Create a splash form}
splash:=Tsplash.Create(self);
splash.Show;
splash.update
Application.Initialize;
Application.CreateForm(..)
.
.
.
splash.close;
splash.free;
Application.Run
end;
转http://develop.csai.cn/delphi/200609180928511897.htm
[解决办法]
好文章
------解决方案--------------------
牛淫,支持
[解决办法]
mark
[解决办法]
顶
[解决办法]
呵呵~~ 支持LZ
[解决办法]
好文
[解决办法]
都很基础
[解决办法]
短小实用，good
[解决办法]
Delphi 中 Hint 的字体是可以改变的。例如：
Screen.HintFont.Color := clRed; //设置字体颜色为红色
Screen.HintFont.Size := 18; //设置字体大小
Screen.HintFont.Style := [fsUnderline]; //设置字体效果，添加下划线
[解决办法]
顶到天亮
[解决办法]
汗楼上。顶到天亮不嫌累啊。腰真好。
[解决办法]
支持
[解决办法]
hao
[解决办法]
求救：有谁知道DELPHI发布应用程序的软件啊，或者怎样才能把已做的应用程序发布！！！
请各位大虾帮忙啊
[解决办法]
我也DDDDDDDDDDDD
[解决办法]
nice
[解决办法]
呵呵，都是基础
[解决办法]
《科技与**》杂志征稿启事 ★(请勿删除，留给有用的人，谢谢)
编辑在线征稿，审稿，保修保发，安全快捷---
《科技与**》杂志是由中国科协主管、面向国内外公开发行的大型中央级科技、经济、管理类权威期刊，是赠建全国百家阅览室指定读物。国际刊号：ISSN1004-9207 ，国内统一刊号： CN11-3096/N。
《科技与**》现开设理论探讨（党建、政工、法律、人力资源、新闻宣传等）、管理纵横（企业、经济、市场、产业等）、工程技术、文教卫生、综合治理等栏目，其内容包含行政、经济、工程、教育、医药卫生、社保等各种管理类学术稿件。具体征稿事宜说明如下：
一、 征文形式与要求
（1） 论文要求 论点新颖，论证充分；设想可行，结论可告；条理分明，书写清楚，用字规范，上交电子文件（word格式）。
（2） 论文格式 题目、作者姓名、工作单位、地址及邮政编码、内容提要、关键词、正文、参考文献。（附个人简介及联系方式）
二、 论文发表说明
投寄论文经本刊编辑部审阅通过后，将在《科技与**》上刊发。每篇论文收到后一周给予答复是否被录用（敬请及时询问，以防耽误），论文发表后，本部向每位作者赠送当期样刊，以便使用。
注意：所投论文，文责自负。
三、★★★除编辑所在杂志，还可刊发在与我刊有着密切联系的其它★省级、★国家级期刊、★核心期刊，均为具有双刊号的正式公开发行期刊。征稿范围为科技、教育、文学艺术、马思哲、信息科学、建筑工程、市政建设、经济论坛、档案管理、海事专栏，生态与环境、医药卫生、农业技术等。论文要求论点清晰，论据充分，论述合理。字数以3000字以内为宜。请投稿时附上您的详细联系方式，便于及时联系。 期刊目录详情请关注我们的网站http://etci.wuyou.com
四、 投搞及联系方式
请联系特约编审：杨春沂 李文辉 电话：0451-88610235 88608508 工作QQ:52254171 403540438 电子信箱：kjxxlwh@163.net（抄送aaa.003@126.com）
网址:http://etci.wuyou.com
*** *** *** *** *** *** *** *** *** ***
本网站专业写手代写各专业职称论文、毕业论文、核心期刊论文
*** *** *** *** *** *** *** *** *** ***
[img]http://wpa.qq.com/pa?p=1:52254171:11[/img][url=http://wpa.qq.com/msgrd?V=1&Uin=52254171&Site=http://etci.wuyou.com&Menu=yes]发表论文请Q我[/url]
[解决办法]
收藏
[解决办法]
sign
[解决办法]
没有公元0年，
公元前1年然后就是公元1年
[解决办法]
Delphi 的 TDateTime 类型，的确是双精度的浮点数
但是他是从 1899年12月30日开始的
这和MS 开发工具中的日期类型是不同的，ms(比如MSSQL)的是从 1900年1月1日开始的
两着差两天，从前写程序的时候遇到过这个问题。
[解决办法]
up
[解决办法]
不错,都很实用
[解决办法]
地球人都知道
[解决办法]
还可以，不过大部分都知道了，还是支持一下！
[解决办法]
mark
[解决办法]
mark
[解决办法]
好
[解决办法]
我就喜欢这样基础的文章,太难的看不懂..
希望以后各位论友多多发基础文章的帖,让入 "程序 "未深的人再上一步台阶..
[解决办法]
好文章
[解决办法]
呵呵~~
[解决办法]
为D定你
[解决办法]
Delphi 中 Hint 的字体是可以改变的。例如：
application.HintColor := clred;
application.HintPause := 100;
[解决办法]
ding
[解决办法]
mark