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

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


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

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

DELPHI.mastak.ru

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

Новые компоненты   |x|
  • Max's Flat Component Pack v.1.24 (345kb) (15.12.02 08:37)
    Все стандартные элементы управления теперь доступны в Flat-стиле.
    Компоненты поддерживают стили Flat и стандартный, переключаемые с помощью менеджера стилей.

    Новая версия компоненты
    С исходными текстами
    Компонента из раздела: Component Packs: Interface Middle
    Источник: www.torry.net   Автор: Lajos Farkas http://www.maxcomponents.net
    -= · VCL · Samples · =- [Перевел: Сергей Зинин]

  • Для уменьшения объема писем здесь публикуется не весь список новых компонент, потому заглядывайте и на сайт!
Кое-что из нашей кладовки   |x|
  • Currency Retriever Reindeer Moss Eater peppermick@elvis.com   (14.12.02 17:33)
    Программа-пример получения курсов валют, публикуемых на сайте Банка России. Исходные тексты для D5 и D6.
    Для D5 требует установленной библиотеки Indy версии 8.x
    »»» Скачать: исходные тексты (14кб)
Лучшее из нашего FAQ   |x|
Определение системной информации.
Часто при создании систем привязки программ к компьютеру или окон типа System Info или About Box необходимо определить данные о пользователе и о системе. Это можно сделать следующим образом (из примеров по Delphi - программа COA):

Procedure GetInfo;
Var
WinVer, WinFlags : LongInt;        { Версия Windows и флаги }
hInstUser, Fmt : Word;            { Дескриптор }
Buffer : ARRAY[0..30] OF Char;    { Буфер под ASCIIZ строку }
begin
hInstUser := LoadLibrary('USER');    { Открыли библиотеку User }
LoadString(hInstUser, 514, Buffer, 30);
LabelUserName.Caption := StrPas(Buffer);    { Имя пользователя }
LoadString(hInstUser, 515, Buffer, 30);
FreeLibrary(hInstUser);
LabelCompName.Caption := StrPas(Buffer);    { Компания }
WinVer := GetVersion;
LabelWinVer.Caption := Format('Windows %u.%.2u',    { Верси! я Windows }
[LoByte(LoWord(WinVer)), HiByte(LoWord(WinVer))]);
LabelDosVer.Caption := Format('DOS %u.%.2u',    { Версия DOS }
[HiByte(HiWord(WinVer)), LoByte(HiWord(WinVer))]);
WinFlags := GetWinFlags;
IF WinFlags AND WF_ENHANCED > 0 THEN
LabelWinMode.Caption := '386 Enhanced Mode' { Режим }
ELSE IF WinFlags AND WF_PMODE > 0 THEN
LabelWinMode.Caption := 'Standard Mode'
ELSE LabelWinMode.Caption := 'Real Mode';
IF WinFlags AND WF_80x87 > 0 THEN { Сопроцессор }
ValueMathCo.Caption := 'Present'
ELSE ValueMathCo.Caption := 'Absent';

Fmt := GetFreeSystemResources(GFSR_SYSTEMRESOURCES);
ValueFSRs.Caption := Format('%d%% Free', [Fmt1]);    { Свободно ресурсов }
{ Свободно памяти}
ValueMemory.Caption := FormatFloat(',#######', MemAvail DIV 1024) + ' KB Free';    
end;



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

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Midas и COM. Советы и Приемы
Статья показывает, как писать приложения, использующие несколько модулей, которые связываются через COM и совместно используют Midas сервер. Освещаются вопросы перемещения файлов, массивов и других структур данных c использованием COM.
Новинки книжного рынка   |x|
Delphi 6 в подлиннике
Delphi 6 - новая версия популярной системы быстрой разработки приложений. В книге описываются инструментальные средства среды Delphi 6, приводятся основы языка программирования Object Pascal и рассматриваются компоненты, свойства, методы и события, необходимые для разработки широкого спектра программ. Особое внимание уделяется работе с базами данных. Показывается использование как локальных, так и удаленных баз данных, включая создание многоуровневых информационных систем и публикацию результатов запросов через Интернет. Благодаря большому количеству затронутых тем, подробному изложению и многочисленным примерам книга будет полезна как начинающим, так и опытным программистам.
Автор: Гофман В.
Другие сайты о DELPHI   |x|
Уголок разработчика
Новый сайт для разработчиков GJ

» Оценка сайта: 2
Опрос населения :)
Новый журнал для программистов "RSDN Magazine". Готовы ли вы подписаться на него?
»»» Да, на сколько возможно
»»» Да, на 6 месяцев
»»» Да, на 3 месяца
»»» Да, на 1 месяц
»»» Нет, не готов
»»» Не знаю
Журнал "RSDN Magazine"  |x|

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

Для души

Хокку дня
Все тот же бренный мир,
Пьянея, плачу
В сумерках осенних.

Афоризмы
Если бездельник не раздражает вас, значит вы сами чем-то похожи на него....

Фраза дня
Сложно совмещать неприятное с бесполезным.

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

И на закуску коротенький анекдот
Удивительный орган - человеческий мозг: когда мы утром просыпаемся, он начинает усиленно работать и не останавливается вплоть до нашегоприбытия на работу.

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


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

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


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

В избранное