Новая версия с исправленными багами. Компонента обеспечивает: Шифрование,дешифровку,верификацию,генерацию ключей и проч. В комплекте несколько утилит. Естевственно, с исходными текстами. Компонента из раздела: Security: Crypting Other
Источник: www.torry.net
Автор: Michael in der Wieschehttp://home.t-online.de/home/idw.doc/PGPcomp.htm -= · VCL · Samples · =- [Перевел: V.exeR]
Построитель выражений для компонент: TExprFunctions, TFnCategoryCombo, TFnCategoryList, TFnListBox, TVarListBox, TUserDataListBox, TExprBuilderDlg, TExprSolver, которые помогают формировать пользовательские диалоги построения выражений в ваших приложениях, позволяя пользователю вводить синтаксически верные выражения, проверяет их и запоминает в БД вместе с пользовательскими данными. TExprSolver помогает вычислять сохраненные выражения, предоставляя значения для всех использованных в выражении переменных из INI-файла или DataSet. Для этого должен быть установлен Expression Parser.
Это изменения для RxLib 2.75. Добавляет поддержку различных hint для каждой строки RxCheckListBox.
С исходными текстами Компонента из раздела: List and Combo Boxes: Check List and Combo Boxes
Источник: www.torry.net
Автор: Dmitry Burov -= · VCL · Samples · =- [Перевел: Сергей Касаткин]
Позволяет вести быструю разработку Web-приложений на Delphi. kbmWABD предназначена для Delphi and Borland C++ Builder.
Некоторые возможности: -Автоматическая поддержка WAP/WML; -Полностью интегрированная среда разработки; -Возможность получения статистики web-сайта; -Возможность удаленного администрирования web-сайта; -Создание web-сайта буквально 4-мя строками кода; -Полная поддержка фреймов и Javascript, картинок с hot-зонами, cookies; -Встроенная автоматическая поддержка передачи файлов между browser и сервером; -Встроенная поддержка дерева папок на основе Javascript с редактированием в design time; -Поддержка приложений, построенных на автоматизации; -Полная поддержка форм; -Поддержка масштабирования web-сайта; -полный ISAPI web-сервер для легкой отладки и тестирования web-серверных приложений до развертывания их на сервере; и многое другое...
Это нестандартный progress bar: -вид 3D цилиндра с рельефом, металлическим цветом... -вертикальный текст, текст с тенью... Поставляется с тремя предопределенными стилями (более 32 в полной платной версии).
Новая версия компоненты Компонента из раздела: Indicators and Gauges: Progress Bars
Источник: www.torry.net
Автор: Jean Darveau -= · VCL · =- [Перевел: Сергей Касаткин]
Как ограничить длинну текста, вводимого в TEdit, так чтобы ширина текста не превышала ширину TEdit'а?
В примере приведено два способа ограничить длинну текста в TEdit так чтобы она не превышала ширину клиентской области окна TEdit'а и не появлялась прокрутка текста. Первый способ устанавливает свойство TEdit'а MaxLength равным числу букв "W", которые поместятся в TEdit. "W" выбрана потому, что является, наверное, самой широкой буквой в любом шрифте. Этот метод сносно работает для шрифтов с фиксированной шириной букв, но для шрифтов с переменной шириной букв вряд ли сгодится. Второй способ перхватывает событие KeyPress TEdit'а и измеряет ширину уже введенного текста и ширину нового символа. Если ширина больше чем клиентская область TEdit'а новый символ отбрасывается и вызывается MessageBeep. Пример:
procedure TForm1.FormCreate(Sender: TObject); var cRect : TRect; bm : TBitmap; s : string; begin Windows.GetClientRect(Edit1.Handle, cRect); bm := TBitmap.Create; bm.Width := cRect.Right; bm.Height := cRect.Bottom; bm.Canvas.Font := Edit1.Font; s := 'W'; while bm.Canvas.TextWidth(s) < CRect.Right do s := s + 'W'; if length(s) > 1 then begin Delete(s, 1, 1); Edit1.MaxLength := Length(s); end; end;
{Другой вариант}
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); var cRect : TRect; bm : TBitmap; begin if ((Ord(Key) <> VK_TAB) and (Ord(Key) <> VK_RETURN) and (Ord(Key) <> VK_LEFT) and (Ord(Key) <> VK_BACK)) then begin Windows.GetClientRect(Edit1.Handle, cRect); bm := TBitmap.Create; !
bm.Width := cRect.Right; bm.Height := cRect.Bottom; bm.Canvas.Font := Edit1.Font; if bm.Canvas.TextWidth(Edit1.Text + Key) > CRect.Right then begin Key := #0; MessageBeep(-1); end; bm.Free; end; end;
Delphi: специальный справочник
В книге содержится обширный справочный материал по основным элементам языка, включающий в себя наиболее употребительные функции, классы и объекты. Последовательно и подробно изложен процесс создания баз данных, Windows-приложений и динамических библиотек. Приложения с описанием различных кодов ошибок выполнения программ делает книгу полезной не только начинающим программистам, но и пользователям, активно работающим с Delphi
Автор: Б. Карпов
Давно витающая в воздухе нашего сайта идея создания журнала, посвященного всеми нами любимой среде разработки Delphi, похоже, обретает зримую форму. Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
Для души
Хокку дня
Придавленные шумом водопада, смолкают люди.
Афоризмы
Любовь - торжество воображения над разумом... ( Карди )
Фраза дня
Программист ошибается дважды: первый раз - при рождении, а второй раз - при выборе профессии.
И на закуску коротенький анекдот
Работа программиста и шамана имеет много общего - оба бормочут непонятные слова, совершают непонятные действия и не могут объяснить, как это работает.