DELPHI编译后可执行程序 DELPHI编译后可执行程序(EXE)的图标格式如何设置? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Project->Options->Application->Load Icon 1. project->options->application->load icon选择ICO文件,2.program Project1;uses Forms,Graphics, Unit1 in 'Unit1.pas' {Form1};{$R *.res}var Titicon:TIcon;begin Application.Initialize; Application.CreateForm(TForm1, Form1); Titicon:=Titicon.Create; Titicon.LoadFromFile('文件名'); Application.Icon:=Titicon; Titicon.Free; Application.Run;end. Menu-->Project-->Applicaiton --> Icon(Load Icon...) 客户端socket控件连接错误后在不关闭程序的情况下用什么函数重新连接? 好久没来,我来拜山!,来者有分~~~ 如何用代码控制打印机的换行/换页操作? 难题 :如何在DBGRID的最后一行显示合计 dbgrid中,怎么样让某几列不让用户编辑?? 关于帮助文件的问题,50分 关于copyfile()的问题,请大家帮忙 QUERY组件active后如何得知什么时候数据集完全返回了呢? 我想当用户更改日期后只触发一次OnChange事件?看似很简单 我要哭了,在网上找了半天都见不到Tmediaplayer的控件 急聘Delphi程序员!!!!! 打印机套打发票问题。。。
2.
program Project1;uses
Forms,Graphics,
Unit1 in 'Unit1.pas' {Form1};{$R *.res}
var Titicon:TIcon;
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Titicon:=Titicon.Create;
Titicon.LoadFromFile('文件名');
Application.Icon:=Titicon;
Titicon.Free;
Application.Run;
end.