Отправляет email-рассылки с помощью сервиса Sendsay

Мастера DELPHI. Новости мира компонент, FAQ, статьи...

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Delphi - проблемы и решения" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Ноябрь 2001   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Автор
Сергей

Статистика

13.577 подписчиков
-18 за неделю
←   Все выпуски   →

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Служба Рассылок Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

Выпуск от 07.11.01 09:04

Кое-что из нашей кладовки   |x|
  • SMS Messenger McSimm mcsimm@mail.com   (06.11.01 14:52)
    Программа для отсылки SMS сообщений на сотовые телефоны Украинских операторов мобильной связи:

    Киевстар GSM - 067ХХХХХХХ
    UMC GSM - 050ХХХХХХХ
    Golden Telecom GSM - 044ХХХХХХХ
    WellCom - 068XXXXXXX

    Включает в себя записную книжку, сервис по контролю доставки сообщения. Возможность отсылки руских букв и транслитерации (transliteracii)
    »»» Скачать: исходные тексты (12кб) демонстрационный EXE файл (245кб) посмотреть скриншот
Лучшее из нашего FAQ   |x|
Функция keybd_event() принимает значения до 244 - как мне отправить нажатие клавиши с кодом #255 в элемент управления Windows?
Это может понадобится для иностранных языков или для специальных символов. (например, в русских шрифтах символ с кодом #255 - я прописное). Приведенный в примере метод, не стоит использовать в случае если символ может быть передан обычным способом (функцией keybd_event()).

procedure TForm1.Button1Click(Sender: TObject);
var
    KeyData : packed record
        RepeatCount : word;
        ScanCode : byte;
        Bits : byte;
    end;
begin
    {Let the button repaint}
    Application.ProcessMessages;
    {Set the focus to the window}
    Edit1.SetFocus;
    {Send a right so the char is added to the end of the line}
    //  SimulateKeyStroke(VK_RIGHT, 0);
    keybd_event(VK_RIGHT, 0,0,0);
    {Let the app get the message}
    Application.ProcessMessages;
    FillChar(KeyData, sizeof(KeyData), #0);
    KeyData.ScanCode := 255;
    KeyData.RepeatCount := 1;
    SendMessage(Edit1.Handle, WM_KEYDOWN, 255,LongInt(KeyData));
    KeyData.Bits := KeyData.Bits or (1 shl 30);
    KeyData.Bits := KeyData.Bits or (1 shl 31);
    SendMessage(Edit1.Handle, WM_KEYUP, 255, LongInt(KeyData));
    KeyData.Bits := KeyData.Bits and not (1 shl 30);
    KeyData.Bits := KeyData.Bits and not (1 shl 31);
    SendMessage(Edit1.Handle, WM_CHAR, 255, LongInt(KeyData));
    Application.ProcessMessages;
end;



Источник: Дельфи. Вокруг да около.

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Использование Microsoft Agent в Delphi
Иногда хочется сделать свои приложения более красивыми, интерактивными, т.е. добавить в них дополнительные и необычные возможности. Неужели компания Microsoft не сделала, для разработчиков никаких подобных . Сделала и очень даже неплохое, называется эта технология Microsoft Agent.
Новинки книжного рынка   |x|
Delphi 5 для профессионалов
Эта книга поможет вам овладеть программированием в Delphi, включая язык Object Pascal, компоненты Delphi (как работу с существующими компонентами, так и разработку ваших собственных), поддержку баз данных и приложений клиент/сервер, базовые элементы программирования в среде Windows и разработку COM-приложений, а также Web-программирование. Для чтения этой книги нет необходимости в глубоких знаниях какой-либо из этих тем, но что вам действительно понадобится — это основы программирования на Паскале.
Автор: М. Кэнту
Другие сайты о DELPHI   |x|
Web ButterFly
Коллекция ссылок на Delphi-сайты по различной тематике. Более 240 ссылок.
Опрос населения :)
Что мешает плохому танцору?
»»» Эти штуки... ;)
»»» Танцовщица
»»» Крылья
»»» Оппозиция
»»» Что и хорошему
»»» Ничего мне не мешает!
Журнал "Мастера DELPHI"  |x|
Давно витающая в воздухе нашего сайта идея создания журнала, посвященного всеми нами любимой среде разработки Delphi, похоже, обретает зримую форму. Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
Для души

Хокку дня
Печальный мир!
Даже когда расцветают вишни...
Даже тогда...

Афоризмы
Что сказал Берлиоз своей музыкой? - ничего; но как потрясающе он это сказал! (Джеймс Гиббонз Хьюнекер)

Фраза дня
Мы делили апельсин - много наших полегло

И на закуску коротенький анекдот
- Здравствуйте! Как ваша язва?
- Уехала на неделю к матери!

Фотоприколы.
Начните день с хорошего настроения!
http://delphi.mastak.ru/cgi-bin/prikol.pl?id=7676

На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.com)

Добро пожаловать на сайт -= Мастера DELPHI =- 
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу 		Рейтингуется SpyLog
В избранное