Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Компонент WebBrowser   Найти похожие ветки 

 
man_of_sense ©   (2010-05-17 22:36) [0]

У меня на форме есть компонент WebBrowser, а также есть папка на CD-диске, где находится web-сайт. Как сделать так, чтобы в компоненте WebBrowser отображалась главная страница этого сайта? При этом CD-диск может быть определён на разных компьютерах под разными буквами.


 
И. Павел ©   (2010-05-17 23:10) [1]

CD-ромов может быть много. Если диск нельзя идентифицировать по размеру или чему-то еще, то можно проверить все подряд:

procedure TForm1.Button1Click(Sender: TObject);
var letter:char;
begin
 for letter:="B" to "Z" do
   if FileExists(letter+":\path\index.html") then
   WebBrowser1.Navigate(letter+":\path\index.html");
end;


 
MonoLife ©   (2010-05-18 06:24) [2]


> И. Павел ©   (17.05.10 23:10) [1]
> CD-ромов может быть много.


>  if FileExists(letter+":\path\index.html") then
>    WebBrowser1.Navigate(letter+":\path\index.html");

 if FileExists(letter+":\path\index.html") then
  begin
    WebBrowser1.Navigate(letter+":\path\index.html");
    break;
  end;



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

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.066 c
2-1269956469
sanya
2010-03-30 17:41
2010.08.27
Экспорт данных в StringGrid


2-1273825369
Elephon
2010-05-14 12:22
2010.08.27
Заполнение listview


9-1186514939
max_
2007-08-07 23:28
2010.08.27
поиск столкновений


2-1268752361
Lionelles
2010-03-16 18:12
2010.08.27
Вычисления в БД на Delphi


3-1221825053
Антон
2008-09-19 15:50
2010.08.27
Настройка доступа из Delphi к Access через ADO