Стрелками перемещаем окно

Стрелками перемещаем окно

Тема в разделе "Темы со старого форума", создана пользователем Бэкап, 05.05.2015.

Загрузка...
Ответов: 0 Просмотров: 237 Ответить в теме
Воспользуйтесь функцией автоматического продвижения темы для увеличения числа просмотров темы, продаж платного контента и узнаваемости Вашего бренда. Услуга продвижения действует на протяжении 3-х дней и стоит всего 50 STF Wallet.

Продвинуть тему
  1. Бэкап
    uses GraphABC;
    procedure MouseDown(x,y,mb: integer);
    begin
    MoveTo(x,y);
    end;
    procedure MouseMove(x,y,mb: integer);
    begin
    if mb=1 then LineTo(x,y);
    end;

    begin
    OnMouseDown := MouseDown;
    OnMouseMove := MouseMove
    end.
     
    05.05.2015 Сообщений: Симпатий:
В этой теме всего одна страница
Вам, как гостю, ограничены возможности взаимодействия с темами. Пройдите бесплатную регистрацию и откройте для себя море возможностей.