Добавьте свою функцию в UBPFD!
Идет сбор данных в Единую Базу Процедур и Функций для Delphi. Ждем ваших полезных процедур и функций! Форма отправки пока временная. В окончательном варианте база и форма отпраки будет размещена на сайте delphi.mastak.ru. Описание идеи самой базы можно почитать здесь. Ждем также ваших предложений по разрабатываемой базе в гостевой книге, вход в которую со странички описания базы.
Облегченная замена TRegistry - не использует модули Classes и SysUtils. Интересен для небольших приложений, когда полной функциональности TRegistry не требуется. Поддерживаются значения всех типов: REG_SZ, REG_MULTI_SZ, REG_EXPAND_SZ, REG_DWORD и REG_BINARY.
Новая версия компоненты С исходными текстами Компонента из раздела: System: Registry
Источник: www.torry.net
Автор: Benedikt Hochstrasser -= · VCL · Samples · =- [Перевел: Сергей Касаткин]
TRdShareIt можно использовать для создания/удаленя/запроса/модификации разделяемых локальнах или удаленных ресурсов. Поддерживаются все типы разделяемых ресурсов: диски, каталоги, принтеры и т.д. Поддерживаютя все насройки доступа, применяемые к разделяемым ресурсам, такие как разрешения на доступ, число пользователей и пароли.
Все стандартные компоненты с возможностью плоского вида. Компоненты поддерживают стандартный и плоский вид. Component Manager позволяет легко изменять стиль.
Создание PolyPolygon используя массив точек?
Polygon - метод компонента TCanvas получает в качестве параметра динамический массив точек. Функция PolyPolygon() из Windows GDI получает указатель на массив точек. Пример:
Для того, чтобы получить список всех запущенных приложений, поместите на форму ListBox и Button, обработчик события которой должен иметь примерно такой вид. procedure TForm1.Button1Click(Sender: TObject); VAR Wnd : hWnd; buff: ARRAY [0..127] OF Char; begin ListBox1.Clear; Wnd := GetWindow(Handle, gw_HWndFirst); WHILE Wnd <> 0 DO BEGIN {Hе показываем:} IF (Wnd <> Application.Handle) AND {-Собственное окно} IsWindowVisible(Wnd) AND {-Hевидимые окна} (GetWindow(Wnd, gw_Owner) = 0) AND {-Дочернии окна} (GetWindowText(Wnd, buff, sizeof(buff)) <> 0) THEN BEGIN GetWindowText(Wnd, buff, sizeof(buff)); ListBox1.Items.Add(StrPas(buff)); END; Wnd := GetWindow(Wnd, gw_hWndNext); END; ListBox1.ItemIndex
:= 0; end; При нажатии на кнопку ListBox заполнится списком запущенных в данный момент приложений!
Не инициализируются переменные цикла
В обычной процедуре обработки реакции на кнопку, перестали инициализироваться переменные цикла. При входе в цикл For i:...
MS Word
Необходимо прочитать файл MS Word. Кто подскажет как это лучше сделать?: Создавать обьект Word, открывать файл, ...
Файл
Как записать информацию в двоичный файл и считать ее?
Конвертировать словарь DCT в DDF
Здравствуйте! Подскажите, пожалуйста, как можно конвертировать файл словаря Clarion в файлы DDF (формат словаря от ...
Блокировка клавиатуры из сервиса
Возникла проблема с блокировкой клавиатуры из сервиса NT. Использовал BlockInput(true). Описал так: procedure ...
Shareware : профессиональная разработка и продвижение программ
Рассматриваются особенности создания условно-бесплатных программ, приводятся рекомендации по разработке интерфейса и оформлению документации, обсуждаются теоретические и практические вопросы проектирования, рекламы, маркетинга и технической поддержки создаваемого программного продукта. Книга содержит примеры удачной разработки и реализации программ из мировой и российской практики. Множество иллюстраций дает возможность более наглядно представить объем и качество работы, необходимой для создания программ на профессиональном уровне.
Автор: Жарков С.
Дорогие друзья! Мы рады представить вам новый совместный проект сайтов www.rsdn.ru, delphi.mastak.ru и www.optim.ru - профессиональный журнал для программистов RSDN Magazine.
Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
На сайте выложен анонс пилотного выпуска журнала, вступительное слово от редакции.
Для души
Хокку дня
Бесполезно, бесполезно - сильный дождь, идущий в море.
Афоризмы
Не все золото блестит....
Фраза дня
Уже пора не спрашивать, за что...
Дурацкие законы (информация предоставлена сайтом kurilka.com)
В городе Прескотт, штат Аризона (США), строжайше запрещено въезжать на лошади по ступенькам перед зданием суда.
В Дании за заключенными признается право бежать из тюрьмы. Если их ловят, им не грозит никакого наказания.
И на закуску коротенький анекдот
- У меня черный пояс по карате! - А у меня желтая резинка от трусов по плаванию!