[Линда Кайе]

#post-id: 3057-00-08
#original-date: 8.12.2008 Mon
#original-time: 12:08 AM
#original-day:  3057
#original-host: WinXP Prof SP2 (Build 2600)

Нашла в своём древнем коде вот такую макаронину:

  ' hDC экрана
  hWndScreen = GetDesktopWindow()
  hDCScreen = GetDC(hWndScreen)
  Call ReleaseDC(hWndScreen, hDCScreen)

Сижу и пытаюсь понять, что это и зачем оно нужно...

#music: maiko\SUPER EUROBEAT presents Initial D 4th Stage D Selection +\Don't Go Baby

Comments

[neo_rage]

щас найду дескриптор, а потом кээээк освобожу!

я однажды тоже написал на 1с
ТекВалюта = ТекВалюта;
потом когда через месяц наткнулся весь день нервно хихикал.

[Линда Кайе]

neo_rage

Оказалось, что я позже передавала уже освобождённый hDCScreen в GetDeviceCaps()... До сих пор в шоке, программирование по-русски: код успивает выполниться до реального освобождения >_<

Vault13boy

В книжке про то как не нужно писать на C++ был вопрос, зачему нужен такой код:

for (int TMP = 0 ... ) {
  ...
  if (TMP == 500) TMP = TMP;
  ...
}

Оказалось, что программеру нужно было debug break поставить на пятисотой итерации ^^

не, кстати с точки зрения 1С такой код вполне осмыслен.
Например в некоторых внешних обработках, которые работают в разных конфигурациях используется такой прием:
необходимо узнать, определена ли в глобальном модуле переменая глКаталогПечФорм, содержащая путь к папке с печатными формами на диске, и если определена, то поместить\взять печатную форму по этому пути. Дело в том что автор обработки заранее не знает в какой конкретно конфигурации будет открыта его обработка, и если будет проверять переменную явно:
Если ПустоеЗначение(глКаталогПечФорм)=1 Тогда
...
КонецЕсли;
то 1с в режиме Предприятия выдаст ошибку компиляции "Переменная глКаталогПечФорм не определена." Так же нельзя присвоить ее другой переменной
ТемпПеременная = глКаталогПечФорм;//будет та же ошибка

Тогда кто то из 1сников додумался до гениальной конструкции:
глКаталогПечФорм = глКаталогПечФорм;

а затем уже ее проверяли как обычно:
Если ПустоеЗначени(глКаталогПечФорм)=1 Тогда
...
Таким образом, если переменная уже была определена в Глобальном модуле, то ей присваивалось ее же значение и фактически значение не менялось. И с точки зрения семантики 1С ошибки не было, т.к. если переменная не была до этого объявлена, то в первую очередь просиходило неявное объявление присваиванием "глКаталогПечФорм = ", переменная инициализировалось пустым значением, а потом в эту переменую записывалось собственно это же пустое значение)).

Ну а конкретно в моем случае, "ТекВалюта = ТекВалюта;" я просто тогда торопился, функция в которой это использовалось принимала аргумент с именем Валюта, я хотел этот аргумент сохранить в другой переменной, поэтому добавил префикс "Тек", потом понадобилось сохранять и эту переменную, добавил еще какой то префикс, ну а через полчаса я уже подзапутался в префиксах, где то забыл префикс исправить, в итоге , через некоторое время обнаружил, что хотел сохранить переменную в самой себе >_<

...
чето меня седня понесло ^___^

[Линда Кайе]

Вот за это и нелюблю 1С ^^' Этот встроенный язык явно писали люди с альтернативным мышлением ^^'

я бы даже немножнко перефразировал: "... с «альтернативой» мышлению".
Сам не навижу 1С. Но приходится работать с тем, за что платят((

[Линда Кайе]

Вот что бывает когда компания отказывается лицензировать движок VBA и начинает изобретать велосипед...

[neo_rage]

да уж, точно по-русски...