Отправляет 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
31
Автор
Сергей

Статистика

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

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


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

DELPHI.mastak.ru

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

Новые компоненты   |x|
  • AfalinaSoft XL Report G2 v. 3.424 (2.68 MB) (22.08.01 00:36)
    Вам не надоело нудное кодирование отчетов? Вы хотите одной строкой кода получить в свои руки всю мощь Microsoft Excel?
    Создание шаблонов отчетов прямо в Excel, абсолютная свобода в дизайне,
    интеграция с IDE Delphi, высочайшее быстродействие, неограниченные аналитические возможности, вызов VBA, поддержка любых наборов данных, подробная документация и
    оперативная техническая поддержка.  
    Ваш прекрасный исходный код + возможности Microsoft Excel - что еще нужно вашим пользователям?!
    Delphi 4, 5, 6; C++Builder 4, 5; Excel 97, 2000, 2002.
    Источник: www.afalinasoft.com/rus/   Автор: Afalina Co., Ltd. http://www.afalinasoft.com/rus/
    -= · VCL · =-
  • Полный список компонент смотрите на сайте...
Лучшее из нашего FAQ   |x|
Как сделать родительское окно с фоновым рисунком в клиентской области?
Для того чтобы сделать это выполните следующие шаги:
Срздайте новый проект.
Установите FormStyle формы в fsMDIForm
Разместите Image на форме и загрузите в него картинку.
Найдите { Private Declarations } в обьявлении формы и
добаьте следующие строки:

   FClientInstance : TFarProc;
   FPrevClientProc : TFarProc;
   procedure ClientWndProc(var Message: TMessage);

Добаьте следующие строки в разделе implementation:

 procedure TMainForm.ClientWndProc(var Message: TMessage);
 var
   Dc : hDC;
   Row : Integer;
   Col : Integer;
 begin
   with Message do
     case Msg of
       WM_ERASEBKGND:
       begin
         Dc := TWMEraseBkGnd(Message).Dc;
         for Row := 0 to ClientHeight div Image1.Picture.Height do
           for Col := 0 to ClientWidth div Image1.Picture.Width do
             BitBlt(Dc,
                Col * Image1.Picture.Width,
                Row * Image1.Picture.Height,
                Image1.Picture.Width,
                Image1.Picture.Height,
                Image1.Picture.Bitmap.Canvas.Handle,
                0,
                0,
                SRCCOPY);
           Result := 1;
       end;
       else
         Result := CallWindowProc(FPrevClientProc,
                                  ClientHandle,
                                  Msg,
                                  wParam,
                                  lParam);
   end;
 end;

В методе формы OnCreate добавьте:

    FClientInstance := MakeObjectInstance(ClientWndProc);
    FPrevClientProc := Pointer(GetWindowLong(ClientHandle,
                               GWL_WNDPROC));
    SetWindowLong(ClientHandle,
                  GWL_WNDPROC, LongInt(FClientInstance));

Добавьте к проекту новую форму и установите ее свойство ! FormStyle в
fsMDIChild.

У Вас получился MDI-проект с "обоями" в клиентской области MDI формы.


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


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

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Как сделать WebBrowser средствами Delphi 5.
Я все время натыкался на вопросы о компоненте TWebBrowser. Сначала я думал, что все просто, но когда самому понадобилось написать приложение с использованием TwebBrowser… оказалось, что не все так просто!
Новинки книжного рынка   |x|


Другие сайты о DELPHI   |x|
Delphi Web Developer
Все о Web и Delphi. Создание ISAPI скриптов и ASP компонентов.
Опрос населения :)
Какой сайт по Delphi лучший?
»»» Королевство Дельфи
»»» Этот сайт
»»» Дельфи. Вокруг да около
»»» Другой
»»» Чем больше, тем лучше!
Для души

Хокку дня
Шепот
В веер прячу, -
Все же слышно…

Афоризмы
Если ты находишься больше чем 24 часа в ощущении, что у тебя все в порядке - тщательно проверь, не скрывают ли от тебя информацию....

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

И на закуску коротенький анекдот
Знаете, когда программисту пора идти домой?
Когда муху с экрана монитора он начинает сгонять мышкой.

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

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

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