Archive for August, 2008

базовые эмоции человека

Wednesday, August 20th, 2008

Есть разные классификации базовых эмоций:

Автор Фундаментальные эмоции Основания для отбора
М. Арнольд гнев, отвращение, мужество, удрученность, желание, отчаяние, страх, ненависть, надежда, любовь, печаль отношение к тенденциям действия
П. Экман гнев, отвращение, страх, радость, печаль, удивление универсальные способы мимического выражения
Н. Фрижда желание, радость, гордость, удивление, страдание, гнев, отвращение, презрение, страх, стыд формы готовности к действию
Дж. Грей ярость/ужас, беспокойство, радость врожденность
К. Изард гнев, презрение, отвращение, страдание, страх, вина, интерес, радость, стыд, удивление врожденность
В. Джеймс страх, горе, любовь, ярость физическое ощущение
В. МакДугалл гнев, отвращение, приподнятое настроение, страх, подавленность, эмоция нежности, изумление отношение к инстинктам
О. Морер боль, удовольствие неусваиваемые эмоциональные состояния
К. Отли, П. Джонсон-Лэрд гнев, отвращение, страх, счастье, печаль не требуют пропозиционального содержания
Дж. Панксепп ожидание, страх, ярость, паника врожденность
Р. Плучик одобрение, гнев, предвкушение, отвращение, радость, страх, печаль, удивление отношение к адаптивным биологическим процессам
С. Томкинс гнев, интерес, презрение, отвращение, страх, радость, стыд, удивление плотность нейронной активности
Дж. Уатсон страх, любовь, ярость врожденность
Б. Уэйнер счастье, печаль атрибутивно-независимое

Китайский философ Хань Юй (768-824) в своем трактате “Юань син” (“Обращение к началу [человеческой] природы”) выделяет три категории человеческой природы: высшая категория (шан пинь), которой присуще только добро, средняя (чжун пинь) – и добро и зло, низшая (ся пинь) – только зло.

Там же дан набор шести эмоций:

  • “любовь” (хао)

  • “ненависть” (у)

  • “умиротворенность” (си)

  • “гнев” (ну)

  • “скорбь” (ай)

  • “радость” (лэ)

В отрывке из “Ли цзи” говорится только о четырех эмоциях:

  • “добродушие” (си)

  • “гнев” (ну)

  • “печаль” (ай)

  • “радость” (лэ)

Кроме того, у китайцев были также пятеричные и семеричные наборы. Например, в “Ли цзи” есть следующий семеричный набор:

  • “радость” (си)

  • “гнев” (ну)

  • “скорбь” (ай)

  • “страх” (цзюй)

  • “любовь” (ай)

  • “отвращение” (у)

  • “вожделение” (юй)

Эмоции также имеют корреляции со стихиями.

Стихии “Нэй цзин”
дерево ну (“гнев”)
огонь си (“веселье”)
почва сы (“желание”)
металл ю (“печаль”)
вода кун (“страх”)

drag file from Explorer and view/open on drop

Wednesday, August 20th, 2008

Today I decided to implement the new feature for all our viewers – to open the file which dropped from Windows Explorer
When I opened the sources to implement this feature, I found that this feature is already implemented:-)

Just forgot to include in history.

фальшивые монеты

Wednesday, August 20th, 2008

Будучи в Израиле Ира мне все время напоминала о том, чтобы я проверял монеты в 10 шекелей. Ей когда-то на шуке (рынке) араб дал монетку без ребра, которую другой араб уже отказался принимать. Было это с ней всего один раз, но почему-то после этого она сама всегда проверяет ребрышки у монет и мне все уши прожужжала.

В принципе я особо внимание на это не уделял, т.к. был в полной уверености, что подделывать монеты может только полный тупица. Их себестоимость превышает номинал в несколько раз. Одно дело, когда подсовывают иностранные монеты, которые и по размеру и по “раскраске” напоминают аналогичную монету (например, одно время в Украине было засилье российских 10 копеек вместо украинских 10 копеек). А вот тупо чеканить фальшивые монеты – это странно.

Но сегодня с удивлением прочитал в LiveJournal, что Ира все-таки права и таких фальшивых десяток в Израиле очень много!

Неужели палестинцы таким образом пытаются подорвать экономику Израиля? :-) Или это у них метал очень дешевый? Но не думаю, что они калаши переплавляют…

PS: кстати бумажные двадцатки в Израиле красивые. они какие-то “пластиковые”, а не бумажные и с несколькими прозрачными окошками. Вроде бы сейчас и другие номиналы будут менять на “пластиковые”
Читал, что такие “пластиковые” деньги только в Израиле и Румынии. Их даже стирать можно. Я такую двадцатку даже себе в коллекцию привез:-)

гарь

Wednesday, August 20th, 2008

Сегодня проснулся, а воняет гарью. Первая мысль – неужели на плите что-то оставили вечером.
Весь район пропах и воняет паленым. То ли лес где-то горит (хотя возле нас вроде бы нету), то ли действительно где-то под Ирпенем торфянники горят (хотя до нас это очень-очень далеко).

А вчера почему-то воняло какой-то химией. Может Химволокно что-то подпалило…

Delphi+Vista+Alt key – disapear controls

Tuesday, August 19th, 2008

Fix:
http://qc.codegear.com/wc/qcmain.aspx?d=37403

Дача Бойко в Форосе

Monday, August 18th, 2008

В прошлом году мы отдыхали в Форосе и жили прямо над пляжем. Было очень удобно сидеть на кровати и через окно любоваться морем с дельфинами. Справа был крутой склон горы, на которой какие-то маньяки строили какой-то дом. Они абсолютно не мешали, зато один раз “развлекли” – экскаватор вместе с водителем навернулся с этой горы и было занятно фотографировать покореженную технику. На отдыхе хоть какое-то зрелище и разнообразие. Тем более водитель сумел выскочить на половине спуска (еще до того, как экскаватор сделал несколько кульбитов).

А сегодня случайно читал статью журналиста из Корреспондент и оказалось, что дом там уже достроен и эта усадьба принадлежит Бойко (бывший министр топлива и энергетики в правительстве Януковича):

Dacha Boyko in Foros


Наверное ему тоже захотелось из окна видеть море и дельфинов:-)

SMWord suite + parser for .fb2 files

Thursday, August 14th, 2008

In last time the Electronic Books are very popular. Sony Reader, IBook Reader, BeBook, lBook etc

As result, the new xml-based format for e-books was developed – FictionBook (.fb2):
http://en.wikipedia.org/wiki/FictionBook

All these hardware units allow to read the e-books in this format

Today I added the new component for our SMWord suite for Delphi/C++BuilderTFictionBook
This component allow to read any .fb2-file and extract the plain text.
Also you may convert the text from Fiction Book into rtf (richtext) or html

So if you want to develop the new reader or just want to add a possibility to search the information inside .fb2-files, you are welcome to order our SMWord suite.

Now there the next formats supported:

  • .doc files (all versions for MS Word) – TMSWordDocument component
  • .docx files (MS Word 2007) – TMSWordXDocument component
  • .wpd (all versions for WordPerfect documents from Corel Office) – TWordPerfectFile component
  • .wri (MS Writer) – TWRIFile component
  • .odt (text documents from Open Office) - TOpenOfficeTextDocument component
  • .ods (spreadsheets from Open Office) - TOpenOfficeSpreadsheet component
  • .odp (presentations from Open Office) – TOpenOfficePresentation component
  • .fb2 (FictionBook, e-book) – TFictionBook component

new hdd for laptop

Monday, August 11th, 2008

In Saturday I buyed the new hard disk (WD2500BEVE) for my laptop (HP xt6200)
The new disk is not initialized by default, so:
- I plugged this unit via USB (Transcend 2,5′ IDE HDD Enclosure for USB 2.0 Port)
- rebooted
- opened the Control Panel\Administration\Disk Management
- initialized the disk
- created the main active partion (100Gb), new logical drive and formatted (NTFS)
- created additional partion (rest 150Gb), two new logical drives (75Gb+75Gb) and formatted each (NTFS)

where to store the program settings (.ini)

Monday, August 11th, 2008

Most comfortable (for me personallY) place where program must store the ini-file with options/settings is the application directory. For example, dbview.exe must save the dbview.ini in same folder where .exe is

But interface guide from Microsoft noted that these end-user settings must be saved in CSIDL_APPDATA (C:\Documents and Settings\<user>\Application Data\<Company>\<Application>)

If application ran in MS Vista with enabled UAC and tried to write (create file) something into application directory, error raised.

So we changed the code (to get the file name for settings):
function GetINIFileName: string;
var
  strFileName: string;
begin
  strFileName := ExtractFileName(ParamStr(0));
  Result := GetUserDirectory(‘Scalabium\’ + ChangeFileExt(strFileName, ”) + ‘\’) + ChangeFileExt(strFileName, ‘.ini’)
end;

where
function GetUserDirectory(const SubDir: string): string;
var
  List: PItemIDList;
  Path: array[0..MAX_PATH] of Char;
begin
  SHGetSpecialFolderLocation(0, CSIDL_APPDATA, List);
  SHGetPathFromIDList(List, Path);
  Result := String(Path);
  if (Result = ”) then
    Result:= ExtractFilePath(ParamStr(0))
  else
  if (SubDir <> ”) then
  begin
    Result := Result + ‘\’ + SubDir;

    ForceDirectories(Result);
  end
end;

free hosting

Thursday, August 7th, 2008

http://www.freehostia.com/free_hosting.html
 Data storage: 250 MB
 Monthly bandwidth: 5 GB
 Hosting for 2 domains
 NO ADS

 PHP & Perl enabled
 1 MySQL database
 10 MB MySQL DB space
 Elefante free scripts