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

X-Program ПО, новости сайта и программирование в Delphi7


Информационный Канал Subscribe.Ru

Выпуск №22


О нас:
www.X-Program.narod.ru (Наш сайт. Последнее обновление - 04.12.2004);
X-Program@narod. ru (Наш EMail. Присылайте свои вопросы).

Сегодня в выпуске:
1 - MagDate Professional
2 - Вопросы подписчиков
3 - Создание у формы тени как в MagDate Professional
4 -
Контроль джойстика в Delphi

MagDate professional

Программа MagDate разрабатывалась улучшалась и улучшается и будет улучшатся! Вообще MagDate это календарь на рабочий стол. Это календарь хранит в себе громадные возможности(смена дизайна, выбор звуковой схемы, и тому подобное). Программа разрабатывается с 2003 года. Всего было 3 официальные версии программы. MagDate пользуется и будет пользоваться популярностью среди пользователей так как его интерфейс сочетает в себе громадные возможности с которыми может справится любой пользователь ПК!  

Программа пережила множество изменений.

  • Теперь Ваше воображение в настройке интерфейса не ограничивается одними рисунками! Создайте свой неповторимый интерфейс и поделитесь им с друзьями и знакомыми.

  • Теперь Вы можете выбирать не только wav файлы, но и MP3 MIDI MID WAV WMA и другие аудио форматы. BONUS с программой идет много mid файлов!

  • Теперь создавать сообщение стало намного интереснее ведь теперь Вы можете выбрать и дизайн данной панельки.

  • Улучшилась система обновления!

  • BONUS появился текстовый редактор(типа wordpad)!

Чтобы скачать программу пройдите по ссылке http://www.x-program.narod.ru/getfile.html

Чтобы посмотреть ScreenSchots пройдите по ссылке http://www.x-program.narod.ru/magdate.html   

Вопросы подписчиков

Вопрос №1

Здравствуйте, X-Program.
Привет. Может, кому-нибудь из читателей, удалось написать утилиту, показывающую все активные TCP/IP соединения (аналог Netstat) на Delphi без использования Fnugry Netstat Components. Поделитесь пожалуйста исходником, а то дядька Google мне отказался с этим помочь. Ответить

Создание у формы тени как в MagDate Professional

procedure CreateParams(var Params: TCreateParams); override;

.....

procedure TForm1.CreateParams(var Params: TCreateParams);
const
  CS_DROPSHADOW = $00020000;
begin
  inherited;
  Params.WindowClass.Style := Params.WindowClass.Style or CS_DROPSHADOW; 
end;

Контроль джойстика в Delphi

var
  myjoy: tjoyinfo;
begin
  joygetpos(joystickid1,@myjoy);
  trackbar1.position := myjoy.wypos;
  trackbar2.position := myjoy.wxpos;
  radiobutton1.checked := (myjoy.wbuttons and joy_button1)>0;
  radiobutton2.checked := (myjoy.wbuttons and joy_button2)>0;
end;

Дизайнер рассылки Андрей Ерёмин  |||  Редактор рассылки Коржов Алексей


http://subscribe.ru/
http://subscribe.ru/feedback/
Подписан адрес:
Код этой рассылки: comp.soft.prog.program
Отписаться

В избранное