Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.12.24;
Скачать: [xml.tar.bz2];

Вниз

Открытие url   Найти похожие ветки 

 
ssss   (2006-12-06 22:41) [0]

Всем доброго суток времени...
Подскажите как можно открыть страницу интернета только не в новом окне а внутри приложения 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-06 22:45) [1]


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

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


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

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


 
Palladin ©   (2006-12-07 08:24) [3]

%delphi%\Demos\CoolStaf


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

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


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

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


 
Palladin ©   (2006-12-07 21:44) [6]

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



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.12.24;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.04 c
15-1164887458
UMU
2006-11-30 14:50
2006.12.24
Распознаватели текста


15-1165266043
Cerberus
2006-12-05 00:00
2006.12.24
Почему возникает ошибка при попытке чтения блока.


15-1164798403
DevilDevil
2006-11-29 14:06
2006.12.24
"TUnRar без Dll" - моя первая статья


15-1164981137
tesseract
2006-12-01 16:52
2006.12.24
Гм, гредёт новый виток беспорядков?


2-1165417135
alexa14
2006-12-06 17:58
2006.12.24
Значки в popupmenu





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский