[iOS, Android] Как загрузить html страницу из файла?
uses
{...,} System.IOUtils;
procedure TForm1.Button1Click(Sender: TObject);
const
TEMPORARY_FILE_NAME = 'temp.html';
FORMAT_URL_OPEN_FILE = 'file:///%s';
var
HTMLPage: TStrings;
TemporaryFileName: string;
begin
HTMLPage := TStringList.Create;
try
// Создание контента страницы
HTMLPage.Add('<!DOCTYPE HTML>');
HTMLPage.Add('<html>');
HTMLPage.Add(' <head>');
HTMLPage.Add(' <title>Local page</title>');
HTMLPage.Add(' </head>');
HTMLPage.Add(' <body>');
HTMLPage.Add(' <p>Page content</p>');
HTMLPage.Add(' </body>');
HTMLPage.Add('</html>');
// Кроссплатформенный запрос на получение места хранения временных файлов
TemporaryFileName := TPath.Combine(TPath.GetTempPath, TEMPORARY_FILE_NAME);
// Сохраняем страницу во временный файл
HTMLPage.SaveToFile(TemporaryFileName);
// Загружаем файл в браузере
WebBrowser1.URL := Format(FORMAT_URL_OPEN_FILE, [TemporaryFileName]);
finally
HTMLPage.Free;
end;
end;
|
