网狐李逵劈鱼进入时闪退

来源:互联网 发布:sql导出身份证号码 编辑:程序博客网 时间:2024/05/17 01:36
遇到个问题, 进到 房间里 ,点击座位,闪一下就没反应了。

应该出来 游戏的界面啊,可什么也没出现还是 刚才点击座位的界面,只是看到自己坐在座位上了。


解决办法:原因是缺少文件,补全就正常了,给出完整打包文件。



 [Setup]
AppName=千虑桌游
AppId={{86B66DD2-8114-4572-AB81-4C6466E7F98B}
AppVerName=李逵捕鱼
DefaultDirName={reg:HKCU\Software\LBJGame\GamePlaza,Path}
OutputBaseFilename=LKPY
Compression=lzma
WizardImageFile=embedded\WizardImage.bmp
WizardSmallImageFile=embedded\WizardSmallImage.bmp

[Files]
Source: "unicode\LKPY.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "unicode\hge.dll"; DestDir: "{app}"; Flags: ignoreversion
Source: "unicode\hgeencrypt.dll"; DestDir: "{app}"; Flags: ignoreversion
Source: "unicode\guichan.dll"; DestDir: "{app}"; Flags: ignoreversion
Source: "unicode\magic.dll"; DestDir: "{app}"; Flags: ignoreversion
Source: "unicode\bass.dll"; DestDir: "{app}"; Flags: ignoreversion
Source: "unicode\lkbass.dll"; DestDir: "{app}"; Flags: ignoreversion
Source: "unicode\LKPY\*"; DestDir: "{app}\LKPY"; Flags: ignoreversion recursesubdirs createallsubdirs

[Run]


[CustomMessages]
default.NameAndVersion=%1 版本 %2
default.AdditionalIcons=附加快捷方式:
default.CreateDesktopIcon=创建桌面快捷方式(&D)
default.CreateQuickLaunchIcon=创建快速运行栏快捷方式(&Q)
default.ProgramOnTheWeb=%1 网站
default.UninstallProgram=卸载 %1
default.LaunchProgram=运行 %1
default.AssocFileExtension=将 %2 文件扩展名与 %1 建立关联(&A)
default.AssocingFileExtension=正在将 %2 文件扩展名与 %1 建立关联...

[Languages]
; These files are stubs
; To achieve better results after recompilation, use the real language files
Name: "default"; MessagesFile: "embedded\default.isl";

[Code]
//导入一个Windows API 函数
function MessageBox(hWnd: Integer; lpText, lpCaption: String; uType: Cardinal): Integer;
external 'MessageBoxA@user32.dll stdcall';

//安装完成后
//更新游戏列表
procedure CurStepChanged(CurStep: TSetupStep);
var
  hWnd: HWND;

begin
    if CurStep=ssDone   then
      begin
        hWnd := FindWindowByClassName('LaoAQPPC');

        if hWnd <> 0 then
          begin
              PostMessage(hWnd, 1124,200, 0);
              //MessageBox(0, 'PostMessage(hWnd, 1124, 5, 0);', 'MessageBox', MB_OK);
          end
     end
end;

//------------------------------------------------
//                   the end
//------------------------------------------------



0 0
原创粉丝点击