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

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

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Delphi - проблемы и решения" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Май 2002   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Автор
Сергей

Статистика

13.577 подписчиков
-18 за неделю
←   Все выпуски   →

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


Информационный Канал Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

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

Вышел очередной дайджест форумов. Скачать можно здесь
Новые компоненты   |x|
  • jvDialogs library v.2.1 (19Kb) (16.05.02 08:10)
    jvDialogs (бывшая psvDialogs Library) содержит комопненты, основанные на недокументированных функциях Windows. Теперь jvDialogs стала частью JEDI VCL.
    Содержит:
    TJvExitWindowsDialog
    TJvRunDialog
    TJvOrganizeFavoritesDialog
    TJvFormatDialog
    TJvComputerNameDialog
    TJvBrowseFolderDialog
    TJvControlPanelDialog
    TJvAppletDialog
    TJvChangeIconDialog
    TJvShellAboutDialog
    TJvOutOfMemoryDialog
    TJvObjectPropertiesDialog
    TJvOpenDialog
    TJvSaveDialog
    TJvNewLinkDialog
    TJvAddHardwareDialog
    TJvOpenWidthDialog
    TJvDiskFullDialog
    С исходными текстами
    Источник: www.delphipages.com   Автор: Serhiy Perevoznyk http://www.delphi-jedi.org
    -= · VCL · Samples · =- [Перевел: Сергей Касаткин]
  • RichEdit Syntax Highlighter (45Kb) (16.05.02 08:07)
    Набор классов для автоматической подсветки синтаксисав RichEdit Control
    Классы:
    TpsvPasRTF - подсветка синтаксиса Delphi
    TpsvHTMLRTF - подсветка синтаксиса HTML
    TpsvSQLRTF - подсветка синтаксиса SQL
    TpsvPHPRTF - подсветка синтаксиса PHP
    TpsvVBScriptRTF - подсветка синтаксиса VBScript
    TpsvJScriptRTF -- подсветка синтаксиса JScript
    Имеется демопример
    С исходными текстами
    Источник: www.delphipages.com   Автор: Serhiy Perevoznyk http://www.delphipages.com/resume/resume.cfm?ID=300
    -= · VCL · Samples · =- [Перевел: Сергей Касаткин]
  • DBFlyTreeViewPro Suite 7.4 (576Kb) (16.05.02 08:05)
    Быстрый DB-ориентированный многоколоночный treeview с более чем 45 типами замещаемых редакторов.
    Теперь с инстялятором/деинсталятором.
    Теперь вы можете легко использовать просмотры master-detail, lookups и пользовательские выпадающие списки основанные на уникальном dropdowns-механизме! Внимательно изучайте демо!
    Возможности:
    -поддержка БД (четыре выбираемых тпа для каждой колонки);
    -развитый механизм для загрузки/модификации узлов дерева;
    -поддержка автоматической генерации уникального ключа для кажного узла (не требует индексированный файлов/автоинкрементных полей);
    -развитый механизм для перемещения узлов;
    -поддержка Drag-Drop, перемещения/перегруппировки узлов;
    -поддержка Imageindex, StateIndex и SelectedIndex для узла.

    С исходными текстами
    Screenshot: http://www.delphipages.com/uploads/screenshots/masterdet.JPG
    Источник: www.delphipages.com   Автор: 9Rays.Net (merger of Imca Systems and Dev4Net) http://www.imcasys.com/cgi-bin/components.cgi?act=1&cid=84
    -= · VCL · Samples · =- [Перевел: Сергей Касаткин]
  • CoolTrayIcon v. 4.0.1 (310Kb) (16.05.02 08:03)
    Компонент CoolTrayIcon предназначен для создания иконок в трее со множеством настроек поведения и вида. Имеющиеся возможности:
    * Разнообразные события по обработке информации от мыши
    * Поддержка всплывающего меню
    * Методы для отображения и скрытия основной формы
    * Может перемещаться в трей когда пользователь минимизирует форму
    * Поддержка анимации иконки
    * Интерактивные всплывающие подсказки округлой формы
    * Может конвертировать bitmap в иконку
    * Preview при разработке для простоты экспериментов
    * Компонент можно использовать в сервисах
    * Востановление иконок в трее после краха Explorer'а
    Имеется так же TextTrayIcon, который может показывать в трее указанный текст, для которого можно указать шрифт, цвет и войства бордюра.
    Имеется 7 демопримеров (в одном exe-файле).

    С исходными текстами
    Источник: www.delphipages.com   Автор: Troels Jakobsen http://www3.ewebcity.com/troels/
    -= · VCL · Samples · =- [Перевел: Сергей Касаткин]
  • Для уменьшения объема писем здесь публикуется не весь список новых компонент, потому заглядывайте и на сайт!
Лучшее из нашего FAQ   |x|
Как развернуть форму на весь экран, как в играх?

interface

uses
 Windows, Messages, SysUtils, Classes, Controls,
Forms,
 StdCtrls;

type
 TForm1 = class(TForm)
   Button1: TButton;
   Button2: TButton;
   procedure Button1Click(Sender: TObject);
   procedure Button2Click(Sender: TObject);
 private
   { Private declarations }
procedure WMGetMinMaxInfo(var msg: TWMGetMinMaxInfo);
message WM_GETMINMAXINFO;

 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.DFM}
procedure TForm1.WMGetMinMaxInfo(var msg:
TWMGetMinMaxInfo);
begin
 inherited;
 with msg.MinMaxInfo^.ptMaxTrackSize do begin
   X := GetDeviceCaps( Canvas.handle, HORZRES ) +
(Width - ClientWidth);
   Y := GetDeviceCaps( Canvas.handle, VERTRES ) +
(Height - ClientHeight );
 end;

end;

procedure TForm1.Button1Click(Sender: TObject);
const
Rect: TRect = (Left: 0; Top: 0; Right: 0; Bottom: 0);
FullScreen: Boolean = False;
// Разворачиваем на весь экран
begin
FullScreen := not FullScreen;
if FullScreen then begin
Rect := BoundsRect;
SetBounds( Left - ClientOrigin.X,
Top - ClientOrigin.Y, GetDeviceCaps( Canvas.handle,
HORZRES )
+ (Width - ClientWidth), GetDeviceCaps( Canvas.handle,
VERTRES )
+ (Height - ClientHeight ));
                  end
else BoundsRect := Rect;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Close;
end;

end.

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

Советы по программированию в Дельфи

16) Вращение Bitmap (24-bit)

function TForm1.BmpRot(const B: TBitmap;fi:integer):TBitmap;
type
 TRGBTripleArray = array[0..1023] of TRGBTriple;
 pRGBTripleArray = ^TRGBTripleArray;
var
x0,y0,i,j,x1,y1,x11,y11,x2,y2:integer;
ht,wd,newht,newwd:integer;
cfi,sfi: double;
sline1,sline2: pRGBTRipleArray;
BEGIN
sfi:=sin(degtorad(fi));
cfi:=cos(degtorad(fi));
ht:=b.height;
wd:=b.width;
newwd:=abs(round(ht*sfi))+abs(round(wd*cfi));
newht:=abs(round(wd*sfi))+abs(round(ht*cfi));
Result:=TBitmap.create;
Result.Width:=newwd;
Result.Height:=newht;
Result.PixelFormat:=pf24bit;
x0:=wd div 2;
y0:=ht div 2;
for j :=newht-1 downto 0 do begin
 sline2 := Result.scanline[j];
 y1:= 2*(j-(newht-ht) div 2 -y0)+1;
 for i := newwd-1 downto 0 do begin
   x1:=2*(i-(newwd-wd) div 2 -x0)+1;
   x2 :=round(x1 * cfi - y1 * sfi);
   y2 :=round(x1 * sfi + y1 * cfi);
   x11:=(x2-1) div 2 +x0;
   y11:=(y2-1) div 2 +y0;
   if (x11>=0)and(x11<wd)and(y11>=0)and(y11<ht) then begin
     sline1 := b.scanline[y11];
     sline2[i] := sline1[x11];
   end;
 end;
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var b:tbitmap;
begin
b:=tbitmap.create;
b.LoadFromFile('e:\4.bmp');
image1.Picture.assign(BmpRot(b,30));
b.free;
end;

Автор: Б. Новгородов (MBo)

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Cоветы по Delphi
На сайте достаточно часто можно услышать вопросы общей направленности, повторяющиеся не по одному разу... Чтобы частично разгрузить форум и чат сайта, решено было написать данную подборку вопросов.
Новинки книжного рынка   |x|
Delphi 6 и Kylix для программиста
В этой книге на практических примерах рассмотрены все возможности среды Delphi 6. Читательузнает, как создавать многоуровневые программы для работы с базами данных, Интернет-системы и сетевые распределенные приложения на основе технологий СОМ и CORBA. Рассмотрены механизмы преобразования XML-данных и приемы разработки служб WebServices. В большинстве случаев программист может обойтись визуальными средствами Delphi.Характер авторских работ С. Бобровского традиционно отличается тем, что они не только служат фундаментальными руководствами по новым технологиям программирования, но и представляют собой удобные справочники, полезные каждому программисту, независимо от уровня его подготовки.
Автор: Бобровский С.
Другие сайты о DELPHI   |x|
Delphi for Russian
Delphi4. Delphi5. ObjectPascal. Стандартные функции и процедуры. On-line справочник на русском языке.
» Оценка сайта: 5
Опрос населения :)
Какую ОС вы используете _в_основном_ при написании програм для Win32
»»» Win2k
»»» Win98
»»» WinXP
»»» WinNT
»»» WinMe
»»» Win95
»»» Ни одну из перечисленных
»»» Я не пишу под Win32
»»» Не знаю
Журнал "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=522351

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

Добро пожаловать на сайт -= Мастера DELPHI =- 
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу
В избранное