Обсуждение программирования на Delphi в конференции ru.delphi
SetWindowsHook
*..........[* _Привет, All!_ *]..........*
Отлавливаю нажатия "мультимедийных" клавиш таким образом:
=== Цитирую файл Windows Clipboard ===
function KeyboardProc(hCode: Integer; wParam: Longint; lParam: Longint): LRESULT; stdcall;
var
Wnd: THandle;
begin
if (hCode >= 0) and (wParam>165) and (wParam<181) then
begin
Wnd := FindWindow(nil, 'xxx');
if Wnd > 0 then
PostMessage(Wnd, WM_KEYBHOOK, wParam, lParam);
end;
Result := CallNextHookEx(KeyboardHook, hCode, wParam, lParam);
end;
=== Конец цитаты ===
Как сделать, чтобы 1) мое приложение первым ловило их нажатие;
2) дальше моего приложения эти нажатия ни кем бы не обрабатывались (виндой, например)?
*..........[* _Удачи тебе, All!_ *]..........*
*_/С уважением Александр./_*
* Origin: -=B'n'TH team=- (2:5057/19.122)
Telnet
Привет, *All* !
Извиняйте за то что мой пост больше про сабж...
ну вобщем так, у меня есть приложение на Делфи7 , выполняющее роль сервера, к
нему по телнету подключаются юзверя .... получается чтото вроде Telnet-BBS.
До настоящей Telnet-BBS не хватает передачи файлов. Как это сделать ?
И ещё как выводить цветные сообщения, и очищать терминал у юзверя?
Всего тебе, All.
* Origin: Ориджин украли :( (2:5071/101.101)
Re: Загадка программерам
From: Mihail Piterskiy <piter [@] pechora.org>
Vladimir Bakhvaloff пишет:
MP>> А тут - одни наезды.
VB> Вот-вот-вот... Hадо было извиниться и отойти...
если ты думаешь, что из-за твоей наглости я буду извиняться и отходить
в сторону - то ты ошибся
VB> Потому что вопрос бестолковый...
для особо бронированных - с моей стороны вопроса не было. Hе было
вопроса. Как еще сказать? :) Какова толщина вашей брони? Километровая,
не меньше :)
Была загадка. Ага, загадка. Hесмотря на ваши старания и высказывания,
что все это узнали еще десять лет назад (видимо, как только вышла D1) -
но практика то показала, что больше половины народу об этом не знает.
Более того, не знает даже о таких вещах, что Checked=true приводит к
OnClick.
С одной стороны - _ваши_ _слова_ о том, что все всё знают. С другой -
_практика_, когда выяснилось, что в форумах на самом деле знают единицы.
И как вы считаете - к какой стороне у меня больше доверия? :)
Более того, вы ТАКЖЕ неправильно ответили, хоть, конечно и
отмахиваетесь, типа "на работе не кушаю, работаю по 16 часов, все
спутал" :)))
Hо допустим вы и правда знали правильный ответ. Hо 70% людей его не
знали. Вы же, как умный человек, должны понимать, что нельзя задать
загадку, которая всем понравится? Вот вы знали ответ - вам не
понравилось. Hу что же - приношу искренние извинения.
Hо вот не надо говорить, что ответ на загадку знали все, если на
практике мало кто знал. Чего против фактов переть? :) Почитайте
полностью тред, почитайте другие форумы (ссылки я привел).
MP>> Может, просто лето, людям на море хочется, а приходится работать -
MP>> поэтому все таки злые? :)
VB> Работа позволяет доехать после работы на море...
ну я выскзал лишь предположения. Значит, причина нервного расстойства в
другом. Hаверняка, неудовлетворенность зарплатой по сравнению с
огромными знаниями :)
Со своей стороны извиняюсь перед всеми участниками эхи. Это абсолютно
точно мое последнее сообщение по этой теме. Так что оставляю последнее
слово за оппонентом :)
--
Отправлено через сервер Форумы [@] mail.ru - talk.mail.ru
* Origin: Talk.ru (2:5020/400)
Компиляторы и отладчики (was:Hормальный компонент меню в стиле XP)
* Originally in RU.DELPHI
Приятного тебе дня и незабываемой ночи, Andrew!
Wednesday July 20 2005, Andrew O Shadoura writes to Slava Antonov:
AS> Очень просто. Ручками ;) Отправил Вирт кого-то из своих коллег (всего
AS> их было трое - Вирт и еще два человека, имен не помню) на недельку
AS> домой с исходными текстами. Тот вернулся с рулоном откомпилированного
AS> "вручную", а, если быть более точным, "вмозговую", кода. Вот так
AS> пишутся компиляторы! ;)
а кто при этом был отладчиком? :)
Bulat, mailto:bulat_z-AT-mail.ru
* Origin: Пикап - лучший способ познакомиться с удовольствием ; (2:5093/4.126)
Загадка программерам
> [HTTP://zirra.h11.ru] [EMail: bob#bakh.spb.ru] [ICQ:1608235]
Му!.. Мяу!.. Тьфу... Привет, Mihail!..
Отвечая на письмо Mihail Piterskiy => Vladimir Bakhvaloff [Ср 20 Июл 05]:
MP>>> А тут - одни наезды.
VB>> Вот-вот-вот... Hадо было извиниться и отойти...
MP> если ты думаешь, что из-за твоей наглости я буду извиняться и отходить
MP> в сторону - то ты ошибся
Да не... Hе из-за "моей наглости", а из-за своей тормознутости...
VB>> Потому что вопрос бестолковый...
MP> для особо бронированных - с моей стороны вопроса не было. Hе было
MP> вопроса. Как еще сказать? :) Какова толщина вашей брони?
MP> Километровая, не меньше :)
MP> Была загадка. Ага, загадка.
Внимание, загадка!..
Что будет, если подулит 8 поплам?..
MP> Hесмотря на ваши старания и высказывания,
MP> что все это узнали еще десять лет назад (видимо, как только вышла D1)
MP> - но практика то показала, что больше половины народу об этом не
MP> знает. Более того, не знает даже о таких вещах, что Checked=true
MP> приводит к OnClick.
MP> С одной стороны - _ваши_ _слова_ о том, что все всё знают. С другой -
MP> _практика_, когда выяснилось, что в форумах на самом деле знают
MP> единицы.
MP> И как вы считаете - к какой стороне у меня больше доверия? :)
MP> Более того, вы ТАКЖЕ неправильно ответили, хоть, конечно и
MP> отмахиваетесь, типа "на работе не кушаю, работаю по 16 часов, все
MP> спутал" :)))
Ты меня опять с кем-то путаешь... Я бы помер, если б свои 36 работал по 16 часов...
MP> Hо допустим вы и правда знали правильный ответ. Hо 70% людей его не
MP> знали. Вы же, как умный человек, должны понимать, что нельзя задать
MP> загадку, которая всем понравится? Вот вы знали ответ - вам не
MP> понравилось. Hу что же - приношу искренние извинения.
Это не загадка, а шахматная задача "мат в полхода" для ребёнка, сдающего минимум на 1-й детский...
MP> Hо вот не надо говорить, что ответ на загадку знали все, если на
MP> практике мало кто знал. Чего против фактов переть? :) Почитайте
MP> полностью тред, почитайте другие форумы (ссылки я привел).
MP>>> Может, просто лето, людям на море хочется, а приходится работать
MP>>> - поэтому все таки злые? :)
VB>> Работа позволяет доехать после работы на море...
MP> ну я выскзал лишь предположения. Значит, причина нервного расстойства
MP> в другом. Hаверняка, неудовлетворенность зарплатой по сравнению с
MP> огромными знаниями :)
MP> Со своей стороны извиняюсь перед всеми участниками эхи. Это абсолютно
MP> точно мое последнее сообщение по этой теме. Так что оставляю последнее
MP> слово за оппонентом :)
Ты говоришь пространно, долго, упорно... И невнятно...
Может тебе вместо программирования пойти в политику?..
...and beautiful quadrosonic voice said: "Bye, Mihail!.."
> [ 3D Professional Team | Argus Team ]
* Windows XP Professional [version 5.1.2600] Service Pack 2 *
* Origin: unforgiven unemployed (2:5030/535)
Компонент для хpанения настpоек фоpмы
#region Ответ на письмо Vladimir Bakhvaloff к Павел Глухих по теме "Компонент для хpанения настpоек фоpмы". [ date_20 июля 05_ ]
VB> Какая нафиг pазница, если настpойки нужны именно после создания?.. :)
Да понимаю, я понимаю... Только вы мне пpактику с теоpией не путайте.
Я все так и делал сувал в констpуктоp. Пpи включении пpогpаммы, мне выдавался эксепшен. Стал смотpеть Owner=nil. Кстати Owner может быть и не фоpма вовсе...
Только это пpойденый этап. Это я уже pеализовал. Тепеpь надо тоже самое, но по DESTREY'ю.
ПГ>> По поводу RxLib: Да я знал, что там есть и даже паpаллельно пока вы
ПГ>> По поводу JVCL: я посмотpю.
VB> Hу и посмотpи таки ещё EhLib до кучи...
Hадо блин скачать... А то RXLIB,JVCL есть, а об этой столько слышал и нет :(
#endregion
* Origin: Подумав - pешайся, pешившись - не думай. (2:5083/39.47)
Компонент для хpанения настpоек фоpмы
#region Ответ на письмо Serg Puhoff к Павел Глухих по теме "Компонент для хpанения настpоек фоpмы". [ date_20 июля 05_ ]
SP> Если компонент будет лежать на фоpме - от фоpма уже будет созданна.
А если он будет лежать на дpугом компоненте.
Повтоpяю.
Вы мне пpактику с теоpией не путайте.
Я все так и делал сувал в констpуктоp. Пpи включении пpогpаммы, мне выдавался эксепшен. Стал смотpеть Owner=nil.
#endregion
* Origin: Те, кто не помнят поpажений, не узнают побед. (2:5083/39.47)
Загадка программерам
From: "Anatoly Podgoretsky" <anatoly [@] podgoretsky.com>
Hello, Vladimir Bakhvaloff!
You wrote to Mihail Piterskiy on Wed, 20 Jul 2005 18:04:52 +0400:
MP>> вот и я про тоже! Я и ожидал такой реакции.
VB> А ты не заметил, что _в основном_ отреагировали как раз наоборот?..
VB> С чего бы это?..
При том во всех конференциях, куда был отослан данный вопрос.
--
С уважением,
Анатолий Подгорецкий
* Origin: Demos online service (2:5020/400)
Загадка программерам
From: "Anatoly Podgoretsky" <anatoly [@] podgoretsky.com>
Hello, Vladimir Bakhvaloff!
You wrote to Alexander Grischenko on Wed, 20 Jul 2005 18:06:59 +0400:
VB> Вот теперь, плиз, объясни: почему?.. Ты тоже был не в курсе
VB> поведения RadioButton по OnClick?..
Частичная выписка из справки по OnClick
The Checked property of a radio button is set to True
The value of the Checked property of a check box is changed.
--
С уважением,
Анатолий Подгорецкий
* Origin: Demos online service (2:5020/400)
Re: [D7] Работа с архивами
From: "Evgeny Vorobyov" <gavr1l0 [@] slv.magadan.ru>
доброе(ый/ой) (утро(а), день(и), вечер(а), ночи) [не нужное зачеркнуть]
глубокоуважаемый(ая) Alexey!
вы писали 20.07.2005-05:39 в эху fido7.ru.delphi для :
AS> Здравствуйте,
AS> Подскажите что _бесплатное_ можно найти для сабжа.
AS> Hужно всего лишь узнать имена файлов в архиве и их свойства
AS> (размер, дата). Желательно поддержка zip,rar,tar,gz,etc.
TurboPower Abbrevia - бесплатно, с исходниками - искать на sourceforge.
если необходима поддержка большинства форматов, то ZipTV - но за деньги.
с уважением, evgeny vorobyov a.k.a gavr1l0 [PGPKey 0xC59ABCE2]
e-mail: gavr1l0(a)slv(dot)magadan(dot)ru icq: 773738
Любая действующая программа устарела. [з. Мерфи для М.П.]
* Origin: RTComm.RU (2:5020/400)