TWebBrowser

← →
brother © (2006-08-18 10:47) [0]

как в TWebBrowser убрать полосы прокрутки?

← →
DiamondShark © (2006-08-18 11:06) [1]

1. В загружаемом документе добавить стиль:

BODY { overflow: hidden }

2. Если исходник документа изменить нельзя, заменить стиль после загрузки.
Например, в NavigateComplete

← →
brother © (2006-08-18 11:10) [2]

нет документ изменить нельзя, а можно примерчик или ссылочку... чтот я не оч понял что имелось ввиду
> 2. Если исходник документа изменить нельзя, заменить стиль
> после загрузки.Например, в NavigateComplete

← →
brother © (2006-08-18 11:13) [3]

Хотя, лучше так, на чем отобразить часть Веб страницы (баннер. итд) или рисунок выполняемый php скриптом?

← →
Ketmar © (2006-08-18 11:23) [4]

> [3] brother © (18.08.06 11:13)
на экране?

← →
brother © (2006-08-18 11:25) [5]

на любом объекте формы...

← →
Ketmar © (2006-08-18 11:29) [6]

> [5] brother © (18.08.06 11:25)
ну вот, сам и ответил. токль не на любом объекте, а на любом видимом компоненте, где рисовать можно. ты бы это... уточнил, что ли. заодно сказал бы, чем IE не нравится.

← →
brother © (2006-08-18 11:31) [7]

> > [5] brother © (18.08.06 11:25)ну вот, сам и ответил.
> токль не на любом объекте, а на любом видимом компоненте,
> где рисовать можно. ты бы это... уточнил, что ли. заодно
> сказал бы, чем IE не нравится.

Полосы прокрутки... и форматирование в этом ВИДИМОМ объекте не очень...

← →
Ketmar © (2006-08-18 11:35) [8]

> [7] brother © (18.08.06 11:31)
вообще-то это от документа зависит...

← →
brother © (2006-08-18 11:39) [9]

На HTML и др намекаешь :) Я это понимаю, но видимо IE, и ничего др?
Жаль... Так что с полосами прокрутки делать посоветуете?

← →
DiamondShark © (2006-08-18 11:47) [10]

procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.Navigate("about:blank"); end; procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant); begin OleVariant(pDisp).document.body.style.overflow := "hidden"; end;

-------------
злое ЗЫ
я уже привык, что после совета "используй фичу ХХХ" никто не спешит набрать в индексе справки "фича ХХХ"

← →
Ketmar © (2006-08-18 11:50) [11]

> [10] DiamondShark © (18.08.06 11:47)
так ведь сразу же ясно, что ничего хорошего не посоветуют.

Большое спасибо DiamondShark ! А может что о форматировании док-та в этом объекте посоветуешь?

Что именно о форматировании?

В такой постановке могу пока только
http://msdn.microsoft.com/workshop/author/dhtml/reference/dhtml_reference_entry.asp
посоветовать.

Загружаем катринку в IE. А у нее отступы left и top относительно left и top IE. Это, что гарантировано IE (для дизайна или как...) Вот эти отступы убрать бы...

Ко всему, что видно в WebBrowser имеется доступ через DHTML.

procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.Navigate("http://www.delphimaster.ru/i/logo.gif"); end; procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant); begin OleVariant(pDisp).document.body.style.margin := "0px"; OleVariant(pDisp).document.body.style.backgroundColor := "fuchsia"; OleVariant(pDisp).document.body.firstChild.style.border :="5 solid red"; OleVariant(pDisp).document.body.innerHTML := OleVariant(pDisp).document.body.innerHTML + "<BR><H1 style="color:maroon">Pure Free XXX</H1>"; end;

Ссылка на подробную доку по DHTML была чуть раньше.

Огромное спасибо...

> Ссылка на подробную доку по DHTML была чуть раньше.

Трудно в куче разбираться да и пока найдешь нужное. Я все прекрасно понимаю, надо самому итд. ....

TWebBrowser Найти похожие ветки