[beginner01]

Hola.

Recuerda poner las etiquetas [delphi][/ DELPHI] para encerrar el código.

Prueba así.

Código Delphi [-]

procedure TForm1.Button2Click(Sender: TObject);
begin
  ShellExecute(self.handle, 'open', PChar(Edit1.Text), nil, nil,
  SW_SHOWNORMAL);
end;