Source Code
 

Hi,

Does anyone know if the makers of Xolox are going to release the source code?

Then we could start up an open source project.

If they're not going to release it... wouldn't we be able to reverse-engineer it?

I think it has been written in Turbo Pascal
What do you guys think?

decompiling is almost always terribly hard if not impossible

besides, you lose comments, an invaluable asset

I heard it was written in Delphi... but I could be wrong.

yeah
 

binary looks like it was made in Delphi yes

Xolox is in Delphi
 

Hm,
try to open xolox with the resource hacker.
http://rpi.net.au/~ajohnson/resourcehacker/

Nice Code:
TMAINFORM:
bject MainForm: TMainForm
Left = 160
Top = 145
Width = 1014
Height = 815
VertScrollBar.Position = 250
Caption = 'w'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object StatusBar1: TStatusBar
Left = 0
Top = 770
Width = 990
Height = 18
Panels = <
item
Bevel = pbNone
Text = 'Logging in on network'
Width = 200
end>
SimplePanel = False
end
object Panel3: TPanel
Left = 0
Top = -225
Width = 990
Height = 80
Align = alTop
BevelInner = bvLowered
TabOrder = 1
object ToolBar2: TToolBar
Left = 2
Top = 2
Width = 213
Height = 76
Align = alLeft
AutoSize = True
BorderWidth = 2
ButtonHeight = 66
ButtonWidth = 60
Caption = 'ToolBar2'
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
HotImages = ButtonListOn
Images = ButtonOfflist
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton3: TToolButton
Left = 0
Top = 0
Hint =
'Search for digital content (music, video, pictures, programs, et' +
'c.) on the gnutella network '
Caption = 'Search'
Down = True
Grouped = True
ImageIndex = 0
ParentShowHint = False
ShowHint = True
Style = tbsCheck
OnClick = ToolButton3Click
end
object ToolButton2: TToolButton
Left = 60
Top = 0
Width = 9
Caption = 'ToolButton2'
Grouped = True
ImageIndex = 2
Style = tbsSeparator
end
object ToolButton1: TToolButton
Left = 69
Top = 0
Hint = 'Watch the progress of your current downloads and uploads'
Caption = 'Transfers'
Grouped = True
ImageIndex = 1
ParentShowHint = False
ShowHint = True
Style = tbsCheck
OnClick = ToolButton1Click
end
object ToolButton11: TToolButton
Left = 129
Top = 0
Width = 8
Caption = 'ToolButton11'
Grouped = True
ImageIndex = 4
Style = tbsSeparator
end
object ToolButton6: TToolButton
Left = 137
Top = 0
Hint = 'View all downloaded and shared files on your computer'
Caption = 'Files'
Grouped = True
ImageIndex = 2
ParentShowHint = False
ShowHint = True
Style = tbsCheck
OnClick = ToolButton6Click
end
object ToolButton5: TToolButton
Left = 197
Top = 0
Width = 8
Caption = 'ToolButton5'
ImageIndex = 3
Style = tbsSeparator
end
end
end