Форум программистов, компьютерный форум CyberForum.ru

Lazarus

Войти
Регистрация
Восстановить пароль
 
pavellevshic
8 / 8 / 2
Регистрация: 07.11.2016
Сообщений: 60
Записей в блоге: 1
#1

Скрипт Java из файла .txt fpCEF3 Chromium - Lazarus

24.12.2016, 14:38. Просмотров 197. Ответов 1

Есть файлик, в нём скрипт из 5000+ строк (но вроде ява и в строчку записываться), как его впихнуть в процедуру запрашивающую string скрипт, если (на сколько мне известно) string ограничена 256 символами...

Pascal
1
Chromium1.Browser.Mainframe.ExecuteJavaScript(('ява скрипт из файла'), 'about:blank', 0);
пытался зрабить вот так
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  MainForm: TMainForm;
  ScriptList:TStringList;
  ScriptString:string;
  NumberScript:integer;
//Не знаю в то ли русло...
procedure Script(a:integer);
var
i:integer;
begin
  ScriptList.LoadFromFile('js'+IntToStr(a)+' ( 5000 ).txt'); //Берём файлик .txt
   for i:=0 to ScriptList.Count-1 do
    ScriptString:=ScriptString+ScriptList[i];  //переводим всё в строку
   ShowMessage(ScriptString);  //До этого даже не доходит программа молчит... даже "Не отвечает" нету
  Chromium1.Browser.Mainframe.ExecuteJavaScript(ScriptString, 'about:blank', 0);
end;
Пытался ждать минуту, нет ответа от ShowMessage...
По тому ли руслу я иду?, хотя бы такой ответ интересен...
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.12.2016, 14:38     Скрипт Java из файла .txt fpCEF3 Chromium
Посмотрите здесь:

Процессы завершение Chromium (fpCEF3) - Lazarus
Начинаю замечать, что после закрытия формы(единственной формы), вся программа не закрывается (бывает и закрываеться, бывает и ошибка при...

Изменение HTML кода в Chromium (fpCEF3) - Lazarus
Как изменить HTML код в Chromium на Lazarus? Есть, вариант скачивать html файл, изменить и запустить локально; Но он не подойдёт,...

Вывод HTML кода в Chromium(fpCEF3) - Lazarus
Как вывести, HTML код загруженного сайта в Chromium? Lazarus... Пример на Дельфиprocedure callback(const str: ustring); begin ...

Из txt файла на сайт - Lazarus
Есть файл txt,в нем примерно такой код 123456789 987654321 и таких строк очень много,нужно из txt файла брать по 1 строке и вставлять...

Вывод Txt файла в Memo - Lazarus
здравствуйте, помогите пожалуйста выяснить проблему. Дело в том, что я написала программу, которая после опеделения (например...

Открытие *txt файла через TOpenDialog - Lazarus
var KIV_Box: TStringList; i: Integer; begin if OpenDialog1.Execute then begin KIV_Box:= TStringList.Create; ...

Парсинг txt файла, как лучше сделать? - Lazarus
Задача следующая есть стандартный txt файл, его размерность может достигать до 1-2 Мб Его структура примерно такая... Например вот...

Cчитывание из файла текста в формате txt, и запись его в StringGrid - Lazarus
Доброе время суток!) С недавних пор начали писать программы в Lazarus.. За период обучения появились некоторые проблемы. Вообщем суть...

StringGrid неправильно отображает русские буквы из текстового файла базы txt - Lazarus
StringGrid неправильно отображает русские буквы из текстового файла базы txt. Программу писал когда была установлена винда 8.1. Все...

Применение Настроек в Chromium - Lazarus
У Хромиума Есть опции (Например загрузка изображений, поддержка JS и тд и тп). Я пытался сделать удобное для пользователя окно с...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Kitayets
300 / 253 / 50
Регистрация: 09.09.2011
Сообщений: 859
25.12.2016, 00:33     Скрипт Java из файла .txt fpCEF3 Chromium #2
Сообщение было отмечено автором темы, экспертом или модератором как ответ
В лазарус-е по умолчанию длинные строки и они не имеют ограничений по длине, сколько памяти хватит, или сколько можно адресовать. И я думаю, что скрипт на целиком грузить, а не построчно, иначе фигня получится.

Добавлено через 2 минуты
Delphi
1
2
3
4
5
6
7
8
9
10
11
var
  //...
  stream: TStringStream;
  fstream: TFileStream;
begin
  try
    fstream:= TFileStream.Create('js'+IntToStr(a)+' ( 5000 ).txt', fmOpenRead);
    stream:=  TStringStream.Create('');
    stream.CopyFrom(fstream, fstream.Size);
    Chromium1.Browser.Mainframe.ExecuteJavaScript(stream.DataString, 'about:blank', 0);
    //...
Yandex
Объявления
25.12.2016, 00:33     Скрипт Java из файла .txt fpCEF3 Chromium
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru