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

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


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

Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

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

Кое-что из нашей кладовки   |x|
  • KeyCode Gerda sadreg@mail.ru   (10.07.02 12:22)
    Эта прога просто даэт код нажатой клавиши. сделана для тех кто собирает приги на API (CreatewindowsEx там, и.т.д.), и кому влом самому такую написать. Мне лично очень помогает. Программа 5 минутний сборки, мелочь а приятно.
    »»» Скачать: исходные тексты (6кб) демонстрационный EXE файл (5кб)
  • WinAmp Contro v2.0 (вроде без глюков) Поляков В. В. s010007@tversu.ru   (21.11.02 10:51)
    Программа для упраления WinAmp'ом с клавиатуры. Писалась по заказу корешка, которому хотелось приспособить пульт от Abit'овской звуковухи к WinAmp'у, поэтому умеет настраиваться под конкретные комбинации клавиш.
    »»» Скачать: исходные тексты (44кб) демонстрационный EXE файл (153кб) посмотреть скриншот
Лучшее из нашего FAQ   |x|
Перетаскивание файла
{ На эту форму можно бросить файл (например из проводника) 
и он будет открыт }
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,
Controls, Forms, Dialogs,StdCtrls,
ShellAPI {обязательно!};

type
TForm1 = class(TForm)
Memo1: TMemo;
FileNameLabel: TLabel;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
protected
{Это и есть самая главная процедура}
procedure WMDropFiles(var Msg: TMessage); message wm_DropFiles;
end;

var
Form1: TForm1;
implementation
{$R *.DFM}

procedure TForm1.WMDropFiles(var Msg: TMessage);
var
Filename: array[0 .. 256] of Char;
Count : integer;
begin
{ Получаем количество файлов (просто пример) }
nCount := DragQueryFile( msg.WParam, $FFFFFFFF,
ac! FileName, cnMaxFileNameLen);
{ Получаем имя первого файла }
DragQueryFile( THandle(Msg.WParam),
0, { это номер файла }
Filename,SizeOf(Filename) ) ;
{ Открываем его }
with FileNameLabel do begin
Caption := LowerCase(StrPas(FileName));
Memo1.Lines.LoadfromFile(Caption);
end;
{ Отдаем сообщение о завершении процесса }
DragFinish(THandle(Msg.WParam));
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
{ Говорим Windows, что на нас можно бросать файлы }
DragAcceptFiles(Handle, True);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
{ Закрываем за собой дверь золотым ключиком}
DragAcceptFiles(Handle, False);
end;
end.

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

Обсуждается в конференциях   |x|
  • Как заблокировать мышь...
    Как полностью заблокировать мышь, чтобы никаких сообщений в систему не поступало, а потом разблокировать при закрытии ...
  • Подсчет слов в файле !!!
    Кто знает как подсчитать сколько каких слов содержиться в файле любого размера ? Как организовать цикл выделения слов ...
  • %system root%
    Как мне в програме отследить %system root% (папка с установленой виндой), чтоб в этой же проге можно было обращатся к ...
  • Проблема с MDI и модальными окнами
    Весь проект представляет MDI интерфейс, но возникла необходимость некоторые окна вызывать модально, чего стандартными ...
  • Дамп шины I2C и т.п.
    Задача такая: есть источник данных(шина) до 400кГц, ширина - менее 8 бит(точнее 2). Необходимо делать дамп состояния ...
  • Ввод даты в DBGrid
    Посоветуйте, пожалуйста, как наиболее удобно можно вводить дату в поле DBGrid'а путем выбора ее из календаря. Вообще, ...
  • панель задач
    Здравствуйте. Подскажите plzz как как сделать чтобы мою форму не было видно ни на панели задач, ни в таскбаре, ни в ...
У нас большой выбор статей   |x|
Мир Borland Kylix. Перехватчики событий, сигналы и слоты.
В предыдущей статье была рассмотрена обработка событий Qt в обработчике события OnEvent Kylix класса TApplication. В этой статье будет показан другой метод обработки событий Qt - использование перехватчиков событий (event hooks). Перехватчики событий подобны обработчику события OnEvent, с той разницей, что перехватчики событий позволяют подойти к обработке событий более дифференцировано...
Новинки книжного рынка   |x|
Delphi 6 и Kylix для программиста
В этой книге на практических примерах рассмотрены все возможности среды Delphi 6. Читательузнает, как создавать многоуровневые программы для работы с базами данных, Интернет-системы и сетевые распределенные приложения на основе технологий СОМ и CORBA. Рассмотрены механизмы преобразования XML-данных и приемы разработки служб WebServices. В большинстве случаев программист может обойтись визуальными средствами Delphi.Характер авторских работ С. Бобровского традиционно отличается тем, что они не только служат фундаментальными руководствами по новым технологиям программирования, но и представляют собой удобные справочники, полезные каждому программисту, независимо от уровня его подготовки.
Автор: Бобровский С.
Другие сайты о DELPHI   |x|
Delphi X-Files
Сайт целиком посвящен программированию а Borland Delphi. Все аспекты программирования, статьи, исходные коды, FAQ, компоненты и многое другое. Весь материал будет полезен как новичкам, так и ...

» Оценка сайта: 3
Опрос населения :)
К какой возрастной категории Вы принадлежите ?
»»» меньше 16
»»» от 17 до 20
»»» от 21 до 23
»»» от 24 до 26
»»» от 27 до 30
»»» от 30 до 35
»»» от 35 до 40
»»» от 40 до 44
»»» больше 45
Журнал "RSDN Magazine"  |x|

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

Для души

Хокку дня
Старый пруд.
Прыгнула в воду лягушка.
Всплеск в тишине.

Афоризмы
Слабого человека лучше иметь своим врагом, чем другом...(Бернард Шоу)

Фраза дня
"Другие не лучше", - надпись на зеркале.

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В Алабаме (США) под угрозой смертной казни запрещено посыпать рельсы железной дороги солью.
В Италии мужчине грозит арест, если он появится на улице в юбке.

И на закуску коротенький анекдот
- Девушка вы замужем?
- Нет перебиваюсь случайными связями.

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


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

Добро пожаловать на сайт -= Мастера DELPHI =- 


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное