Редактор скриптов

Avatar
  • обновлен
При открытии помощника вставки каналов….показываются все названия каналов в урезанном виде. Вводятся тоже урезанные. Так было задумано ? Или это такая неудобная функция ?
Image 137
65.jpg
Avatar
Вадим
Добрый вечер.
В редакторе скриптов список каналов представлен в развёрнутом виде (без группировки и сортировки)
Как в таком случае искать среди пару сотен каналов нужный (не говоря о тысяче)
К тому же коряво работает прокрутка.
Avatar
SIMP Tech (Сергей)
Добрый вечер.

Добрый вечер, не устранена ли данная проблема?

Да. На сайте доступна версия 4.4.0.137, в ней эта ошибка исправлена.
Avatar
Вадим
Добрый вечер, не устранена ли данная проблема?
Avatar
SIMP Tech (Сергей)
День добрый.

Проверили Ваш пример, вывода в канал действительно нет, проверяем у себя в чем может быть проблема. Спасибо.
Avatar
Вадим
Странно, но copy/paste поел часть скрипта… :dry:

<a href="/s/attachments/19809/1/0/4d97fd258ddfdb639578ff0150f5a7af.txt" class="i_item_file"><i class="icon-file"></i> .txt</a>
.txt
Avatar
Вадим
как-то так

Var r, i: Integer;
mas: array[1..10] of char;
str1: string;

begin
r:=ReadValue('var');
if r = 1 then
Begin
str1:= LoadFromTxtFile('c:\test.txt',0);

for i := 1 to 10 do
begin
mas:= copy(str1, i, 1);
ShowMessage(mas);
WriteValue('s '+IntToStr(i),Ord( mas));
end;


{ WriteValue('s 1',Ord( mas[1]));
WriteValue('s 2',Ord( mas[2]));
WriteValue('s 3',Ord( mas[3]));
WriteValue('s 4',Ord( mas[4]));
WriteValue('s 5',Ord( mas[5]));
WriteValue('s 6',Ord( mas[6]));
WriteValue('s 7',Ord( mas[7]));
WriteValue('s 8',Ord( mas[8]));
WriteValue('s 9',Ord( mas[9]));
WriteValue('s 10',Ord( mas[10])); }
end ;

end.
Avatar
SIMP Tech (Сергей)
что-то так не пишет в канал

текст скрипта скопируйте сюда. посмотреть.
Avatar
Вадим
что-то так не пишет в канал
Avatar
SIMP Tech (Сергей)
Подскажите ещё, пожалуйста, как передать
функции WriteValue('Имя каналы',Out1); имя канала в виде переменной

В текущей версии Simp, есть определенные ограничения на объявление переменной с именем канала.
можно сделать к примеру так:
Допустим у нас есть каналы:

Канал 1
Канал 2
Канал 3

тогда в цикле можно записать все три канала:

for i := 1 to 3 do
begin
WriteValue('Канал ' + IntToStr(i), Out1);
end;
Avatar
SIMP Tech (Сергей)
Так работает, спасибо.
Хотя и специфичный синтаксис.

Синтаксис ближе к Object pascal.