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

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


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

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

DELPHI.mastak.ru

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

Новые компоненты   |x|
  • PB v.1.0 (90kb) (13.08.02 11:38)
    Переключаемая (вкл/выкл) цветная кнопка. Этот компонент наследован от TPanel.
    С исходными текстами
    Компонента из раздела: Buttons and Check Boxes: Other Buttons
    Источник: www.torry.net   Автор: James W. Cheek
    -= · VCL · Samples · =- [Перевел: Mark S. Zheleznyak]

  • CustomFontDialog (4Kb) (13.08.02 11:37)
    К стандартному компоненту выбора шрифта FondDialog добавлена возможность изменения текста всех элементов управления - тогда их можно перевести и использовать на разных языках.
    С исходными текстами
    Источник: www.delphipages.com   Автор: Angel Geranov
    -= · VCL · Samples · =- [Перевел: Mark S. Zheleznyak]

  • Для уменьшения объема писем здесь публикуется не весь список новых компонент, потому заглядывайте и на сайт!
Кое-что из нашей кладовки   |x|
  • QXLReport Alexander S. QXLReport@mail.ru   (13.08.02 21:53)
    Компонент QXLReport - простой генератор отчетов в MSExcel
    ver 1.0

    Шаблон отчета создается в книге Excel.
    Вывод данных на нескольких листах книги.
    Вывод итогов по колонкам отчета.
    Создание сводных таблиц.
    Использование диаграмм.
    Запуск отчета из среды Delphi.
    Быстрый перенос данных в Excel через Clipboard.
    »»» Скачать: исходные тексты (65кб)
  • SendMail (c)TGod.Lynx   (12.08.02 14:17)
    Простая программа для посылки сообщений...
    »»» Скачать: исходные тексты (178кб)
  • SendMail исходники!!! (c)TGod.Lynx Lynx_2002_mail@mail.ru   (13.08.02 13:59)
    SendMail исходники!!!
    »»» Скачать: исходные тексты (5кб)
Лучшее из нашего FAQ   |x|
SQL
»»» Merle Corey (07.07.00 12:36)
Существует следующая проблема: есть 4 таблицы в БД ORACLE -- Карточки, Пересылки, Исполнители и Департаметы. Связь сл. : К каждому департаменту привязаны исполнители. С исполнителями связаны пересылки. Ну а Пересылки связаны с карточками.
Необходимо подсчитать кол-во карточек для каждого департамента. Как это сделать пошустрее.

»»» kingdom - kingdom@tepkom.ru (08.07.00 21:27)
У меня были похожие проблемы, пришлось делять вложенный СКуЛь запрос типа select ... from (select .. from (select ...)) ну и применить соответсвующую функцию для подсчета (если очень дано могу позже написать как сейчас не помню),   ... ну млм же вот в Access можно делать запросы прямо в самой MS-Access к которым можно обращаться как к обычным таблицам только понятно их физически нет, так вот в запрос включить все столбцы Карточек и столбец с ID из Департамента тогда все должно быть быстро, попробуй...

-= Из конфе! ренции сайта MASTERS OF DELPHI (http://delphi.mastak.com) =-

Комментарий: "Anton Khalikov" (admin@karat-e.medialt.ru)

Прикольно, но чуваки забывают, что есть еще понятие view, которое как раз и реализует то же, что и "ну млм же вот в Access можно делать запросы прямо в самой MS-Access к которым можно обращаться как к обычным таблицам только понятно их физически нет"
т.е. пишется просто - create view test as select ...
и дальше select ... from test, ...
ну а в крайнем случае можно написать хранимую процедуру.


Комментарий от "Vladimir Krinitsin" (vvkrinitsin@hotmail.com)
обычно делают так:

select count(Карточки.*), Деп.Имя from Карточки
join Пересылки on ... join Исп. on... join Деп on...
group by Деп.Имя


Комментарий от "Grigory V Dutikov" (dutikov@accum.kursk.ru)
Правильно для ORACLE:

create view CountCard
as select count( k.*), d.DepName
from! Департамент d, Исполнители e, Пересылки p, Карточки k
where d.DepName = e.DepName
and   e.ExeName = p.ExeName
and   p.KardName = k.KardName

P.S.
Если на сервере русская кодировка, то имена таблиц и полей можно
писать по русски и без кавычек!!! в Oracle8i и выше

---- Комментарий от Michael Strelkov ----
В запросе от "Grigory V Dutikov" пропущен group by d.DepName.
То есть, должно быть так:

create view CountCard as
select d.DepName, count( k.*) as Number_of_Kards
from Департамент d, Исполнители e, Пересылки p, Карточки k
where d.DepName = e.DepName
       and   e.ExeName = p.ExeName
       and   p.KardName = k.KardName
group by d.DepName.

Но если эти таблички достаточно большие, то работать это может довольно медленно.
Но можно слегка оптимизировать:
1) если поля связи не описаны явно как foreign keys, или по ним нет индексов, то со! здайте их.
2) в предл. from разместите таблицы по убыванию их размеров.
3) в предл. where разместите условия по and, так, чтобы в конце были те, по которым производится максимальный отсев лишних записей, т.к and обрабатываются справа налево.

Если все это не поможет, то надо поработать над исходными таблицами. Возможно, они не нужны целиком в данном запросе, и есть возможность что-то из них выбросить (наверняка есть лишние столбцы, т. к. из каждой таблицы нужны только столбцы для связи, и, особенно лишние строки). Тогда в запросе в предл. from, вместо указания имен таблиц XXXXXXXX x, напишете такие некореллированные подзапросы:
(select YYYYY from XXXXXX where <условие, которое оставляет только нужные строки>) x. Если Вам удастся таким образом существенно уменьшить размеры используемых в запросе таблиц, скорость выполнения может увеличиться на 1-3 порядка.

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

Обсуждается в конференциях   |x|
  • Как объеденить два exe - файла в один, exe+exe=exe
    Как объеденить два exe - файла в один, exe+exe=exe (Не для вируса)
  • 'Rasapi32.dll'
    Доброе утро! Не знаю, уже каким местом вставить 'Rasapi32.dll'. Хотела использовать 'rasdial'. Ни чего не получается. ...
  • Работа с ОС
    Подскажите пожалйуста, как мне сделать так чтобы при загрузке ос моя форма загружалась раньше всех и блокировала ...
  • Hotkey
    Здраствуйте. У меня такой вопрос: Чтобы принудительно открыть свойство объекта после точки ( memo1.lines ) использую ...
  • MessageBox
    Как в стандартном диалоговом окне MessageBox написания на кнопках Yes и No сделать соответственно на русском? Заранее ...
  • Виртуальный винт
    Подскажите пожалуйста как можно зделать виртуальный диск Сменный,Жесткий,CD-rom
  • Как узнать серийный номер железа
    А точнее мамки и видухи
У нас большой выбор статей   |x|
DirectX (Игровой SDK) Часть 5-6
Часть 5 (Разные подходы к написанию кода восстановления поверхностей,
Рисование на поверхностям DirectDraw, Пример DDDemo4)
Часть 6 (Непригодность основной формы, Мощь Delphi: пользовательский
класс полотна (Canvas))
Новинки книжного рынка   |x|
Delphi 5: учебный курс
В книге рассмотрены возможности системы программирования Delphi 5, описан язык программирования Object Pascal, рассмотрены визуальные компоненты системы и методы их создания. Особое внимание уделено принципам и практическим приемам создания сетевых приложений для разных архитектур и разработке программ, поддерживающих основные протоколы Интернета.Не требует специальной подготовки, может быть использована как пособие для изучающих основы программирования и сетевые технологии, а также как справочник по компонентам Delphi и пособие для самообразования.
Автор: С. Бобровский
Другие сайты о DELPHI   |x|
Delphi Plus
Сайт по Delphi: новости, разработка ПО, компоненты, документация, статьи, ссылки, юмор и т.д.

» Оценка сайта: 2
Опрос населения :)
Новый журнал для программистов "RSDN Magazine". Ваше мнение, нужен ли он вообще?
»»» Да
»»» Нет
Журнал "RSDN Magazine"  |x|

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

Для души

Хокку дня
Имена девочек на асфальте,
Прохожу по ним
от детства все дальше.

Афоризмы
"Мужская независимость: отдал зарплату - свободен." (Тамара Клейман)

Фраза дня
Раб мечтает не о свободе, а о своих рабах

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В городе Пенсакола во Флориде жителям предписывается всегда иметь при себе не меньше10-ти долларов.
В городе Лафайет в Калифронии считается преступлением плеваться в пределах метра от других людей.

И на закуску коротенький анекдот
В Штатах изобрели новую пулю, без гильзы, теперь к ней изобретают автомат.

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


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

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


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

В избранное