Jak ustawić wielkość okna z delphi a plik w HTML'u

0

Witam,
mam napisany program w delphi oraz plik pomocy napisany w HTML'u. Procedura która go wywołuje plik pomocy:

procedure TForm1.BitBtn5Click(Sender: TObject);
begin
ShellExecute(Handle, 'open', PChar(ExtractFilePath(Application.ExeName)+'\pomoc.html'), nil, nil, SW_SHOWNORMAL);
end;

Zawartość pliku HTML

<html> 1. Uruchamianie programu
</html>

kliknięcie powoduje przeniesienie do tekstu:

<html>

1. Uruchamianie programu

Tutaj zawarty tekst co należy zrobić itd. </html>

Plik otwiera się na cała wielkość ekranu monitora.
Teraz pytanko jak ograniczyć ustawić daną wielkość okna pliku pomocy ?

W html'u jest tak komenda która to robi:

<html>

0

Ale to nie Delphi JavaScript. Dorzuć do pliku pomocy sekcję <body>, a w jej tagu otwierającym:

<body onLoad="window.resizeTo(500, 640);">
0

Witam
ta komenda z html'a działa w html'u. Czyli tak:
masz jakąś stronę napisaną html'u i w środku ten kod:

<html>

</html>

to po kliknieciu na tem link otworzy się druga strona o zadeklarowanej wielkości czyli 500 na 640
I teraz jest pytanie jak to zrobić w delphi żeby tak działało jak w HTML'u ?
Serdecznie pozdrawiam i proszę o wyrozumiałość
waldi

0

Sorki, wdarła mi się literówka. Poprawiłem. Jak już pisałem Delphi nie ma tu nic do gadania. To JavaScript.
Zmień plik pomocy na:

<html>
<body onLoad="window.resizeTo(500, 640);">
<a href="#id-Uruchamianie-programu">1. Uruchamianie programu</a><br/>
</body>
</html>

Ta instukcja:

<a class=menu  href="javascript&#058;displayWindow('../nazwa_kataloguj/nawza_pliku.html',500,640)">

mówi "po kliknięciu w ten leik otwórz nawza_pliku.html w nowym oknie 500x640

Natomiast moja instrukcja:

<body onLoad="window.resizeTo(500, 640);">

mówi "po załadowaniu bieżącej strony zmień rozmiar okna na 500x640"

0

Witam
Wszystko działa tak jak chciałem. Strona wyświetla sie w wymiarach w takich jakich chciałem.
Serdecznie pozdrawiam i dziekuje za pomoc
waldi

1 użytkowników online, w tym zalogowanych: 0, gości: 1