摘要载入中… 请稍等…
内容载入中… 请稍等…
| ◎→ | 本类最新 |
|
在delphi中使用flash控件 在Delphi中实现动态字幕 在Delphi下用Direct Sound 实现混 在Delphi里播放Flash 循环播放音乐 用Delphi 5.0编写在线播放器 生成一个波文件 |
|
| ◎→相关资源 | |
| C语言入门视频教程 C#编程WinForm入门视频 Asp.net入门视频教程下载 VC++编程视频教程下载 VB窗体文章 HTML入门教程 Deiphi实例教程 Deiphi窗体文章 Deiphi数据库编程 Deiphi网络编程 Deiphi图形图象文章 Deiphi系统文件 | |
| ◎→ | 热门资源 |
| 九赢广告联盟的优点和缺点 通过IP反查域名 用VB的Printer对象编写打印程序 用DELPHI通过写注册表来实现建立 网络积件再思考。(其实也只是胡 AfxMessageBox参数详解 顶级黑客年收入超千万元! |
|
x:=imagel.height+20;
image1.Canvas.font.size:=18
image1.Canvas.font.color:=$120000ff;
image1.Canvas.TextOut(80,x,‘江西奇达通讯网络有限公司简介’);
image1.Canvas.font.color:=$1200ffff;
image1.Canvas.font.size:=12;
image1.Canvas.TextOut(80,x+60,‘奇达公司是……’);
image1.Canvas.TextOut(40,x+100, ‘…公司简介内容…’);
end;
图标颜色变换法Delphi的Additional页的构件中有一个图形构件(Shape),可以十分方便地处理多种几何图形,例如椭圆、正方形、矩形、圆角矩形等, 这为在某些特定的环境下利用颜色变换来实现动画技术提供了方便。
下例在软件封面的某处设定一些TShape构件和一个Ttimer构件,改变图标颜色变化及运行轨迹,形成动感。
由于篇幅有限,仅提供部分双击Ttimer构件的ONTIMER事件的处理程序:
procedure TQD_start.Timer1Timer(Sender:TObject);
label hhr;
begin
if (Shape1.brush.color=clRed) then
begin
Shape1.brush.color:=clWhite;
goto hhr;
end;
if (Shape1.brush.color=clWhite) then
begin
Shapel.brush.color:=clRed;
goto hhr;
end;
hhr:end;
以上程序均在Windows95、Delphi2.0环境下调试通过
[1]| 芯友网版权所有 1999-2006 | 著作权与商标声明 | 法律声明 | 服务条款 | 隐私声明 | 联系我们 |