Código Delphi [-] procedure TForm1.Button2Click(Sender: TObject); begin ShellExecute(self.handle, 'open', PChar(Edit1.Text), nil, nil, SW_SHOWNORMAL); end;
procedure TForm1.Button2Click(Sender: TObject); begin ShellExecute(self.handle, 'open', PChar(Edit1.Text), nil, nil, SW_SHOWNORMAL); end;