Отправляет 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

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

Новые компоненты   |x|
  • TPlannerCalendar, TDBPlanner, TPlannerCalendarGroup v.1.2 (1372kb) (03.01.02 12:56)
    Очень гибко настраиваемый месячный календарь, который может быть использован самостоятельно или совместно с TMS TPlannercomponent.

    Возможности:
    -устанавливаются все цвета и шрифты для дней, выходных, месяцев, номеров недель.
    -показывает номер недели.
    -клавиши курсора вверх/вниз/влево/вправо сдвигают позицию на +7/-7/-1/+1 дней соответственно, клавиши PgUp и PgDn перемещают по месяцам.
    -настраиваемая подсветка и подсказки для специальных дней.
    -поддерживает множественный или единственный выбор.
    -в качестве фона можно использовать картинку.
    -мадается минимально/максимально возможный для выбора день.
    DB-ориентированная версия включена дял связи с TMS TDBPlanner (показывает автоматически все дни, для которых имеются события в БД)
    И многое другое...

    TPlannerCalendarGroup - могомесячная версия

    Новая версия компоненты
    Компонента из раздела: Date and Time: Calendars
    Источник: www.torry.net   Автор: TMS Software http://www.tmssoftware.com
    -= · VCL · =- [Перевел: Сергей Касаткин]
  • Transpear XP Style v.1.0 (92kb) (03.01.02 12:10)
    Transpear XP компоненты, которые были написаны для использования в Transpear Fusion Band, дают довольно похожий интерфейс XP и работают с Delphi 5/6 и совместимы со всеми версиями Windows.

    Включают компоненты:
    XP_Form - форма с внешним видом XP.
    XP_Button - кнопка в стиле Office XP.
    XP_Edit - Office XP Edit Box.
    XP_ListBox - ListBox в стиле XP.
    XP_IconBox - Icon list box в стиле XP, читает из EXE/DLL и т.д.
    XP_MainMenu, XP_PopUpMenu - основное и всплывающее меню в стиле Office XP.
    XP_Tree - TreeView в стиле XP.
    XP_MenuBar - стандартный menuBar модифицированный для работы с XP_MainMenu.
    XP_DriveMenu - всплывающее меню, которое показывает все диски.
    и многое другое...

    С исходными текстами
    Компонента из раздела: Component Packs: Interface Lite
    Источник: www.torry.net   Автор: Transpear http://www.transpear.net
    -= · VCL · Samples · =- [Перевел: Сергей Касаткин]
  • Для уменьшения объема писем здесь публикуется не весь список новых компонент, потому заглядывайте и на сайт!
Лучшее из нашего FAQ   |x|
Простой способ отправки файлов при помощи TClientSocket & TServerSocket 

unit Unit1; 

interface 

uses 
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 
  ScktComp, ExtCtrls, StdCtrls; 

type 
  TForm1 = class(TForm) 
    Image1: TImage; 
    Image2: TImage; 
    ClientSocket1: TClientSocket; 
    ServerSocket1: TServerSocket; 
    Button1: TButton; 
    procedure Image1Click(Sender: TObject); 
    procedure FormCreate(Sender: TObject); 
    procedure ClientSocket1Connect(Sender: TObject; 
      Socket: TCustomWinSocket); 
    procedure ServerSocket1ClientRead(Sender: TObject; 
      Socket: TCustomWinSocket); 
    procedure ClientSocket1Read(Sender: TObject; Socket: TCustomWinSocket); 
  private 
    { Private decl!
arations } 
    Reciving: boolean; 
    DataSize: integer; 
    Data: TMemoryStream; 
  public 
    { Public declarations } 
  end; 

var 
  Form1: TForm1; 

implementation 

{$R *.DFM} 

procedure TForm1.Image1Click(Sender: TObject); 
begin 
  // Это процедура для открытия сокета на ПРИЁМ (RECEIVING). 
  // Button1.Click is this procedure as well. 
  ClientSocket1.Active:= true; 
end; 

procedure TForm1.FormCreate(Sender: TObject); 
begin 
  // Открытие ОТПРАВЛЯЮЩЕГО (SENDING) сокета. 
  ServerSocket1.Active:= true; 
end; 

procedure TForm1.ClientSocket1Connect(Sender: TObject; 
  Socket: TCustomWinSocket); 
begin 
  // Посылаем команду для начала передачи файла. 
 &n!
bsp;Socket.SendText('send'); 
end; 

procedure TForm1.ClientSocket1Read(Sender: TObject; 
  Socket: TCustomWinSocket); 
var 
  s, sl: string; 
begin 
  s:= Socket.ReceiveText; 
  // Если мы не в режиме приёма: 
  if not Reciving then 
  begin 
    // Теперь нам необходимо получить длину потока данных. 
    SetLength(sl, StrLen(PChar(s))+1); // +1 for the null terminator 
    StrLCopy(@sl[1], PChar(s), Length(sl)-1); 
    DataSize:= StrToInt(sl); 
    Data:= TMemoryStream.Create; 
    // Удаляем информацию о размере из данных. 
    Delete(s, 1, Length(sl)); 
    Reciving:= true; 
  end; 
  // Сохраняем данные в файл, до тех пор, пока не получим все данные. 
  try 
    Data.Write(!
s[1], length(s)); 
    if Data.Size = DataSize then 
    begin 
      Data.Position:= 0; 
      Image2.Picture.Bitmap.LoadFromStream(Data); 
      Data.Free; 
      Reciving:= false; 
      Socket.Close; 
    end; 
  except 
    Data.Free; 
  end; 
end; 

procedure TForm1.ServerSocket1ClientRead(Sender: TObject; 
  Socket: TCustomWinSocket); 
var 
  ms: TMemoryStream; 
begin 
  // Клиент получает команду на передачу файла. 
  if Socket.ReceiveText = 'send' then 
  begin 
    ms:= TMemoryStream.Create; 
    try 
      // Получаем данные на передачу. 
      Image1.Picture.Bitmap.SaveToStream(ms); 
   &n!
bsp;  ms.Position:= 0; 
      // Добавляем длину данных, чтобы клиент знал, сколько данных будет передано
      // Добавляем #0 , чтобы можно было определить, где заканчивается информация о размере. 
      Socket.SendText(IntToStr(ms.Size) + #0); 
      // Посылаем его. 
      Socket.SendStream(ms); 
    except 
      // Итак, осталось освободить поток, если что-то не так. 
      ms.Free; 
    end; 
  end; 
end; 

end.

Автор М.К.

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

Обсуждается в конференциях   |x|
  • <B>Как скрыть какую ни будь ПАПКУ С ФАЙЛАМИ!</B>
    Программеры, братья по оружию, помогите срочно надо! Как скрыть какую ни будь ПАПКУ С ФАЙЛАМИ! (так что бы ее не было ...
  • Мониторы
    Можно ли определить програмно тип монитора и отключить его А также можно ли узнать тоже масое в сети например из ...
  • Вопрос по TQuery...
    Через TQuery можно редактировать БД или только просматривать её содержимое?
  • Как вывести информацию (HTML) в WebBrowser из БД Access
    Подскажите пожалуйста ! Как из БД Access, вынять информацию в виде HTML, и запихнуть ее в WebBrowser для просмотра, не ...
  • Как прикрутить DLL от BDE?
    Привет всем! Подскажите, плиз, как прикрутить к своей программе DLL от BDE? На talk.ru прочел: --- Hужно добавить ...
  • Штрих кода
    Господа Мастера! Поделитесь кто может опытом по напечатыванию штрих-кодов в частности EAN-13(8), контрольную цифру ...
  • Общие вопросы
    Помогите! Есть типизированный файл (3 записи) надо прочитать его и поместить все это в StringGrid.Если можно пример ...
У нас большой выбор статей   |x|
Работа с локальной памятью потока (TLS)
В данной статье мы опишем так называемую локальную память потока (TLS, Thread Local Storage).
Многие алгоритмы, которые сейчас работают в составе Windows программ, были перенесены с операционной системы MS DOS. Но операционная сисмема MS DOS по своей сути является однопоточной. поэтому использование этих алгоритмов в многопоточной среде может вызвать проблемы. Одним из таких узких мест являтеся использование процедурами и функциями глобальных переменных.
Новинки книжного рынка   |x|
Delphi 6. Базы данных и приложения
В книге предпринята попытка дать читателю целостное представление о процессе разработки программного обеспечения для реляционных баз данных.
В рамках поставленной цели авторами решены следующие задачи: рассмотрены основы языка Object Pascal на примере создания консольных приложений; рассмотрены объектно-ориентированные возможности языка Object Pascal и технология визуального программирования; описаны основные принципы работы с SQL-ссрвером InterBase; изложена методика взаимодействия программ, созданных в среде Delphi, с базами данных различного типа, в частности, SQL-сервером InterBase: рассмотрены основы проектирования баз данных с использованием программы ERwin; описана "методика разработки клиентского приложения для доступа к базам данных с использованием библиотек динамической загрузки, а также популярных программ Word и Excel для создания отчетов. На примере БД "Учебные компьютерные курсы" рассмотрен процесс разработки программного обеспечения, ! начиная с вопросов проектирования и заканчивая подготовкой отчетов.
Книга может быть использована в качестве основы курса лекции по соответствующей дисциплине.
Книга предназначена для старшеклассников, студентов, аспирантов, преподавателей и пользователей ПК, интересующихся программированием.
Автор: Кандзюба С. "ДиаSoft"
Другие сайты о DELPHI   |x|
Программирование на Delphi. Обмен опытом.
Эта страничка содержит информацию, накопленную в процессе разработки приложений на языке Delphi 1-4 и содержит разнообразную информацию, которая может оказаться полезной программистам различного ...
Опрос населения :)
Как часто вы заглядываете на наш сайт?
»»» Регулярно
»»» Раз в неделю
»»» Когда нужна помощь
»»» По почтовой рассылке
»»» Сделал стартовой страницей
Журнал "RSDN Magazine"  |x|

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

Для души

Хокку дня
Плотно закрыла рот
раковина морская.
Невыносимый зной!

Афоризмы
Надежды и ожидания превращают мудрецов в идиотов...

Фраза дня
Боюсь огорчить, но результаты Вашего вскрытия...

И на закуску коротенький анекдот
Сын программиста подходит к отцу и спрашивает:
- Пап, а что такое ПИНГВИН?
Папа (задумчиво):
- Пинг... Вин... Пинг винды, значит. Функция для определения зависания винды.

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

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

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