URL w ShowMessage.

0

Witam!

Mam dość prosty problem, lecz nie mogę znaleźć rozwiązania. Chciałbym, aby w okienku ShowMessage był wyświetlony link do strony (standardowe hiperłącze) i po kliknięciu po prostu otwierał się w przeglądarce.

ShowMessage('http://4programmers.net/Forum');

Co tutaj powinienem zmienić aby to zadziałało. Szukałem coś na temat html w delphi oraz napotkałem się na HTTPGet1.URL jednak nie wiem jak do zastosować w moim przypadku.

Z góry dziękuje za pomoc.;)

0

w standardowym okienku ShowMessage się nie da. Jak chcesz coś takiego to albo poszukaj gotowca albo stwórz własne okienko

0

a dajmy na to żeby po kliknięciu na button od razu przechodziło na stronę?

1 
uses
  ShellApi;

procedure TForm1.Button1Click(Sender: TObject);
const
  URL = 'http://4programmers.net/Forum';
begin
  if (Application.MessageBox(PAnsiChar('Czy chcesz otworzyć stronę ' + URL),
     PansiChar(Application.Title), MB_YESNO or MB_ICONQUESTION)) = IDYES then
  ShellExecute(0, 'open', PAnsiChar(URL), nil, nil, SW_SHOW);
end;
0

Dzięki wielkie o to chodziło;) Jeszcze raz dzięki już mniej więcej kumam z czym to jeść;)

1 użytkowników online, w tym zalogowanych: 0, gości: 1