怎樣使delphi程序沒有圖標?(100分)

  • 主题发起人 主题发起人 同甘共苦
  • 开始时间 开始时间

同甘共苦

Unregistered / Unconfirmed
GUEST, unregistred user!
我在使用delphi6時,不知何故程序總是有一個默認的delphi圖標,如果我要使編譯後的程序沒有圖標,怎麼做呢??
 
可以在菜单project/options下的Application页面设置程序图标。
但要清除图标的话,则很麻烦,在项目文件或主form的formCreate事件中可以设置
Application.icon:=nil
但程序仍显示一个空白的图标。
 
1)menu->project->options->application,就可以修改了
2)dpr文件当中的{$R *.res}去掉
 
做一个透明的ico图标,project/options下的Application页面设置程序图标为该图标。
 
把dpr文件当中的{$R *.res}去掉 可以,不过windows会给他一个默认图标
 
难,为什么不要图标呢?
 
先感謝各位指點,但是還是不能達到沒有圖標的效果!但是我確實有見過沒有圖標的delphi程序,隻是不知是怎麼弄的,望各位再行指點。
 
做个透明图标
 
对,最多只能是透明的,做一个纯一色的图标就可以实现透明效果了。
 
支持樓上的~~~~~~~~
 
同意陈健松的观点,系统默认的图标总是会存在,只能考虑透明处理 了
 
在我现有的知识中也觉得只能透明处理
 
很简单,那是自己做的Form,或者是第三方的Form控件。
 
用一个无边界窗口,自己实现标题栏和系统按钮
 
(1)dpr文件当中的{$R *.res}去掉
(2)program Project1;

uses
Forms,
Unit1 in 'Unit1.pas' {Form1};
begin
application.Icon :=nil;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
(3)unit Unit1;

interface

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

type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
self.BorderStyle := bsDialog;
self.Icon := nil;
end;

end.
 
可是各位樓主,你的程序編譯後出現了一個DOS圖標,,,可不可以連DOS圖標都沒有
 
各位熱心幫助我的人,我已有一個很好的方案,經過了測試。請各位測試一下!那就是先去掉dpr文件中的{$R *.res},刪掉project1.res文件,編譯一次,編譯出的EXE文件應該有一個windows默認DOS框圖標,然後用下面這個project1.res放到原位置,再在dpr文件中加上{$R *.res},重新編譯!哈哈,你看到了 ,一個完全沒有圖標的EXE文件!!!
這個project1.res,我無法上傳,誰要的請發貼你的EMAIL地址,我將寄給你!!

隻是我想知道,這個project1.res是怎麼回事?請大家幫助研究研究!!




 
放分了,但是問題不夠 完滿!請各幫我研究研究那個project1.res,各位費心了
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
823
import
I
后退
顶部