You need to install the component URLBtn to get the most of the example. 
Install the component via the menu Component, Install component into a new package or an existing one, control the path of URLBtn is into your library path.
The URLBtn appears on your component palette under the tab TacTicToe.
Open URLBtn.Pas to know how it works if you want to.
However if you do not want to... fair enough, you can replace all the instances of URLBtn with the button of your choice, in this case the onclick event of Your stuff must be something like that : 

For URLBtn1  replaced by your stuff:

ShellExecute(0,nil,PChar(ExtractFilePath(Label1.Hint)),nil,nil,SW_NORMAL);

For URLBtn2 replaced by your stuff2:

ShellExecute(0,nil,PChar(Label1.Hint),nil,nil,SW_NORMAL);

and For URLBtn2 replaced by your stuff3:

ShellExecute(0,nil,PChar(Edit1.Text.Hint),nil,nil,SW_NORMAL);

Delete all References of  URLBtn1, URLBtn2 and URLBtn3.

Delete URLBtn from your uses

