Кибор :: Версия для печати

101. nmf234 - 27 Декабря, 2019 - 21:24:51 - перейти к сообщению

Всех с наступающим!) в общем есть такая штука: messagebox (format( #A[0] )); - (не знаю что это, но мне нужна обычная переменная)

а взял я ее отсюда:(для просмотра ссылки Вам необходимо авторизоваться)
мое "гениальное" int x= (format( #A[0] )); увы не сработало) помогите, пожалуйста Растерялся

102. Zireael - 27 Декабря, 2019 - 21:31:17 - перейти к сообщению

Цитата:

messagebox (format( #A[0] )); - (не знаю что это, но мне нужна обычная переменная)

CODE:

int x=123;
messagebox(x);

103. nmf234 - 27 Декабря, 2019 - 21:42:21 - перейти к сообщению

я плохо объясняю) там в общем код, чтобы после распознавания шумы убрать. и в конце оно становится " (format( #A[0] )); " этим и там хранится число. мне нужно эту штуку сделать переменной, например x.

104. Zireael - 27 Декабря, 2019 - 22:04:25 - перейти к сообщению

CODE:

char A[10]={'1', '2','3', 0};
messagebox (format( #A[0]));

int x=formatsn(format( #A[0]));
messagebox(x);

105. nmf234 - 27 Декабря, 2019 - 22:05:11 - перейти к сообщению

там в теме все было, оказывается. каюсь) код сложный для меня, простите что отвлек)

но ваш вариант это как раз то что я искал)

106. Zireael - 30 Декабря, 2019 - 12:13:37 - перейти к сообщению

Цитата:

как с помощью кибора нарисовать прямоугольник с полупрозрачной заливкой. Может можно както через winapi?

code (Отобразить)

107. Kamrad - 10 Февраля, 2020 - 11:52:38 - перейти к сообщению

Здравствуйте жители форума.
Я делаю программу которая будет доставать текст из окна,читать его и вычленять нужные символы из него,вернее это будут числа.
Можно ли это реализовать с помощью Кибора?Я знаком с Паскалем и Делфи на уровне лабораторных ВУЗа и могу работать со строками и файлами,но боюсь что эту программу я на Паскале не сделаю,алгоритм вычленения не совсем ясен,числа каждый раз разные и находятся в разных местах текста.
Вот я и подумал может с помощью визуального программирования проще решить эту проблему?
Например на Паскале есть такие задачки:Введите текст и прочитайте такие-то символы на и типа этого манипуляции со строками.
Кибор способен на это именно средствами визуальных блоков?
Без блоков это не легче чем в Паскале.

108. Zireael - 10 Февраля, 2020 - 16:24:11 - перейти к сообщению

Цитата:

доставать текст из окна,читать его и вычленять нужные символы из него,вернее это будут числа.
Можно ли это реализовать с помощью Кибора?

Можно.
Текст из окна можно копировать или распознать.
С поиском нужного текста проблем нет. Напишите пример текста, напишу как его найти.

109. Kamrad - 26 Февраля, 2020 - 11:16:16 - перейти к сообщению

Спасибо за ответ.Например есть текст и нужно найти нужные числа в нём.
Числа могут быть от 0 до допустим 100000 и могут находиться в разных строках текста.
И положение этих чисел в строке может измениться.
Каким образом это сделать?
Ну например:

Число Х равно 100
В этой строке никаких чисел нет
Число Y равно 10
Число Z равно 320

Или такой текст
В этой строке никаких чисел нет
Y равно 5 больше ничего нет
Число Z равно 55555
А число X равно 11

Нужно вывести
X=
Y=
Z=
То есть это будет не одинаковый текст и логика должна быть соответствующая.
Ну особой трудности здесь нет.На Паскале я бы помучавшись написал хотя я и не программист,а просто не глупый человек,но на Киборе я не знаю как.
Если рисованные схемы облегчают написание кода,то это хорошо.

110. Zireael - 26 Февраля, 2020 - 17:02:37 - перейти к сообщению

Цитата:

Например есть текст и нужно найти нужные числа в нём.

CODE:

string s="Число Х равно 100"; // строка
string num; // сюда запишется число если оно есть в строке
if(regexsearch(1, #num, s, "\d+"))messagebox(num); // если число найдено

CODE:

string rn=formatic(13)+formatic(10); // перенос строки
string result; // сюда запишется результат

// строка
string s="Число X равно 100"+rn+"В этой строке никаких чисел нет"+rn+
"Число Y равно 10"+rn+"Число Z равно 320";
messagebox(s);
find(s, #result); // вызов функции
messagebox(result); // результат

// строка
s="Или такой текст"+rn+"В этой строке никаких чисел нет"+rn+
"Y равно 5 больше ничего нет"+rn+"Число Z равно 55555"+rn+"А число X равно 11";
messagebox(s);
find(s, #result); // вызов функции
messagebox(result); // результат

function find(string text, string #str)
{
string num;
str="";
if(regexreplace(1, #num, text, ".*?X.*?(\d+).*", "$1", SINGLELINE))str=str+"X="+num+rn;
if(regexreplace(1, #num, text, ".*?Y.*?(\d+).*", "$1", SINGLELINE))str=str+"Y="+num+rn;
if(regexreplace(1, #num, text, ".*?\bZ\b.*?(\d+).*", "$1", SINGLELINE))str=str+"Z="+num;
}