Frage zur folgender Stelle:
Delphi-Quellcode:
procedure TForm1.OnURLMenuItemClick(Sender: TObject);
begin
if(Sender is TMenuItem) and
((Sender as TMenuItem).Hint <> '') then
ShellExecute(self.Handle,'open',pchar((Sender as TMenuItem).Hint),
nil,nil,SW_SHOWNORMAL);
end;
Mit diesem Code öffnet mein Programm den Internet Explorer (, also den Standartbroser von Windoof). Was muss man da ändern, damit er den link "xy" im programm selbst im TWebBrowser öffnet?
Und so nebenbei. Weiss vielleicht jemand, wie man eigenen Browser zum Standartbroser von Windoof macht?