上一页 1 ··· 28 29 30 31 32 33 34 35 36 ··· 49 下一页
摘要: 找到个地图的边缘 ,2个地名相互切换的地方比如这个地方可以 422,851,22使用工具把地图名称转换成UNICODE鹏程客栈4F 9E 0B 7A A2 5B 08 68剑仙城郊外51 52 D9 4E CE 57 CA 90 16 59 0D 00 0A 00CE搜索类型 array of byte能搜索20多个 判断方法:通过修改 数值 看游戏里的地图名称是否改变了 改变了正确通过右键查找 能找到地图名称的基址//=地图名称=[[[[[b3f6cc]+1c]+1c]+60]+4]+0改变名称 就对地图名称=[[[[[b3f6cc]+1c]+1c]+60]+4]+0这 个地图名称的数值写入 阅读全文
posted @ 2012-06-11 22:13 XE2011 阅读(457) 评论(0) 推荐(0)
摘要: procedure TForm1.Button1Click(Sender: TObject);{$j+}const i:integer=0;j:integer=0;{$j-}begininc(i);Dec(j);Self.Caption:=Format('Inc%d Dec%d',[i,j]);end;通过 Wiz 发布 阅读全文
posted @ 2012-06-10 09:12 XE2011 阅读(284) 评论(0) 推荐(0)
摘要: 下1级经验的地址=eax*4+00B408A8下级人物的经验值=[下1级经验的地址]eax=人物的等级lv =[[[B3F6CC]+1c]+34]+48cExpMin =[[[B3F6CC]+1c]+34]+49cExpMaxAddr =lv*4+00B408A8ExpMax=[ExpMaxAddr]经验百分比 =(ExpMin/ExpMax)*100 //带1个小数点通过 Wiz 发布 阅读全文
posted @ 2012-06-09 21:27 XE2011 阅读(288) 评论(0) 推荐(0)
摘要: unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Imaging.pngimage, ... 阅读全文
posted @ 2012-06-09 19:05 XE2011 阅读(234) 评论(0) 推荐(0)
摘要: 使用parent让进度条上显示文字 procedure TForm1.Button1Click(Sender: TObject);beginLabel1.Font.Color:=clRed;Label1.Transparent:=True;Label1.Alignment:=taCenter;Label1.Parent:= ProgressBar1;Label1.... 阅读全文
posted @ 2012-06-09 13:56 XE2011 阅读(447) 评论(0) 推荐(0)
摘要: //列表框//文本框//编辑框//组合框//单选框//检查框unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;typeTForm1 = class(TForm)ListBox1: TListBox;Button1: TButton;Button2: TButton;Memo1: TMemo;Button3: TButton;Button4: TButton;ComboBox1: TComboBo 阅读全文
posted @ 2012-06-09 13:51 XE2011 阅读(239) 评论(0) 推荐(0)
摘要: procedure TForm1.Button1Click(Sender: TObject);varF:TextFile;fName:string;beginfName:='error.txt';AssignFile(F,fName);if FileExists(fName)then Append(F)else Rewrite(F);Writeln(F,'this is string');CloseFile(F);end;通过 Wiz 发布 阅读全文
posted @ 2012-06-09 13:50 XE2011 阅读(150) 评论(0) 推荐(0)
摘要: {写1个错误的日志文件并记录错误的地方} //调用WriteErrorFile('Button1'); //tryexcept在这里放着end; procedureWriteErrorFile(str:string); var path:string;{FilePath} f:TextFile;{txtFile} et:string;{errortime} ef:string;{errorfile... 阅读全文
posted @ 2012-06-08 09:02 XE2011 阅读(202) 评论(0) 推荐(0)
摘要: //FormatDateTime 一段以时间为命令的代码procedure TForm1.Button1Click(Sender: TObject);varfilename,timename:string;beginfilename:='文件名_'; //这是一个变量名timename:=filename+FormatDateTime('yyyy"年"mm"月"dd"日_"dddd"_"hh"_"... 阅读全文
posted @ 2012-06-08 08:50 XE2011 阅读(221) 评论(0) 推荐(0)
摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Menus, ComCtrls, ToolWin, Buttons;type TForm1 = class(TForm) MainMenu1: TMainMenu... 阅读全文
posted @ 2012-06-07 23:07 XE2011 阅读(277) 评论(0) 推荐(0)
摘要: /* This file downloaded from Highend3d.com'' '' Highend3d.com File Information:'' '' Script Name: BVH Import v2.0'' Author: Sergiy'' Last Updated: August 4, 2002'' Update/Change this file at:'' http:/... 阅读全文
posted @ 2012-06-05 08:19 XE2011 阅读(457) 评论(0) 推荐(0)
摘要: /*globalMove01.sx = globalMove01.sz = globalMove01sy; lock and hide selected ScaleX ScaleZmodel显示template其余的只显示visibility其他的全部lock and hide selected*///groupgroup -em -name "charNode01";group -em -nam... 阅读全文
posted @ 2012-06-05 08:19 XE2011 阅读(161) 评论(0) 推荐(0)
摘要: //create curves string $cv1[] = ` circle -c 0 0 0 -nr 0 1 0 -sw 360 -r 1 -d 3 -ut 0 -tol 0.01 -s 8 -ch 0 `;//-ch 0 历史已关 string $cv2[] = ` circle -c 0 0 0 -nr 0 1 0 -sw 360 -r 1 -d 3 -ut 0 -tol 0.01 -s... 阅读全文
posted @ 2012-06-05 08:19 XE2011 阅读(131) 评论(0) 推荐(0)
摘要: /*abSymMesh v 1.7brendan ross 03.10.2004www.supercrumbly.comupdate -- 09.20.2004: "Select Moved Verts" button will select vertices that have been moved relative to the base mesh.update -- 3.21.2005: A... 阅读全文
posted @ 2012-06-05 08:19 XE2011 阅读(507) 评论(0) 推荐(0)
摘要: //advanced skeleton 3.5 update.//test in maya 2011.//this script is free.//adding match IK Fk feature for advanced skleton 3.5//writen by davood tabatabaei iran-mashhad-parshonar company.//email: davo... 阅读全文
posted @ 2012-06-05 08:19 XE2011 阅读(287) 评论(0) 推荐(0)
上一页 1 ··· 28 29 30 31 32 33 34 35 36 ··· 49 下一页