| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Открытие url

ssss ©   (2006-12-06 22:41:00) 

Всем доброго суток времени...
Подскажите как можно открыть страницу интернета только не в новом окне а внутри приложения delphi на ум приходит только один овтет это надо делать браузер своими руками.....может есть какой нибудь компонент и не подсказывайте пожалуйста TWebBrowser  он все открывает в новом окне...И не подсказывайте пожалуйста процедуры типа
procedure OpenURL(Url: string);
var
  ts: string;
begin
  with TRegistry.Create do
    try
      rootkey := HKEY_CLASSES_ROOT;
      OpenKey('\htmlfile\shell\open\command', False);
      try
        ts := ReadString('');
      except
        ts := '';
      end;
      CloseKey;
    finally
      Free;
    end;
  if ts = '' then Exit;
  // remove quotes and commandline parameters
 ts := Copy(ts, Pos('"', ts) + 1, Length(ts));
  ts := Copy(ts, 1, Pos('"', ts) - 1);
  ShellExecute(0, 'open', PChar(ts), PChar(url), nil, SW_SHOW);
end;
все тоже открывает в новом окне...
Заранее благодарен!

---

Palladin   (2006-12-07 21:44:00) [1]

а там что? елка новогодняя чтоли?

---

ssss   (2006-12-07 21:40:00) [2]

я имел ввиду а нельзя пример привести?

---

ssss   (2006-12-07 21:04:00) [3]

Удалено модератором

---

Palladin   (2006-12-07 08:24:00) [4]

%delphi%\Demos\CoolStaf

---

ssss   (2006-12-06 23:36:00) [5]

допустим не умею а рецепт нельзя подсказать?

---

Palladin   (2006-12-06 22:45:00) [6]

> и не подсказывайте пожалуйста TWebBrowser  он все открывает
> в новом окне...

вы не любите кошек? вы просто не умеете их готовить

---

Наверх