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

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


Информационный Канал Subscribe.Ru

Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

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

Кое-что из нашей кладовки   |x|
  • BarCode MW MerlinW@yandex.ru   (03.10.02 18:17)
    Компонент TBarCode - наследник TImage.
    Генерирует штрихкод в виде картинки.
    Если не регистрировать, параметры:
    CodeSystem - подразумевается система кодирования, пока только Code128 (берутся символы из набора "B" и "C")
    CodeString - кодируемая строка.
    Сообщите отзывы.
    »»» Скачать: исходные тексты (9кб)
Лучшее из нашего FAQ   |x|
Как перехватить события в неклиентской области формы, в заголовке окна, например?
Создайте обработчик одного из сообщений WM_NC (non client - не клиентских) (посмотрите
WM_NC в Windows API help). Пример показывает как перехватить вижение мыши во всей
неклиенстской области окна (рамка и заголовок).

Пример:

unit Unit1;
interface
uses Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls;

type
TForm1 = class(TForm)
private
   {Private declarations}
   procedure WMNCMOUSEMOVE(var Message: TMessage);
   message WM_NCMOUSEMOVE;
public
   {Public declarations}
end;

var
   Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.WMNCMOUSEMOVE(var Message: TMessage);
var
   s : string;
begin
   case Message.wParam of
     ! ;  HTERROR:    
           s:= 'HTERROR';
       HTTRANSPARENT:
           s:= 'HTTRANSPARENT';
       HTNOWHERE:    
           s:= 'HTNOWHERE';
       HTCLIENT:
           s:= 'HTCLIENT';
       HTCAPTION:
           s:= 'HTCAPTION';
       HTSYSMENU:
           s:= 'HTSYSMENU';
       HTSIZE:
           s:= 'HTSIZE';
       HTMENU:
           s:= 'HTMENU';
       HTHSCROLL:
           s:= 'HTHSCROLL';
       HTVSCROLL:
  &nbs! p;        s:= 'HTVSCROLL';
       HTMINBUTTON:
           s:= 'HTMINBUTTON';
       HTMAXBUTTON:
           s:= 'HTMAXBUTTON';
       HTLEFT:
           s:= 'HTLEFT';
       HTRIGHT:
           s:= 'HTRIGHT';
       HTTOP:
           s := 'HTTOP';
       HTTOPLEFT:
           s:= 'HTTOPLEFT';
       HTTOPRIGHT:
           s:= 'HTTOPRIGHT';
       HTBOTTOM:
           s:= 'HTBOTTOM';
       HTBOTTOMLEFT:
           s:= 'HTBOTTOMLEFT';
 ! ;      HTBOTTOMRIGHT:
           s:= 'HTBOTTOMRIGHT';
       HTBORDER:
           s:= 'HTBORDER';
       HTOBJECT:
           s:= 'HTOBJECT';
       HTCLOSE:
           s:= 'HTCLOSE';
       HTHELP:
           s:= 'HTHELP';
       else s:= '';
   end;
   Form1.Caption := s;
   Message.Result := 0;
end;

end.



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

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

Обсуждается в конференциях   |x|
  • Путь установки Windows
    Ребята, простой вопрос: Как узнать, куда установлена мастдай? Есть системная переменная, которая содержит в себе ...
  • Нафигатор по базе
    Доброго дня Мастера! Маленький вопросик: Есть навигатор, который управляет таблицой БД По нажатию кнопочкки Refresh (...
  • Сортировка
    Здравствуйте уважаемые мастера! Помогите разобраться в сортировке, что я делаю не так procedure Button1Click(Sender: ...
  • StoredProc
    МАСТЕРА НУ ОЧЕНЬ НУЖНО !!! В базе есть хранимая процедура, никаких входящих параметров, возвращает значение даты. Как ...
  • Помогите с векторами прерываний...!
    Help! Как мне в Дэлфи изменить вектора прерываний на свой обработчик? Заранее благодарен.
  • ComPort
    Через ком порт передаются дынные и в конце каждой строки нужно добавлять контрольную сумму есть алгоритм вычисления ...
  • аналоговые данные и их обработка
    Как получить данные с аналогового устройства на ком-порт и как их можно обработать? К примеру, как можно подключить ...
У нас большой выбор статей   |x|
Примеры использования Drag and Drop для различных визуальных компонентов
Перетаскивание информации с помощью мыши стало стандартом для программ, работающих в Windows. Часто это бывает удобно и позволяет добиться более быстрой работы. В данной статье я постарался показать максимальное количество примеров использования данной технологии при разработке приложений в среде Delphi.
Новинки книжного рынка   |x|
Delphi 6 в подлиннике
Delphi 6 - новая версия популярной системы быстрой разработки приложений. В книге описываются инструментальные средства среды Delphi 6, приводятся основы языка программирования Object Pascal и рассматриваются компоненты, свойства, методы и события, необходимые для разработки широкого спектра программ. Особое внимание уделяется работе с базами данных. Показывается использование как локальных, так и удаленных баз данных, включая создание многоуровневых информационных систем и публикацию результатов запросов через Интернет. Благодаря большому количеству затронутых тем, подробному изложению и многочисленным примерам книга будет полезна как начинающим, так и опытным программистам.
Автор: Гофман В.
Другие сайты о DELPHI   |x|
Программирование на Delphi. Обмен опытом.
Эта страничка содержит информацию, накопленную в процессе разработки приложений на языке Delphi 1-4 и содержит разнообразную информацию, которая может оказаться полезной программистам различного ...

» Оценка сайта: 4
Опрос населения :)
Какую ОС вы используете _в_основном_ при написании програм для Win32
»»» Win2k
»»» Win98
»»» WinXP
»»» WinNT
»»» WinMe
»»» Win95
»»» Ни одну из перечисленных
»»» Я не пишу под Win32
»»» Не знаю
Журнал "RSDN Magazine"  |x|

Дорогие друзья! Мы рады представить вам новый совместный проект сайтов www.rsdn.ru, delphi.mastak.ru и www.optim.ru - профессиональный журнал для программистов RSDN Magazine.
Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
На сайте выложен анонс пилотного выпуска журнала, вступительное слово от редакции.

Для души

Хокку дня
Как же это, друзья?
Человек глядит на вишни в цвету,
А на поясе длинный меч!

Афоризмы
Поиски счастья - основной источник несчастья...(Хоффер)

Фраза дня
Человек проводит во сне 30% жизни. Остальные 70 мечтает выспаться...

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В Нью Джерзи (США) запрещается парковать машину на хайвее.
В Колорадо (США) запрещено ездить пьяным на лошади.

И на закуску коротенький анекдот
Отец за сыном в детсад приходит. У него спрашивают:
- Который ваш?
- А какая разница? Все равно завтра обратно вести.

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


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

Добро пожаловать на сайт -= Мастера DELPHI =- 


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное