使用windows的通用图标作为窗体图标

    在窗体的OnCreate 事件中加入以下代码:

{------}
procedure TForm1.FormCreate(Sender: TObject);
begin
  Self.Icon.Handle := LoadIcon(0, IDI_WARNING);
end;
{------}
    在上例中，使用了黄色的三角形
    其它可以使用的图标有:

IDI_APPLICATION
IDI_ASTERISK
IDI_EXCLAMATION (= IDI_WARNING)
IDI_HAND
IDI_QUESTION
IDI_WINLOGO