你可以编译一个EXE文件,标有图标。再改成Dll。

解决方案 »

  1. function CreateWin(nleft: Integer; nTop: Integer; nWidth: Integer; nHigh: Integer; aParent: THandle): Integer; stdcall;
    begin
      Result := 0;
      if gDrawWin <> nil then
        FreeAndNil(gDrawWin);  Application.Handle := aParent;
      gDrawWin := TFrmDraw.Create(Application);
      gDrawWin.BorderStyle := bsNone;
      gDrawWin.Left := nleft;
      gDrawWin.Top := nTop;
      gDrawWin.Width := nWidth;
      gDrawWin.Height := nHigh;
      gDrawWin.Show();
    end;