Вверх ↑
Этот топик читают: Гость
Ответов: 952
Рейтинг: 34
#1: 2019-03-08 04:17:31 ЛС | профиль | цитата
Это скорее еще один пример применения компонента чем схема.. Работает четко. Не хватает опции для одной замены добавлять несколько заменяемых значений через запятую. Например "идиот,дурак=глупый человек". Наверное модифицирую этот компонент. Вообще, составлять словарь антимата довольно морально опасная и неприятная процедура)) Может, имеет смысл это делать не самому по памяти, а скачав откуда-то готовый файл с матерными словами) Грязную работу кто-то эту уже наверняка проделал..

Add(MainForm,2953706,21,105)
{
Width=628
Caption="Антимат 1.0"
}
Add(MultiReplace,47959,175,141)
{
link(onResult,2773881:doText,[(238,147)(238,98)])
link(Text,3801063:Text,[(181,110)(118,110)])
link(ReplaceList,14720015:Text,[])
}
Add(Memo,3801063,112,70)
{
Left=25
Top=35
Width=145
Height=135
Strings=#4:Член|9:Кто автор|7:редиска|
ScrollBars=2
}
Add(Memo,14720015,182,71)
{
@Hint=#17:Антимат и цензура|
Left=205
Top=35
Width=175
Height=135
Strings=#24:Член=Инжектор (антимат);|24:член=инжектор (антимат);|31:Редиска=плохой человек(идиома);|31:редиска=плохой человек(идиома);|25:Кто автор программы=Азиз;|25:кто автор программы=Азиз;|15:Кто автор=Азиз;|15:кто автор=Азиз;|14:big boss=Азиз;|
ScrollBars=2
}
Add(Memo,2773881,269,71)
{
Left=425
Top=30
Width=170
Height=135
ScrollBars=2
}
Add(Timer,14863805,104,140)
{
Interval=100
link(onTimer,47959:doMultiReplace,[(156,146)(156,147)])
}


Редактировалось 3 раз(а), последний 2019-03-08 04:24:14
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
vip
#1.1контекстная реклама от партнеров
Ответов: 16434
Рейтинг: 1210
#2: 2019-03-08 08:34:49 ЛС | профиль | цитата
Правила русской речи на производстве
Ох…еть! Я поражен!
Эти пид….ы люди нетрадиционной ориентации
Какая нах… разница разница не принципиальна
Пошел на х… не отвлекайте меня, я занят!
Зае…ли простите, вы слишком назойливы
Что за х…ня? мне кажется, где-то ошибка
Бл…дь! меня переполняют эмоции
Распи…яй ваша мера ответственности оставляет желать лучшего
Ох…ли, что ли? ваше поведение не соответствует моим ожиданиям
Эта х…ня всем известный предмет
Его нужно вые…ать я буду вынужден сообщить об этом начальству
Б…ха-муха боже мой!
… твою мать вау!


Ругаться матом нехорошо, но называть вещи своими именами необходимо.


Редактировалось 1 раз(а), последний 2019-03-08 08:47:03
карма: 22
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1287
Рейтинг: 85
#3: 2019-03-08 10:03:33 ЛС | профиль | цитата
Tad, ̶З̶а̶е̶.̶.̶.̶с̶ь̶ класс!!!

Редактировалось 1 раз(а), последний 2019-03-08 10:09:22
карма: 6

0
Ответов: 8283
Рейтинг: 773
#4: 2019-03-08 10:20:38 ЛС | профиль | цитата
Aziz, вы желаете похоронить целый пласт русской литературы! "Я поражён!"
карма: 14

0
Ответов: 952
Рейтинг: 34
#5: 2019-03-08 10:26:08 ЛС | профиль | цитата
Леонид, Tad, )) Просто завершаю заказаную прогу и подумал а вдруг ею будут злоупотреблять и решил попробовать ограничить пару самых матерных слов) Заодно сделал пасхалку - если в поле ввода текста ввести кто автор то выскочит мое имя и мейл.

Редактировалось 2 раз(а), последний 2019-03-08 10:26:58
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 8283
Рейтинг: 773
#6: 2019-03-08 12:12:40 ЛС | профиль | цитата
Aziz писал(а):
выскочит мое имя и мейл
Вот вам спамеры спасибо скажут
карма: 14

0
Ответов: 16434
Рейтинг: 1210
#7: 2019-03-08 17:33:36 ЛС | профиль | цитата
Леонид писал(а):
Вот вам спамеры спасибо скажут
https://fishki.net/1976687-russkij-mat.html/gallery-3447056/
карма: 22
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 952
Рейтинг: 34
#8: 2019-03-08 21:06:52 ЛС | профиль | цитата
Леонид, спамеры ведь не вручную собирают мейлы, а автоматизированными граберами. А в программу такой грабер не зайдет никак)

Редактировалось 1 раз(а), последний 2019-03-11 10:33:03
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
8
Сообщение
...
Прикрепленные файлы
(файлы не залиты)