程式修改(缺源碼)請教哪位仁兄可以用匯編或某工具調整修改? |
|
尚未結案
|
|
hjandy
一般會員   發表：11 回覆：4 積分：3 註冊：2004-03-18 發送簡訊給我 |
有個小程式缺源碼(用Delphi7写)(備份源碼已坏掉)而要修改(重写费时) 目前已用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窗口就可以了 請教哪位仁兄可以用匯編或用什么工具可調整修改?
|
|
hjandy
一般會員 發表：11 回覆：4 積分：3 註冊：2004-03-18 發送簡訊給我 |
或者將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;
|
|
dan59314
中階會員  發表：121 回覆：107 積分：86 註冊：2002-08-16 發送簡訊給我 |
>>希進入Unit_main窗口自動打開TForm4窗口 可以在 mainform 的 onactivate 內加入 procedure TForm_main.FormActivate(Sender: TObject);
begin
//Self.Refresh;
//Application.ProcessMessages; Application.CreateForm(TForm2, Form2);
form2.Caption:='form2';
form2.showModal;
Form2.free;
end; 軟還要更軟，我的Artwork
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=27674 Chinese Girl in Rhino3D
http://rhino3d.com/gallery/figure/girl.htm
|
|
hjandy
一般會員 發表：11 回覆：4 積分：3 註冊：2004-03-18 發送簡訊給我 |
因程式缺源碼(用Delphi7寫)(備份源碼已坏掉)而要修改(重寫費時)，故只能直接修改執行文件(Project.exe)。請教那位仁兄可以(用匯編或告知用什么工具改寫)幫忙將下面
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;
(或參考主題內容單擊F2之類打開Form9窗口) 謝!! 發表人 - hjandy 於 2005/02/18 12:05:08
|
發表時間：2005-02-06 13:44:35
IP:59.36.xxx.xxx 未訂閱
系統時間：2024-04-29 4:51:04
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |