程式修改(缺源碼)請教哪位仁兄可以用匯編或某工具調整修改? ( 积分: 100 )

  • 主题发起人 主题发起人 hjandy
  • 开始时间 开始时间
H

hjandy

Unregistered / Unconfirmed
GUEST, unregistred user!
有個小程式缺源碼(備份源碼已坏掉)而要修改
目前已用DeDe Ver 3.50.02反編譯共有以下窗口
Unit1 in 'Unit1.pas' {TForm1},
Unit2 in 'Unit2.pas' {TForm2},
Unit3 in 'Unit3.pas' {TForm3},
Unit5 in 'Unit5.pas' {TForm5},
Unit7 in 'Unit7.pas' {TForm7},
Unit4 in 'Unit4.pas' {TForm4},
Unit6 in 'Unit6.pas' {TForm6},
Unit8 in 'Unit8.pas' {TForm8},
Unit9 in 'Unit9.pas' {TForm9},
Unit_main in 'Unit_main.pas' {TForm_main};
Unit_main 為主窗口
Unit_main->FormCreate沒有內容
Unit_main->FormShow有內容
Unit_main->FormActive沒有內容
希進入Unit_main窗口自動打開TForm4窗口

進入Unit_main后點擊F2或某按鍵時打開TForm4窗口就可以了
請教哪位仁兄可以用匯編或某工具調整修改?
(因TForm4窗口之前已被隱藏)
 
有個小程式缺源碼(備份源碼已坏掉)而要修改
目前已用DeDe Ver 3.50.02反編譯共有以下窗口
Unit1 in 'Unit1.pas' {TForm1},
Unit2 in 'Unit2.pas' {TForm2},
Unit3 in 'Unit3.pas' {TForm3},
Unit5 in 'Unit5.pas' {TForm5},
Unit7 in 'Unit7.pas' {TForm7},
Unit4 in 'Unit4.pas' {TForm4},
Unit6 in 'Unit6.pas' {TForm6},
Unit8 in 'Unit8.pas' {TForm8},
Unit9 in 'Unit9.pas' {TForm9},
Unit_main in 'Unit_main.pas' {TForm_main};
Unit_main 為主窗口
Unit_main->FormCreate沒有內容
Unit_main->FormShow有內容
Unit_main->FormActive沒有內容
希進入Unit_main窗口自動打開TForm4窗口

進入Unit_main后點擊F2或某按鍵時打開TForm4窗口就可以了
請教哪位仁兄可以用匯編或某工具調整修改?
(因TForm4窗口之前已被隱藏)
 
或者將TForm_main窗口Button2按鍵內容如下(經Dede3.5反編譯)
procedure TForm_main.Button2Click(Sender : TObject);
begin
(*
00495E7C C3 ret
*)
end;

改成如下
procedure TForm_main.Button2Click(Sender : TObject);
begin
try
Application.CreateForm(TForm9, Form9);
Form9.SpeedButton2.Visible := True;
Form9.ShowModal();
finally
Form9.Release;
end;
end;
 
偶可以试试,程序呢?
 
弄潮儿.NET,请告诉我你EMail
 
后退
顶部