Электронный учебник на Delphi

[Katerina N]

Привет всем. Я бы хотела попросить совета у опытных программистов. Кто-нибудь может помочь или подсказать, как можно написать электронный учебник с использованием HTML-страниц на Delphi. Пожалуйста помогите, диплом горит, мало времени

[Stilet]

Ну от Делфи требуется отображение HTML или чего-то большего?

[Lerik]

ты хочешь в HTML просто описать Delphi или что?

[hoza_syl]

Если ты подготовишь все тексты учебника в html страницах, то от проги требуется только отобразить их. Для отображения существует компонента TWebBrowser c вкладки Internet. Достаточно только разместить ее на форме и где то в проге написать:

WebBrowser1.Navigate('Полный или относительный путь к html или адрес в и-нете');

[lexey]

А как сделать чтобы при загрузке другой страници со следующей лекцией на соседней вкладке появлялсе тест по данной лекции. Что-то затруднил меня этот вопрос. Идея была динамически загружать вопросы теста, предворительно удалив все предъидущие элементы с вкладки. Но что-то мне кажется это уж больно геморойно. Может подскажите способ по проще??

[Naive]

Извините за некропост.

Сообщение от hoza_syl

WebBrowser1.Navigate('Полный или относительный путь к html или адрес в и-нете');

Относительный путь незагружается, или я что-то не так делаю?
procedure TForm1.Button1Click(Sender: TObject);
begin
webbrowser1.Navigate('/11/index.htm');
end;
Подскажите, как быть. Программа будет сама создавать ХТМЛ-учебник, при таком создании, относительный путь в папку "11" работает, а вот веб-браузер при помощи того-же относительного путя не открывает. Полный путь работает, но для задачи это не подходит. Может можно каким-либо образом узнать путь в корневую папку проекта на определенной машине(т.е. если я перенесу на другой комп или запишу на диск, то открывать также небудет)?
Или другой вариант, можно ли динамически узнать путь в "мои доки" на машине при данном пользователе.

[Anatole]

Полный путь к запущеному выполняемому файлу, вместе с именем этого файла, хранится в переменной ParamStr[0]

[Naive]

Сообщение от Anatole

Полный путь к запущеному выполняемому файлу, вместе с именем этого файла, хранится в переменной ParamStr[0]

 edit1.Text:=ParamStr[0];

Выдает ошибку "not enought actual param".
Если не сложно, поясните, как пользоваться этой переменной. Спасибо за помощь.

[Stilet]

Это функция

edit1.Text:=ParamStr(0);

Может можно каким-либо образом узнать путь в корневую папку проекта на определенной машине

Да

:=ExtractFilePath(paramStr(0));

[Naive]

Сообщение от Stilet

Это функция

О_о
почувствовал себя нереально глупым) спасибо огромное)