Воспоминания лисица, 09.05.2024
По постам в той группе часто проскальзывает копролалия см. https://ru.wikipedia.org/wiki/Копр�%...
Копролали́я (лат. coprolalia; от др.-греч. κόπρος «кал, грязь» + λαλιά «речь») — болезненное, иногда непреодолимое импульсивное влечение к циничной и нецензурной брани безо всякого повода. Особой выраженности достигает при синдроме Туретта, однако наблюдается и при других заболеваниях — при шизофрении, прогрессивном параличе, реже — маниакальных состояниях.
а так-же мизантропия
см. https://ru.wikipedia.org/wiki/Миза�%...
Мизантрóпия[1] (от др.-греч. μῖσος «ненависть» + ἄνθρωπος «человек»; букв. «человеконенавистничество») — это общая ненависть, неприязнь или недоверие к человеческому виду, человеческому поведению или человеческой природе. Мизантрóп — это тот, кто придерживается таких взглядов или чувств.
собенно к мизантропии склонны лица с расстройствами личности (конституциональными психопатиями), в характере которых преобладают замкнутость и чрезмерная обидчивость одновременно с подозрительностью, недоверчивостью и злобой[99]. Мизантропия может быть проявлением диссоциального (антисоциального) расстройства личности[100]. Она может наблюдаться и у паранойяльных больных с бредом преследования, которые мстят обществу за мнимые или действительные обиды, а также у лиц, перенёсших приступ(ы) шизофрении[99]. Шокирующие мизантропические идеи и высказывания встречаются также со стороны страдающих псевдопсихопатической (психопатоподобной) шизофренией[101] . При паранойяльном развитии личности мизантропия может возникать по типу гиперкомпенсации собственной неполноценности или чувства отверженности[100]. Значительно реже мизантропия встречается у дистимических психопатов и у больных депрессией[99].
а даже эгоцентризм см. https://ru.wikipedia.org/wiki/Эгоц�%...
Эгоцентри́зм[1] (от др.-греч. ἐγώ — «я» и лат. centrum — «центр круга») — особая познавательная позиция, характеризующаяся неспособностью к координированию различных точек зрения, что является качественным своеобразием мышления ребёнка.
Про шизофрению
У людей с шизофрении страдает эмоционально-волевая сфера. А при некоторых видов шизофрении человек не осознаёт что у него ненормальное поведение (как найду как называется такой термин, так сразу дам ссылку).
При гебефрении происходит вот это см. https://web.archive.org/web/20161126050147/https://depress...
В последних классификациях гебефренную форму шизофрении определяют как дезорганизованный тип шизофрении с бессвязной речью и неорганизованным поведением.
Гебефренная форма чаще начинается остро, проявляясь синдромом дурашливого возбуждения и нередко сочетаясь с эйфорией и своеобразной ребячливостью.Быстро меняющееся поведение — один из значимых симптомов гебефрении, вероятно, отражающий вообще склонность таких больных к беспорядочной деятельности, к порывистым, импульсивным движениям, к нелепому поведению с характером напускной шалости (Сербский В.П., 1912).
Больные употребляют одни и те же фразы и обороты, прибегают к набору напыщенных и бессмысленных слов.
Эмоциональные реакции неадекватны, колеблются в своей интенсивности. Настроение обычно повышено («дурашливое веселье»), со склонностью к странному и непонятному юмору, плоским шуткам. Беспричинный смех без достаточного основания может смениться плачем.
При гебефренической шизофрение часто используются нецензурная лексика см. https://arbat25.ru/myi-lechim/psixicheskie-rasstrojstva/ge...
При этом в разговоре часто присутствует нецензурная лексика, жесты, непристойные шутки, гримасы, перемешанные с бессвязной речью или смехом.
Лечение нейролептиками довольно быстро устраняет и возбуждение, и ступор, но зато на первый план могут выступить гебефренические симптомы. Более часто кататоно-гебефренический синдром развивается постепенно или приходит на смену острому полиморфному синдрому или психопатоподобному дебюту (главным образом с картиной синдромов неустойчивого поведения или истероидного).
в таких случаях отчетливо бывают видны гебефренические симптомы — нелепая дурашливость, манерность, гримасничание, особая «холодная» эйфория, не заражающий, а неприятный смех, нарочитое карикатурное пуэрильное поведение (больной ведет себя как плохой актер, играющий ребенка). Наряду с ними в большей или меньшей степени бывают выражены симптомы кататонические: застывание в вычурных позах, бессмысленное стереотипное повторение одних и тех же движений, одних и тех же слов и фраз, периоды отсутствия речи (мутизм), повторение слов окружающих (эхолалия)
РЕАЛЬНЫЕ ИСТОРИИ
У подростка из обычной, среднестатистической, полной семьи диагностирована гебефреническая шизофрения. Родственников, страдавших психическими заболеваниями, у него никогда не было, в детстве он нормально развивался: ходил в детский сад, хорошо учился в школе.
С 14-ти лет родители заметили изменения поведения в худшую сторону. Это выражалось таким поведением:
- враждебный настрой ко всем окружающим;
- грубость в общении, употребление матерных слов;
- прогулы в школе;
- уверенность в своей непривлекательности;
- категорический отказ выполнять гигиенические процедуры;
- ---
- попытки сходить в туалет прямо посреди комнаты.
Далее ситуация только усугубилась. Мальчик вообще перестал посещать школу, бесцельно слонялся по городу. Иногда полностью раздевался, приставал к прохожим, тем самым пугая их. Новым увлечением стало курение и пристрастие к алкоголю. Был принудительно доставлен в клинику на лечение.
Девушка, 14 лет. Постоянно проживала с бабушкой. Родителей видела редко из-за частых, продолжительных командировок. Первые нарушения психики бабушка заметила год назад – в 13 лет. Проявлялись они внезапным истерическим смехом, размахиванием руками, выкрикиванием ругательств.
Пройденный курс лечения помог ненадолго – через 2 месяца девочка вновь бегала по улице и, заламывая руки, рассказывала каждому встречному, как дома ее бьют и издеваются. В данный момент она помещена в стационар для купирования острых симптомов. Прогнозов на ремиссию врач не дает.
Поговорим про элемент сетку в Visual FoxPro 7. Сетка очень нужна для отображения данных из определённой таблицы базы данных. Вот так выглядет сетка:
Сначало нужно указать в Recordsource таблицу, ну или базу данных (dbf):
А в заголовках сетки т.е.в Caption указываешь текст для отображения в данной ситуации заголовок Vorname:
Сетка находится тут:
Есть два способа добавить сетку:
1. Спомощью мастера:
2. Вручную:
Посмеёмся
Продолжем болтавню про Visual FoxPro 7, хочу продолжить с помощью. Как делать помощь написано тут см. https://community-usoft-com.translate.goog/windows-gui-hel.... Сейчас минут через 5 я выставлю лишь код.
Всем привет! Продолжем с Visual FoxPro 7:
Так должна выглядеть справка:
main.hhp:
[OPTIONS] Compatibility=1.1 or later Compiled file=main.chm Contents file=Table of Contents.hhc Default topic=main.htm Display compile progress=No Language=0x407 Deutsch (Deutschland) [FILES] main.htm test1.htm test2.htm [ALIAS] #include alias.h [MAP] #include alias.h [INFOTYPES]
main.htm:
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN"> <HTML> <HEAD> <meta name="GENERATOR" content="Microsoft® HTML Help Workshop 4.1"> <Title>Hello</Title> </HEAD> <BODY> <H1>HELLO</H1> </BODY> </HTML>
test1.htm:
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN"> <HTML> <HEAD> <meta name="GENERATOR" content="Microsoft® HTML Help Workshop 4.1"> <Title>Hello</Title> </HEAD> <BODY> <H1>Vorname</H1> <IMG SRC="vorname.JPG" alt="Vorname"> <br> Bla-bla-bla Vorname... </BODY> </HTML>
test2.htm:
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN"> <HTML> <HEAD> <meta name="GENERATOR" content="Microsoft® HTML Help Workshop 4.1"> <Title>Hello</Title> </HEAD> <BODY> <H1>Nachname</H1> <IMG SRC="vorname.JPG" alt="Vorname"> <br> Bla-bla-bla Nachname... </BODY> </HTML>
alias.h:
#define main 1 #define test1 100 #define test2 101
В элементе управление поле нужно указать в свойствах HelpContextID=100:
Мне что-то не спится, я читаю что пишит Перхоть см. https://groups.germany.ru/1179577/f/34752260.html?Cat=&pag.... Где-то примерно в 4-5 утра пойду спать. Сейчас ещё что-нибудь тут напишу. До отъезда в другую страну тут буду сидеть, потом в другой стране интернете долго не будет наверное, поэтому скорей всего меня не будет долго в интернете. Но это в зависимости сколько я буду в другой стране жить.
Всем привет! Продолжим демогогию. Вчера на ответах наткнулся на ответах mail.ru следующее, читайте и офигивайте:
Сейчас объясню как помощь работает. Это работает везде так. Короче сначало мы указываем в свойствах HelpContextID = 100:
Потом указываем в проекте файлы test1.html и alias.h:
[FILES] main.htm test1.htm test2.htm [ALIAS] #include alias.h
В файле alias.h указана test1 = 100:
#define test1 100
Когда форма запущена и если мы находимся на поле Vorname, и нажимаем клавишу F1, то программа считывает что HelpContextID=100, и вызывает файл справки с 100, а там открывается страница test1.htm, вуаля!:
Давно незанимался Visual FoxPro 7, продолжим играться. Сегодня добавим иконочку на форму. Иконочка будет выглядет вот так:
1. Итак вот готовые иконочки заключённого:
2. Нажмём на Icon:
3. Выберим иконочку criminal4.ico:
4. Теперь она появилась на форме:
5. Вуаля! Вот иконочка на форме:
Давайте дальше играться. Короче я только-что обнаружил что в Visual FoxPro можно проигрывать звук, так скажем колокольчик (Bell, Warnton).
1.Вот я в настройках, в разделе Warnton добавил звуковой файл tada.wav, те Wiedargeben = tada.wav, см.:
2. Чтобы узнать какой установлен звуковой файл нужно написать следующую команду:
? SET("BELL", 1)
У меня показывает:
c:\windows\media\tada.wav
3. Чтобы запустить колокольчик напишим так:
SET BELL ON ? CHR(7)
Если написали правильно, то услышите звук. Лично я слышу в наушниках этот звук т.е.(tada.wav).
Вот вспоминаю незадолго до отъезда в Германию запускаю Microsoft Visual FoxPro 5.0, и играюсь, а потом бац, и приходит вызов в Германию, срочно собираем вещи, и 01.04.2004 мы уже в Германии. Давайте дальше играться... чтобы закрепить так скажем знания.
Я в настройках Warnton Wiedergeben указываю C:\Windows\media\chord.wav:
Вот наш код:
SET BELL ON txt = "" txt = INPUTBOX("Your name?", "Input your name") IF txt == "" THEN ? CHR(7) ELSE MESSAGEBOX("Hello " + txt + "!") ENDIF
Запускаем, появляется такое диалоговое окно, в котором просит ввести ваше имя, если вводим допустим Anton Popov:
То показывается такое диалоговое окно, с надписью "Hello Anton Popov!":
Если же ничего не вводим, то услышим звуковой сигнал chord.wav.
Теперь давайте поменяем иконку у формы frmabout.scx (Info) с лисицы, вот на такую:
1. Нажмём на Icon:
2. Выберем иконку about.ico:
3. Вуаля! Вот новая иконка:
Подправлю иконку:
1. Я правлю в программе Junior Icon Editor, обвёл чёрные линии:
2. Добавлю about2.ico в форму:
3. Вот и результат:
Как тут уже писал выше, что с Microsoft Visual FoxPro 7.0 Professional Edition входит урезаный установщик InstallShield Express - Visual FoxPro Limited Edition:
Так выглядет когда создаёшь новый проект:
Есть немецкий, и даже русский язык:
Вот так выглядет созданый новый проект:
Спомощью InstallShield Express - Visual FoxPro Limited Edition можно создавать установщик, чтобы когда продаёшь готовый программный продукт можно было заказчику/клиенту установить эту программу на компьютер. Не знаю как InstallShield Express - Visual FoxPro Limited Edition, но в более дорогих версиях InstallShield возможно можно сделать активатор, т.е. когда компьютерная программа привязана к ключу, и этот ключ нужно активировать.
В Алматы я был несколько раз на компьютерной выставке. И взял вот такие диски, там Российские разработчики а так-же обучающие компании программированию хвалили Microsoft Visual FoxPro, на этих дисках есть демо/тестовая версия Visual FoxPro, вот так выглядели диски с компьютерной выставке, которая проходила в Алматы каждый год в Атакенте:
Я не знаю зачем, но зачем-то я их взял с собой в Германию.
Вот выдержки из презентации Microsoft Visual FoxPro 6.0:
Вот ещё выдержка из презентации Microsoft Visual FoxPro 6.0:
Вот презентация по Microsoft Visual FoxPro 5.0: