Часы, просто симпатичные часики...

[|( () ( T |/| |(]

|( () ( T |/| |(
Да прими же ты наконец меры и избавь свою программу от ошибок безопасности.

Как я понимаю эта ошибка возникает при вызове CallWindowProc, А как от неё избавиться?

[Хакер]

Код в студию.

[t116]

|( () ( T |/| |(
1. Исправь Z-order стрелок. Минутная стрелка находится ближе к табло чем часовая, а нужно наоборот.
2. Нужно научить часовую изменять положение в зависимости от показания минутной. Например, если на часах "12 часов 30 минут", то часовая стрелка должна находиться по средине между двенадцатью и часом.

[Хакер]

Пункт 2, насколько я мог наблюдать пока программа работала - был.

[t116]

Пункт 2, насколько я мог наблюдать пока программа работала - был.

Только что специально поэкспериментировал с изменением времени и вот что обнаружил:
1. При изменении времени системных часов, стрелки продолжают показывать прежнее время до тех пор пока секундная стрелка не пересечет положение "0 секунд".
2. Пункт 2 проявляется в некоторых случаях, а в некоторых - не проявляется. Видимо дело вот в чем: у него положение минутной стрелки проверяется 1 раз в минуту (когда наступает 0 секунд). То же самое, видимо, и с часовой стрелкой - проверяется 1 раз в час.
3. Чекбоксик "Автозагрузка" после перезапуска программы сбивается.

[AntonGV]

ИМХО автозагрузку лучше прописывать в ветке CurrentUser a не в LocalMachine

[|( () ( T |/| |(]

Небольшое обновление. Всё что писали исправлено, кроме: изменения значения сис. часов. про Z-order - у меня часовая стрелка меньше минутной, поэтому если её опустить ниже, в некоторые моменты её не будет видно. Также изменено контекстное меню, в смысле стиль, сначала хотел сделать в стиле Офиса, но потом решил не заниматься плагиатом и сделал по своему.

[Antonariy]

у меня часовая стрелка меньше минутной, поэтому если её опустить ниже, в некоторые моменты её не будет видно

Ее нужно сделать шире и все равно убрать вниз.

[t116]

Не могу пользоваться часами. У меня утром, после выхода из sleep'а, часы продолжают показывать вчерашнее время.

[Хакер]

Чёрт возьми, неужели за всё это время ты не исправил это долбаную ошибку?

[hCORe]

Исправь, а то глаз режет

Код: Выделить всё

Видемость -> Видимость

[|( () ( T |/| |(]

t116, что-то я не совсем понял, про что именно ты говоришь?
Хакер, а как её исправить?
Как я понимаю она возникает здесь:

Код: Выделить всё

    CallWindowProc ptMC, ptrStruc, centerX, centerY, Angle + 360


ptrStruc - указатель на массив.
ptMC - указатель на массив с кодом.
Исправил "Видемость -> Видимость"
Стиль меню немного изменил.

[Хакер]

|( () ( T |/| |(
Да. Не использовать этот приём, если не знаешь, что он делает и почему возникает ошибка А если не судьба использовать FoxCBMP для вращения картинки --

VirtualProtect ptMC, /размер массива с кодом/, PAGE_EXECUTE_READWRITE

-- перед первым вызовом CallWindowProc . Но это криво и нехорошо, потому что Executa-бельным становитя не только наш массив, но и ещё-чёрт-знает что (целая страница). А правильно - выделять для кода память отдельно или же использовать кучи -- благо они могут быть исполняемыми.

Т.е. в данном случае - это не важно, а вообще, это может быть потенциальной дырой в безопасности.

[t116]

|( () ( T |/| |(
Блин. Запусти свои часы и попробуй изменить системное время. Смотри, что получается.

[Antonariy]

Исправь, а то глаз режет

Код: Выделить всё

Видемость -> Видимость

А лучше "Прозрачность".
А совсем хорошо
Кликать через -> Прозрачность для мыши
Видимость -> Прозрачность для глаз

t116 наверное имеет ввиду, что ничего не происходит. Стрелки игнорируют изменение времени.

Часы уверенно грузят проц на двоечку согласно taskmgr'овским единицам, даже когда их не видно. Для сравнения, что-то играющий винамп - 0. Чем же часы занимаются целую секунду пока не возникнет потребность перерисовать стрелку? Время не проверяют, видимость не проверяют, но что-то упорно делают.

Все еще не реализована возможность самостояльного введения периода или даты/времени сна.

About продолжает улучшаться. Но совершенству нет предела.
Поток пластиковой крови стоит заменить на какой-то более безобидный образ или сюжет, например связанный со временем. Кроме того тень от гребня искажает буквы Cl, читается как СN или СV. Игривую надпись наверху убрать. Это не выставка шрифтов.

[Watts[]n!]

При запуске ничего не происходит, то есть самих часов не видно.
А процесс остается и отжирает 9 метров оперативы, зараза

[t116]

При запуске ничего не происходит, то есть самих часов не видно.
А процесс остается и отжирает 9 метров оперативы, зараза

Просто у него прозрачность превратилась в видимость . Измени видимость с 0 на 100% и они появятся.

[Watts[]n!]

А где изменять-то?
В командной строке что ли передавать?

[t116]

А где изменять-то?
В командной строке что ли передавать?

Значек в трее ищи или в том месте, где должны быть часы кликни мышкой. Они там есть, просто полностью прозрачные.

Автору
Если у тебя прозначность стала видимостью, то следовало бы и ключ в реесте переименовать с Prozr в какой-то другой. Потому что те, у кого раньше прозрачность была 0%, теперь стала видимостью 0% . Учитывай следующий раз такие нюансы.

ЗЫ. Как там дела со стрелками?

[Watts[]n!]

А где изменять-то?
В командной строке что ли передавать?

Значек в трее ищи или в том месте, где должны быть часы кликни мышкой. Они там есть, просто полностью прозрачные.

Значка в трее нет. Я наверное совсем тупой

[|( () ( T |/| |(]

Хакер, а как через FoxCBMP вращать картинку, чтобы PictureBox не использовать?
Пробовал так:

Код: Выделить всё

   Dim info As BITMAPINFO
   With info.bmiHeader
    .biSize = 40
    .biWidth = 195
    .biHeight = 195
    .biPlanes = 1
    .biBitCount = 32
    .biCompression = 0
  End With
   
  DC = CreateCompatibleDC(GetDC(hWnd))
  BMPt = CreateDIBSection(DC, info, DIB_RGB_COLORS, ByVal 0, 0, 0)
  OldBmp = SelectObject(DC, BMPt)
  Call SetDIBitsToDevice(DC, 0, 0, 195&, 195&, 0, 0, 0, 195&, BMP(0, 0, 0), info, 0)
    FoxRotate picRotate.hdc, 97, 97, DC, А что суда писать ХЗ???, &HFF00FF, 45, 2

На вопрос: почему с PictureBox не хочу, ответ biBitCount = 32.

[Antonariy]

Еще один момент по About: Copyright (c) - масло масляное. Либо одно либо другое.

PS: Нет, мы таки сделаем из этих часов нормальный продукт...
При запуске галочка "поверх всех" восстанавливается, а вот само свойство - нет. Часы так и остаются внизу.

[alibek]

Еще один момент по About: Copyright (c) - масло масляное.

Тем не менее, они почти всегда указываются вместе.

[Antonariy]

Что говорит о поголовной безграмотности программистов.

[alibek]

http://www.microsoft.com (не на всех страницах, но на многих)
http://en.wikipedia.org/wiki/Copyright (примеры использования)
http://gramota.ru/ (текст в конце страницы)

Не думаю, что это безграмотность.

[Antonariy]

http://www.microsoft.com (не на всех страницах, но на многих)

Предлагаешь мне искать их с микроскопом? На
http://www.microsoft.com/en/us/default.aspx и http://msdn2.microsoft.com/ru-ru/default.aspx ошибок нет.

http://en.wikipedia.org/wiki/Copyright (примеры использования)

Не вижу. Под которым из пунктов оглавления они прячутся?

http://gramota.ru/ (текст в конце страницы)

gramota.ru сосёт. Сайты пишут программисты, а не редакторы/корректоры.

А здесь вообще разнобой:

Powered by phpBB © phpBB Group

Copyright © VBStreets

Первая строчка, принадлежащая phpBB, написана правильно, а вот местные копирайтеры облажались. Причем еще и по смыслу. Право на копирование чего принадлежит сайту VBStreets?

[Хакер]

Контента форума, судя по всему.

[Antonariy]

Суд не примет формулировку "судя по всему".

Если на контент, то на какую его часть? Явно не на стандартный скин, потому что он (с) phpBB Group. Получается на тексты и аттачи постов, ибо другого еще не защищенного контента здесь нет. Возникает вопрос: с какой стати вы наложили лапу на мои перлы и откровения? Ведь copyright фактически дает право на издание и продажу книги, основанной на моих сообщениях, а я с этого не получу ни копейки. Ни при регистрации, ни в правилах не говорится ни слова о том, как будут использованы мои идеи.

Так что либо уберите бессмысленный копирайт, либо сделайте из него ссылку с описанием того, на что вы распространили свое право.
Пример с gotdotnet.ru:

ПОЛИТИКА ДОБРОВОЛЬНОГО ПРЕДОСТАВЛЕНИЯ ИДЕЙ.
Корпорация Microsoft не требует и не примет от вас никакой конфиденциальной или частной информации посредством данного Web-сайта. Вам следует принять во внимание, что любая информация или материалы, адресованные корпорации Microsoft будут восприниматься как НЕ являющиеся конфиденциальными. Направляя в адрес корпорации Microsoft любую информацию или материалы, вы предоставляете корпорации Microsoft неограниченное, неотменяемое разрешение на использование, воспроизведение, демонстрацию, представление, изменение, передачу и распостранение (заметьте, здесь MS не использует слово "продажу", которое может привлечь ненужное внимание или просто отпугнуть потенциального автора, но и не ограничивает себя в этом, написав расплывчатое "использование") данных материалов или информации, и вы также соглашаетесь с тем, что корпорация Microsoft может свободно использовать любые идеи, концепции, ноу-хау или методики, посланные вами в наш адрес с какой бы то ни было целью. Однако, мы не станем раскрывать вашего имени или иным способом освещать факт передачи вами материалов или иной информации корпорации Microsoft, за исключением следующих случаев: (a) если мы получим от вас разрешение на использование вашего имени; или (b) мы предварительно оповестим вас о том, что материалы или иная информация, представленная вами в опредленной части данного сайта будет опубликована или иным образом использована совместно с вашим именем; или (c) если это является требованием действующего законодательства.

C одной стороны Microsoft именно наложила лапу на весь объем знаний, отраженный на сайте в целом и форуме в часности, с другой стороны я с этим согласился при регистрации. Не прикопаешься. А наши лапотники поналепят всяких (с), тм, (R) не задумываясь о смысле, главное побольше пафоса и псевдосерьезности... В америке давно нашелся бы какой-нибудь О. Бендер местного розлива, который наказал бы местный vbstreets финансово в соответствии с буквой закона...

[Хакер]

Antonariy
В правилах написано, что все предлагается на безвозмездной основе, т.е. если ты пишешь пост, ты соглашаешься с тем, что его могут заюзать кто-хочет и как-хочет.

[Antonariy]

"Все" - это услуги по обслуживанию сайта и предоставлению информации третьим лицам, за действия которых вы отвечать не можете. А я говорю про ваши действия, которые теоретически могут быть направлены вразрез с моими интересами. Если Василий Пупкин издаст талмуд, в котором я найду нарушение свих прав, я буду разбираться с Василием. Если это сделает VBStreets, то с VBStreets. Если в соглашении не оговорены права, от которых я отказываюсь, и которые я предоставляю в обмен на публикацию в интернете, то все они в соответствии с законом остаются по умолчанию моими.

Кстати на www.vbstreets.ru copyright вполне уместен, если не считать того же масла масляного. Ибо там представлены оригинальные материалы авторов сайта или материалы третьих лиц, в текстах которых указан их собственник.