Демонстрация возможностей моего 3D движка. Два робота перемещаются на плоскости -первым можно управлять, второй преследует первого. Движок ориентирован на аннимацию механических моделей, созданных в 3ds max. Это только первые пробы, прошу строго не судить.
»»» Скачать: исходные тексты (18кб) демонстрационный EXE файл (887кб) посмотреть скриншот
Попытка реализации Hook'a на клавиатуруB@RT (26.08.03 17:49)
Как-то я читал одну статью ("Hook на клавиатуру, программа SendKey",так она называлась), и мне понравился сам способ реализации хука, и передача данных форме. Я развил эту идею и вот что получлось. Правда очень грамоздкий код, почти без описания (я немного не аккуратно пишу), но зато программа и dll'ка весит меньше, чем их аналоги (а если еще и упаковать...). Короче, если кто что хочет добавить к коду, пишите. И не судите строго...
»»» Скачать: исходные тексты (84кб) демонстрационный EXE файл (266кб)
ART Url Manager 2.01ART_43art0043@km.ru (15.09.03 12:42)
Все функции такие же как и у "ART Url Manager 2.0". Внесено несколько исправлений и дополнений. Базы не включены, они такиеже как у предыдущей версии. Если кто-то качает впервые, нужно скачать и "Базы для 'ART Url Manager 2.01'" (83 Kb)
»»» Скачать: исходные тексты (19кб) демонстрационный EXE файл (438кб) посмотреть скриншот
procedure TFrmCboxInMemo.Button1Click(Sender: TObject); var clientPos: TPoint; lineHeight: Integer; tmpFont: TFont; begin GetCaretPos(clientPos); {Use the
following calculation of line height only if you want your combobox to appear below the char position you are referencing.} tmpFont := Canvas.Font; Canvas.Font := Memo1.Font; lineHeight := Canvas.TextHeight('Xy'); Canvas.Font := tmpFont; with ComboBox1 dobegin {Adjustment of Top by lineHeight only necessary if combobox is to appear below line.} Top := clientPos.Y + Memo1.Top + lineHeight; Left := clientPos.X + Memo1.Left; Visible := true; SetFocus; end; end;
procedure TFrmCboxInMemo.ComboBox1Exit(Sender: TObject); begin ComboBox1.Visible := false; end;
procedure TFrmCboxInMemo.ComboBox1Click(Sender: TObject); begin ComboBox1.Visible := false; end;
Загрузка и анализ документа XML
Обмен информацией в формате XML - это чрезвычайно удобный механизм, позволяющий свести к минимуму проблемы внутрифирменных форматов данных. Эти проблемы сводятся к сложностям при обмене информацией с контрагентами фирмы. Язык XML позволяет разрабатывать форматы описания данных, которые могут стать тем мостиком, котрый свяжет всех контрагентов и устранит технические и психологические барьеры, неизбежно возникающие при приспособлении к чужим технологиям.
Delphi 6 и Kylix для программиста
В этой книге на практических примерах рассмотрены все возможности среды Delphi 6. Читательузнает, как создавать многоуровневые программы для работы с базами данных, Интернет-системы и сетевые распределенные приложения на основе технологий СОМ и CORBA. Рассмотрены механизмы преобразования XML-данных и приемы разработки служб WebServices. В большинстве случаев программист может обойтись визуальными средствами Delphi.Характер авторских работ С. Бобровского традиционно отличается тем, что они не только служат фундаментальными руководствами по новым технологиям программирования, но и представляют собой удобные справочники, полезные каждому программисту, независимо от уровня его подготовки.
Автор: Бобровский С.
Delphi.Server "Информационный сервер для разработчиков". Сайт полностью посвящен созданию програмного обеспечения в среде Borland Delphi. Огромный архив компонент, исходников, документации, FAQ, советов. Форум.
» Оценка сайта: 4
Опрос населения :)
Новый журнал для программистов "RSDN Magazine". Ваше мнение, нужен ли он вообще?
Хокку дня
Котенок пытается лакать Сплошное молоко Первого в жизни снега.
Афоризмы
Побочным эффектом некоторых лекарств... вполне можно лечить некоторые болезни.
Фраза дня
Деньги приходят и уходят, и уходят, и уходят...
Дурацкие законы (информация предоставлена сайтом kurilka.com)
В Дании прежде чем завести машину вы должны: - проверить исправность фар, тормозов, руля и клаксона. - убедиться, что под ней нет детей.
В Монтане (США) женщине грозит тюрьма, если она вскроет почту мужа
И на закуску коротенький анекдот
Хмурое утро, жена выгоняет интернетчика погулять с собакой... Он долго бродит с ней, потом поднимает палку, кидает её и командует: - Э-э-э, Яндекс!!! То есть, Рамблер!!! Тьфу, апорт!!!