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

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


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

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

DELPHI.mastak.ru

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

Кое-что из нашей кладовки   |x|
  • Игра -тир Malder   (12.07.02 16:09)
    Стреляешь по бутылкам под веселую музыку. В общем, можно научиться хорошо управлять мышкой, пригодиться потом =)
    Только не ругайтесь, так как писалось давно, на заре моего программистского пути, сейчас добавил только копирайт и выложил. Ностальгия =)
    »»» Скачать: исходные тексты (70кб) демонстрационный EXE файл (808кб)
  • Mouse Sensitivity melifaro vahtang@hotmail.ru   (11.07.02 19:04)
    Для Counter-Strike'ров!
    Если Вас не устраивает предел "1" на sensitivity - качайте! Можно регулировать 10 различных степеней ускорения мыши. На минимуме - пол года будете от одного угла desktop'а до другого крутить :)

    Ну и так пригодится, на всякий случай :)

    Удачных HEADSHOT'ов!
    »»» Скачать: исходные тексты (169кб) демонстрационный EXE файл (169кб)
Лучшее из нашего FAQ   |x|
Как создать отдельную подсказку (hint) для каждой ячейки StringGrid?
В приведенном примере отслеживается движение курсора мыши - при перемещении между ячейками StringGrid'а - появляется окно подсказки(hint), показываеющее номер текущей строки и колонки.
Пример:

type
   TForm1 = class(TForm)
       StringGrid1: TStringGrid;
       procedure StringGrid1MouseMove(Sender: TObject;
       Shift: TShiftState; X, Y: Integer);
       procedure FormCreate(Sender: TObject);
   private
   {Private declarations}
       Col : integer;
       Row : integer;
   public
   {Public declarations}
end;

var
   Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
   StringGrid1.Hint := '0 0';
   StringGrid1.ShowHint := True;
end;

procedure TForm1.StringGrid1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
   r : integer;
   c : integer;
begin
   StringGrid1.MouseToCell(X, Y, C, R);
   with StringGrid1 do
       begin
           if ((Row <> r) or(Col <> c)) then
               begin
                   Row := r;
                   Col := c;
                   Application.CancelHint;
                   StringGrid1.Hint :=IntToStr(r)+#32+IntToStr(c);
              &! nbsp;end;
       end;
end;



Источник: Дельфи. Вокруг да около.

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

Обсуждается в конференциях   |x|
  • Можно ли поменять кодовую сраницу для своей проги?
    Субж однако. я пишу программу на другом языке, скажем на арабском, но для пользователей России! Можно ли мне сделать ...
  • Как сменить текущий каталог
    Программа создает каталог по дате как программно сделать этот каталог текущим, чтобы после выхода из программы ...
  • Удалить файл?
    Как удалить файл, открытый в данный момент другим приложением?
  • матем
    Люди, помогите какая функция извлекает корень кубический, или возводит число в любую степень ?
  • ПОМОГИ-И-И-И-И-И-ТЕ !!!!!!!
    Народ, всем привет. Есть проблема: OS NT4 как в ней получить доступ к реестру на запись если я работаю не под админом ...
  • Нужна помощь в реализации програмки :)
    Программа без формы, ждёт сообщения. Когда получает, выполняет какие-то операции и закрывается. Вопросы в следующем: ...
  • фокс про и принтер
    Люди кто может толком сказать как заставить досовую прогу печатать отчёты на лазернике.
У нас большой выбор статей   |x|
Невизуальные классы в Delphi
В этом обзоре мне хотелось бы осветить несколько классов Delphi, которым обычно в книгах и других обучающих материалах уделяется (если уделяется) весьма скромное внимание. Это так называемые невизуальные классы, не порожденные непосредственно от TComponent и не имеющие владельца. Следовательно, начинающий разработчик в палитре компонентов их не видит, в книжках о них не пишут, а help’ы ему читать неохота или он просто не знает английского...
Новинки книжного рынка   |x|
Самоучитель Kylix
Книга посвящена новому продукту фирмы Borland - объектно-ориентированной среде для быстрой разработки приложений под Linux. Рассматривается версия Kylix 1.0 Server Developer.
Приводятся приемы работы с графическими компонентами, принципы создания приложений баз данных и собственных компонентов.
Дается краткое описание языка программирования Object Pascal. Последняя часть книги посвящена проблеме создания межплатформенных приложений, которые работают как в среде Linux, так и в Windows.
Изложение сопровождается многочисленными примерами и фрагментами кода.Для программистов

Автор: Понамарев В.
Другие сайты о DELPHI   |x|
UtilMind Solutions
Более 40 компонент, в основном бесплатных.

» Оценка сайта: 4
Опрос населения :)
Что мешает плохому танцору?
»»» Эти штуки... ;)
»»» Танцовщица
»»» Крылья
»»» Оппозиция
»»» Что и хорошему
»»» Ничего мне не мешает!
Журнал "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=1129


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

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


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

В избранное