揰掵佲 发表于 2014-10-23 15:36:49

【天龙之OOXX】天龙黑屏优化也不难

//==============================================================================
//取消渲染 黑屏 白屏
//==============================================================================
procedure TMainForm.NotRenderClick(Sender: TObject);
var
Address :Pointer;
dwSize: Cardinal;
dat1    :Byte;
begin
Address:=Pointer(GetModuleHandle('Render.dll')+$9E90);
if NotRender.Checked thendat1:=$c3 else dat1:=$56;
WriteProcessMemory(GetCurrentProcess, Address, @dat1, 1, dwSize);
end;

三哥 发表于 2016-5-19 18:05:19

牛X不错牛X不错牛X不错牛X不错牛X不错牛X不错
页: [1]
查看完整版本: 【天龙之OOXX】天龙黑屏优化也不难