有没有兴趣把您自己（高手）放入这个循环？？？？？？？

Question

本人刚申请这个号码，想请问一个小问题
var 
  a : Integer;
if 大家知道怎样让EXE文件在（d7版，WIN2K server环境）下运行时修改自己的Edit1.text值 then
 begin
  For a := 100 To 400 do
   begin
    加A分；
   end;
 end;

Answer 1

什么意思？是在运行时改变Edit中的内容吗？不会问这么简单的吧？就是
Edit1.Text:='要显示的字符串'；就可以啦？？
－－－－是不是我理解的太简单了？？

Answer 2

靠，刚才出问题了！你的问题只出了前面的四行，所以造成我的可笑的回答！不好意思啦！不过你的问题也是不正确的，因为Delphi不支持在For循环中修改循环变量的值！如果一定要修改的话，用别的方法实现吧！比如While循环。
b:=100;
while b<=400 do
begin
  加A分;
  Inc(B);//等同于b:=b+1,但效率更高些！
end;

Answer 3

运行时修改EXE文件本身，本人的最终目的是想把password的String放在EXE文件里，请帮忙解决好吗，给你400分

Answer 4

8.让应用程序自身删除 　　原理：在应用程序刚要退出之前创建一个Delself.bat文件，让它先删除应用程序，然后删除自身。在Form的OnClose事件中加入下列代码： 　　AssignFile(F, ′delself.bat′);Rewrite(F);{F为TextFile类型} 　　WriteLn(F,′del ′＋ExtractFileName(Application.ExeName)); 　　WriteLn(F,′del ％0′);CloseFile(F); 　　WinExec(′delself.bat′,SW—HIDE); 这个可以变相的实现 你把写好密码的副本EXE 再改名成自身就行了

Answer 5

把密码直接写在EXE文件的尾部最后一个字节以后！
var
  File :TFileStream;
begin
  File :=TFileStream.Create(你的EXE文件的路径, 打开方式);
  File.Seek(File.size, soEnd);
  File.Write(你要写的字符串, 字符串大小);
  File.Free;
end;

Answer 6

Windows下的EXE文件结构比较复杂，有的程序还有校验和，当发现自己被改变后会认为自己被病毒感染而拒绝执行。基本上还是要借助另外一个程序来实现的直接修改自己……