首先用Peid查殼,程序并沒有加殼是Delphi編寫的。用dede打開程序并分析,分析的過程中我們就要猜測廣告是通過什么方式被設置或下載的。
分析完成后,我們首先來看看主窗體中的窗體資源,很快可以發現用來播放廣告的組件是TWBS1。
代碼如下:
object pnl3: TPanel
Left = 244
Top = 0
Width = 470
Height = 60
Color = clWhite
TabOrder = 0
object TWBS1: TWebBrowser
Left = -11
Top = -17
Width = 580
Height = 193
TabOrder = 0
ControlData = {
4C000000F23B0000F21300000000000000000000000000000000000000000000
000000004C000000000000000000000001000000E0D057007335CF11AE690800
2B2E126208000000000000004C0000000114020000000000C000000000000046
8000000000000000000000000000000000000000000000000000000000000000
00000000000000000100000000000000000000000000000000000000}
end
end |
懂Delphi得朋友可能很快就會想到,這個組件通常是通過Navigate或Navigate2來設置url顯示網頁的。如
procedure Navigate(const URL: WideString); overload; |
我們猜測Navigate可能是在主窗體的OnCreate或者某個TTimer組件的OnTimer中調用,所以來到dede中選擇過程頁,接著選擇Unit1既主窗體的單元找到FormCreate過程對應與OnCreate事件。
代碼如下: