FORM有个ICON属性,你设置就可以了。
解决方案 »
- frame_参数传递!
- 怎样将查询到DBGrid1的Columns[0]进行排序。
- 谁能给我delphi函数大权啊!!!!
- 在函数中,返回参数能否使用字符串数组?
- 怎样使得StringGrid的FixedCol、FixedRow里边的字体是黑体?
- 大家来讨论一下,关于数据库的同步和异步传输的问题,分可再加啊!!!!!!!!!!!!!!!
- 简单问题:在DELPHI中如何创建ACTIVEX对象?
- 怪怪!DLL中的问题,搞不明白了...
- 关于数据库中SESSION的问题
- 究竟kylix编译出来的东西如何运行?
- 我用batchmove导另外一台机上的数据时出错
- delphi有没有函数处理成方啊???比如2的5次方是多少
uses
ShellApi;procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
Icon.Handle := ExtractIcon(HInstance, PChar(OpenPictureDialog1.FileName), 0);
end;