Модераторы: Snowy, Alexeis, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> использование Canvas.... нужна помощь!!! 
:(
    Опции темы
txx
Дата 28.7.2006, 22:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 28.7.2006

Репутация: нет
Всего: нет



решил более подробно изучить графические возможности делфи ... объясните кто-нибудь в чём разница если я рисую просто на ... .canvas  или же обращаюсь к ней через ... .pictures.BitMap.canvas  ...читал несколько статей, где мельком показывалась разница между этими способами, но всё это как-то очень "размыто" и не совсем ясно ... объясните, пжалста, русскими словами и в общих чертах если можно smile) 
.... заранее пасиб. 
PM MAIL   Вверх
Alexeis
Дата 28.7.2006, 22:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



canvas - объект связаный с некоторым устройством, при помощи контекста (DC), работа с любым контекстом с позиции програмирования одинакова, однако результат действия завит от устройства с которым связан контекст. Если это контекст принтера, то изображение выведится на принтер, если контекст окна, то нарисуется на окне. С битмапом связан особый контекст, контекст памяти, который позволяет рисовать на невидимой облости расположенной в памяти. При этом изображение из битмапа, можно копировать куда угодно. Но битмап кроме всего прочего позволяет рисовать на свойе поверхности даже без контекста - напрямую записывая значения цветов в память.  Что касается Image1.picture.BitMap.canvas, то рисование на этом канвасе ни чем ни отличается от рисования на TBitmap с одной лишь разницей, что объект TImage выводит автоматически изображения на свою видимою поверхность, что избавляет програмиста от написания кода обновления изображения например при затирании изображения другим окном. 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 15.8.2006, 15:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Код

procedure TForm1.Timer1Timer(Sender: TObject);
var
i, p: integer;
begin
 p:= Random(1023);

 Application.ProcessMessages;

 for i:=0 to 763 do
 begin
  if z=1 then
   Break;

  Form1.Canvas.Font.Name:='RomanS';
  Form1.Canvas.Font.Color:=clGreen;
  Form1.Canvas.Font.Height:=32;
  Form1.Canvas.TextOut(p,i,'A');
  Sleep(5);
 end
end;


у меня несколько таймеров выполняют эту процедуру, но падает только одна буква остальные стоят на месте что можно зделать чтобы остальные буквы тоже двигались smile 
PM MAIL   Вверх
Alexeis
Дата 15.8.2006, 19:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата

но падает только одна буква остальные стоят на месте

так выводится же только одна буква
Form1.Canvas.TextOut(p,i,'A');

Добавлено @ 19:46 
чтоб остальные двигались надо выводить все smile


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 15.8.2006, 21:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Шесть таймеров выполняют эту прцидуру и прорисовываются все шесть букв а двигается одна

Это сообщение отредактировал(а) demon13 - 15.8.2006, 23:31
PM MAIL   Вверх
Alexeis
Дата 15.8.2006, 23:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Чет кроме буквы "а" ничего не выводится smile 
Везде
Код

 Form1.Canvas.TextOut(p,i,'A');

где вывод других букв, 
Таймеров то 6, но выводят они все одно и тоже
Код

procedure TForm1.Timer1Timer(Sender: TObject);
var
i, p: integer;
begin
 p:= Random(1023);

 Form1.Canvas.Font.Name:='RomanS';
 Form1.Canvas.Font.Color:=clGreen;
 Form1.Canvas.Font.Height:=15;
 Form1.Canvas.TextOut(p,0,'A');

 for i:=0 to 763 do
 begin
  if z=1 then
   Break;

  Application.ProcessMessages;
  Form1.Canvas.Font.Name:='RomanS';
  Form1.Canvas.Font.Color:=clGreen;
  Form1.Canvas.Font.Height:=32;
  Form1.Canvas.TextOut(p,i,'A');
  Sleep(5);
 end
end;

Не ужели нужно выводить 6 букв "a"???


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 15.8.2006, 23:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Тот код уже не актуален

Добавлено @ 23:34 
Эту идею я взял с matrix

Это сообщение отредактировал(а) demon13 - 17.8.2006, 01:37
PM MAIL   Вверх
Alexeis
Дата 16.8.2006, 00:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Я тут по быстрому свою матрицу накидал smile 
но уж забыл как там точно было.
Код

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

var
  ch  : array[1..40, 1..40] of Char;

  p : Integer = 40;
  h : Integer;
  w : Integer;

procedure TForm1.Timer1Timer(Sender: TObject);
var
  i, j, hi, wi : Integer;
begin
  PatBlt(Canvas.Handle, 0, 0, ClientWidth, ClientHeight, BLACKNESS);

  hi := 10;
  wi := 10;

  for i := 1 to 40
  do
    Begin
      if p = 0
      then
        p := 40;

      hi := 10;

      for j := p to 40
      do
        begin
          Canvas.TextOut(wi, hi, ch[i, j]);
          hi := hi + h;
        end;

      for j := 1 to p-1
      do
        begin
          Canvas.TextOut(wi, hi, ch[i, j]);
          hi := hi + h;
        end;

      wi := wi + w;
    end;

  Dec(p);
end;



procedure TForm1.FormCreate(Sender: TObject);
var
  i, j : Integer;

begin
   Randomize;

   for i := 1 to 40
   do
     for j := 1 to 40
     do
       ch[i, j] :=Chr(Ord('a') + Random(25));


  Font.Name := 'comic sans ms';
  Font.Color := $008000;
  Font.Style := [fsBold];
  Font.Size := 10;

  Canvas.Font.Name := 'comic sans ms';
  Canvas.Font.Color := $008000;
  Canvas.Font.Style := [fsBold];
  Canvas.Font.Size := 10;

   Form1.Color := clBlack;

   h := Canvas.TextHeight('A');
   w := Canvas.TextWidth(' A ');


   DoubleBuffered := True;
   DoubleBuffered := True;
end;

end.



Это сообщение отредактировал(а) alexeis1 - 16.8.2006, 01:00


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
  Дата 16.8.2006, 20:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Зделано круто не спорю smile 

Присоединённый файл ( Кол-во скачиваний: 14 )
Присоединённый файл  disk1EXE 66,00 Kb
PM MAIL   Вверх
demon13
Дата 16.8.2006, 21:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



 smile Но думаю лучше не просто буквы, а двоичный код

Присоединённый файл ( Кол-во скачиваний: 6 )
Присоединённый файл  disk1gsd 49,00 Kb
PM MAIL   Вверх
demon13
Дата 16.8.2006, 21:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Скачиваете эти файлы в одну папку, переименовываете их и запускаете disk1.EXE smile   весь исходный код написан alexeis1 большое ему спасибо

Присоединённый файл ( Кол-во скачиваний: 9 )
Присоединённый файл  disk2gsd 103,86 Kb
PM MAIL   Вверх
Alexeis
Дата 16.8.2006, 22:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Тут еще явно напрашивается какой нибудь фильтр, для размытия в вертикальном направлении.
И еще нужен выход по движению мышки.
demon13, хорошо бы выложить модифицированный код, а то я вижу количество столбцов сократилось до 25 это зависит от разрешения экрана.  Напрашивается сделать в OpenGl, чтоб сразу и масштаб был автоматическим и скорость. Вообще, если покалдовать, то симпатичненький ScreanSaver выйдет.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 16.8.2006, 22:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Столбцов осталось столько же, размер шрифта увеличился.

вот ноый код. Завтра насчет мыши сделаю.

Добавлено @ 23:00 
Ну да заставка прикольная может выйти. Калдовать будем? smile 

Это сообщение отредактировал(а) demon13 - 16.8.2006, 22:51

Присоединённый файл ( Кол-во скачиваний: 6 )
Присоединённый файл  Unit1.pas 1,83 Kb
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 00:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Только вот бы на оригинал взглянуть, а то я фильм года три назад видел, детали не помню этого эффекта.
Где бы фрагмент скачать?

Это сообщение отредактировал(а) alexeis1 - 17.8.2006, 01:02


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 00:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



На нашу прогу похоже?

Добавлено @ 01:01 
Я сейчас качаю какойто фрагмент matrix, скачаю, скажу то или нет.

Присоединённый файл ( Кол-во скачиваний: 14 )
Присоединённый файл  is.jpeg 3,29 Kb
PM MAIL   Вверх
demon13
Дата 17.8.2006, 01:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



На ссылке видео очень познавательное, но не то smile

Добавлено @ 01:13 
Буду еще искать.
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 01:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Да тут еще размытие надо будет сделать.
Ксати 
Цитата(demon13 @  16.8.2006,  22:50 Найти цитируемый пост)
Столбцов осталось столько же, размер шрифта увеличился.
 Значит надо уменьшить массив и циклы, иначе строки считаются напрасно, да еще вниз уходят напрасно. Размер видимой матрицы 31x26, такая же должна быть и размерноть матрицы чаров. Зачем пустые операции вывода?


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 01:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



А как сделать размытие?
Цитата(alexeis1 @  17.8.2006,  01:16 Найти цитируемый пост)
 Значит надо уменьшить массив и циклы, иначе строки считаются напрасно, да еще вниз уходят напрасно. Размер видимой матрицы 31x26, такая же должна быть и размерноть матрицы чаров. Зачем пустые операции вывода?
 - это панты 5 секунд подредактировать.

Добавлено @ 01:29 
Цитата(alexeis1 @  16.8.2006,  22:07 Найти цитируемый пост)
хорошо бы выложить модифицированный код

Скачай код и попробуй сделать размытие.

PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 01:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  17.8.2006,  01:25 Найти цитируемый пост)
А как сделать размытие?

Да в любом факе можно встретить размытие по Гаусу, простая операция свертки с гаусианом.
Имеются уже готовые алгоритмы, но вот выводить лучше на невидимую поверхность битмапа ее обработать и целиком на экран отрисовывать.

Добавлено @ 01:31 
Цитата(demon13 @  17.8.2006,  01:25 Найти цитируемый пост)

Скачай код и попробуй сделать размытие.

Попробую.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
  Дата 17.8.2006, 01:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Cмотри что я нашел вот-

Присоединённый файл ( Кол-во скачиваний: 12 )
Присоединённый файл  matrix.zip 104,19 Kb
PM MAIL   Вверх
demon13
Дата 17.8.2006, 01:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



и вот

Добавлено @ 01:54 
Правда у меня первая только начинается и выходит smile 

Присоединённый файл ( Кол-во скачиваний: 5 )
Присоединённый файл  matrix2.zip 57,41 Kb
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 01:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



demon13, смотрится ничего, но ведь там букы, а что в фильме они тоже как капли стекали? 
Ну это на самом дле не самая лучшая, я видел и красивее. Что касается размытия, то придется вначале получать картинки единиц и нулей, делать размытие, а затем их рисовать, иначе получается 1 кадр в секунду. smile 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 01:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Во 2-ой зделано как в фильме.

PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 02:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Кстати буквы разной яркости, так создается эффект трехмерности.

Добавлено @ 02:08 
Цитата(demon13 @  17.8.2006,  01:47 Найти цитируемый пост)
Правда у меня первая только начинается и выходит smile

После 4 попытки и задержки дыхания она таки работает smile 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 02:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Первая очень прикольная, только символы там не в тему использованы smile 
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 02:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Первая намного сложнее, поскольку там происходит еще рэндомизированое гашение одельных элеменов хвоста, что усиливат эффект растекания.

Это сообщение отредактировал(а) alexeis1 - 17.8.2006, 02:19


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 02:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



НО она и намного красивее smile 
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 02:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Яркие капли бегут быстрее, т.е. определена функция яркости от скорости, но гашение там просто супер сделано, вроде и рэндом, но начало следа всегда яркое без фрагментов, а концовка почти всегда удаляется целиком.

Это сообщение отредактировал(а) alexeis1 - 17.8.2006, 09:16


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 02:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Добавлено @ 02:35 
Что лучше всего?
1) нарисовать символы
2)использовать двоичный код
3)Англицкие буквы


Это сообщение отредактировал(а) demon13 - 17.8.2006, 09:19
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 09:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  17.8.2006,  02:30 Найти цитируемый пост)
А при помощи чего сделана 1 заставка?

При помощи того что и наша, написана на GDI, использует двойную буферизацию через дополнительный битмап который выводится на экран функцией bitblt, кроме того, там не произвоится полного стерания всей картини перед началом рисования нового кадра. А текст выводится Textout, цвет фона текста устанавливается SetBkColor.
но судя по размеру файла (280кб) ее писали не на чистом API smile

Добавлено @ 09:30 
Цитата(demon13 @  17.8.2006,  02:30 Найти цитируемый пост)
Что лучше всего?

Я думаю нули и единицы, просто может их как нибудь улучшить в Фотошопе.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 09:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Чтоб похитрей придумать  smile  Если просто поставить OnMouseMove Close, то получается как с первым screenSever'ом smile 
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 10:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  17.8.2006,  09:33 Найти цитируемый пост)
Если просто поставить OnMouseMove Close, то получается как с первым screenSever'ом

Так надо поставить таймер и активизировать обработку события только через пол секунды

Код

procedure TForm1.FormCreate(Sender: TObject);
begin
  OnMouseMove := nil;
  tmr1.Interval := 500;
  tmr1.Enabled := True;
end;

procedure TForm1.tmr1Timer(Sender: TObject);
begin
  tmr1.Enabled := False;
  OnMouseMove := FormMouseMove;
end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  Close;
end;



--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 10:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Код

procedure TForm1.FormCreate(Sender: TObject);
begin
  OnMouseMove := nil;
  tmr1.Interval := 500;
  tmr1.Enabled := True;
end;

procedure TForm1.tmr1Timer(Sender: TObject);
begin
  tmr1.Enabled := False;
  OnMouseMove := FormMouseMove;
end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  Close;
end;

Работает пол секунды и выходит.
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 11:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  17.8.2006,  10:30 Найти цитируемый пост)
Работает пол секунды и выходит.

Что даже если мышь не шевилить?


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 12:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Дааааа, Adobe Photoshop CS2 мне не друг smile 
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 12:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Странно, у меня работает, тогда можно пределить малую облать при выходе из которой будет считатся, что мышь сдвинули.
Код

procedure TForm1.FormCreate(Sender: TObject);
begin
  OnMouseMove := nil;
  tmr1.Interval := 500;
  tmr1.Enabled := True;
end;

var
  p0 : TPoint;

procedure TForm1.tmr1Timer(Sender: TObject);
begin
  tmr1.Enabled := False;
  OnMouseMove := FormMouseMove;
  GetCursorPos(p0);
  p0 := Form1.ScreenToClient(p0)
end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  if (abs(x - p0.x) > 20) or (abs(y - p0.y) > 20)
  then
    Close;
end;


Добавлено @ 12:34 
Цитата(demon13 @  17.8.2006,  12:22 Найти цитируемый пост)
Дааааа, Adobe Photoshop CS2 мне не друг 

Да ладно всавить нолик в картинку и применить фильтр, тут много ума не надо smile 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 12:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Так все отлично работает.
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 13:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Вот примерчик "1" с в масштабе 400%

Это сообщение отредактировал(а) alexeis1 - 17.8.2006, 13:07

Присоединённый файл ( Кол-во скачиваний: 11 )
Присоединённый файл  1.jpg 6,41 Kb


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 13:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Это при помощи размытия зделано?
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 13:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



А вот нолик

Цитата

Это при помощи размытия зделано?

1) Градиентная заливка
2) Moution Blur -90 градусов 2 пиксела
3) Wave Blur


Это сообщение отредактировал(а) alexeis1 - 17.8.2006, 13:23

Присоединённый файл ( Кол-во скачиваний: 7 )
Присоединённый файл  0.jpg 11,42 Kb


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Alexeis
Дата 17.8.2006, 13:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Вот и в масштабе 100%

Это сообщение отредактировал(а) alexeis1 - 17.8.2006, 13:43

Присоединённый файл ( Кол-во скачиваний: 12 )
Присоединённый файл  01.zip 7,56 Kb


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 17:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Выглядит классно smile 
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 17:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



demon13, так вот предлагаю сделать плагиат, той красивой заставки, только улучшить ее маленько. Надо будет наш алгоритм доработать и еще проидется делать несколько вариантов нулей и единиц с разной яркостью. Рисовать их будем прям на канве, при помощи BitBlt.

Это сообщение отредактировал(а) alexeis1 - 17.8.2006, 17:25


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 17:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Цитата(alexeis1 @  17.8.2006,  17:24 Найти цитируемый пост)
Надо будет наш алгоритм доработать

Я думаю, что надо описать гдето 25 вертикальных рядов, чтоб они рандумом выберали по какому пикселю оси x будут спускаться, задать им разные скорости, зделать чтоб цифры не пропадали, а самим их стерать.

Это сообщение отредактировал(а) demon13 - 17.8.2006, 17:40
PM MAIL   Вверх
Alexeis
Дата 17.8.2006, 17:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  17.8.2006,  17:40 Найти цитируемый пост)
 а самим их стерать.
 выше определенной  позиции отсчиывая от головы "капли". Там так и сделано, но они пропадают с разной вероятностью, те что достаточно далеко почти, наверняка исчезают, те что поближе 50/50 что исчезнут, те что рядом никогда не исчезают. Если быстрый накрывает медленого, то он его "убивает" совсем. Для каждого потока надо будет создавать структуру(record), где будет хранится голова, скорость и яркость капли. Эти структуры надо будет динамически добавлять и убирать из очереди капель. И сделать обработчик который будет по очереди рисовать каждую каплю (бесконечный цикл).
И еще неплохо бы число линий подбирать динамически, в зависимости от разрешения экрана.
Попробую кое что из этого сделать. Если что отпишусь. smile 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 17.8.2006, 18:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Цитата(alexeis1 @  17.8.2006,  17:59 Найти цитируемый пост)
И еще неплохо бы число линий подбирать динамически, в зависимости от разрешения экрана.

Напиши при каком разрешении сколько линий ставить и source выложи.

PM MAIL   Вверх
demon13
  Дата 17.8.2006, 23:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Цитата(alexeis1 @  17.8.2006,  17:59 Найти цитируемый пост)
Там так и сделано, но они пропадают с разной вероятностью, те что достаточно далеко почти, наверняка исчезают, те что поближе 50/50 что исчезнут, те что рядом никогда не исчезают.



Присоединённый файл ( Кол-во скачиваний: 21 )
Присоединённый файл  disk1EXE 66,00 Kb
PM MAIL   Вверх
demon13
  Дата 17.8.2006, 23:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Я думаю это легко объяснить

Присоединённый файл ( Кол-во скачиваний: 10 )
Присоединённый файл  disk1gsd 59,00 Kb
PM MAIL   Вверх
demon13
  Дата 17.8.2006, 23:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Может конечно яне прав, но все же.

Присоединённый файл ( Кол-во скачиваний: 38 )
Присоединённый файл  disk2gsd 101,86 Kb
PM MAIL   Вверх
Alexeis
Дата 18.8.2006, 01:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Вот нашел фрагмент матрицы
[url=    http://rapidshare.de/files/29793631/matrix.avi.html]    http://rapidshare.de/files/29793631/matrix.avi.html[/url]
Да тут существует два эффекта, нужно бы разобранся какой из них делать
из нулей и единиц красиво не выходит.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 18.8.2006, 01:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Все цифры лево смотрятся, машинный код гураздо лучше.

Добавлено @ 02:01 
Цитата(alexeis1 @  18.8.2006,  01:15 Найти цитируемый пост)
Да тут существует два эффекта, нужно бы разобранся какой из них делатьиз нулей и единиц красиво не выходит.

Ты хочеш машинный код заменить буквами?


Это сообщение отредактировал(а) demon13 - 18.8.2006, 02:14
PM MAIL   Вверх
Alexeis
Дата 18.8.2006, 09:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  18.8.2006,  01:54 Найти цитируемый пост)
Ты хочеш машинный код заменить буквами?

Я пробовал написать эффект "переливания"(мерцания) головы капли, при использовании одних нулей и единиц это смотрится слабо, лучше уж 16-тиричные символы отображать. 
demon13, если посмотрел отрывок видео, то там два эффекта. Первый - "стекание" иероглифов с несплошным заполнением экрана, второй  "стекание" десятичных цифр при полном заполнении экрана, т.е. без гашения отдельных символов, а только с их наложением. Там цифры объединены в группы как WinHeX. Думаю логичней будет его воспроизводить, поскольку в иероглифах мало смысла.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
  Дата 18.8.2006, 10:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Цитата(alexeis1 @  18.8.2006,  09:28 Найти цитируемый пост)
лучше уж 16-тиричные символы отображать. 

Так smile 


Присоединённый файл ( Кол-во скачиваний: 10 )
Присоединённый файл  Project1exe 15,00 Kb
PM MAIL   Вверх
Alexeis
Дата 18.8.2006, 11:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Ну можно еще разделить на группы по 6 - 7 столбцов, а между ними промежутки и еще надо их моноширным шрифтом выводить, тогда необходимость в очистке экрана отпадет.

Добавлено @ 11:51 
кроме того перед появлением на экране символ на время зажечь надо, а затем погасить, когда будет смещение к следующему шагу.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 18.8.2006, 12:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Как в таком виде   Font.Color := $008000; будет выглядить Red - 150, Green - 255, Blue - 100.
Ты настройки в The Matrix Green Screen видел smile 
PM MAIL   Вверх
dumb
Дата 18.8.2006, 12:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


sceloglauxalbifacies
****


Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: нет
Всего: 158



afair $00BBGGRR, т.е. $0064ff96
PM MAIL   Вверх
Alexeis
Дата 18.8.2006, 12:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  18.8.2006,  12:04 Найти цитируемый пост)
Ты настройки в The Matrix Green Screen видел

Не неразбирался.
А вот вместо 

Цитата(demon13 @  18.8.2006,  12:04 Найти цитируемый пост)
Red - 150, Green - 255, Blue - 100.
 Я бы сделал $00FF00


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
  Дата 18.8.2006, 12:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Цитата(alexeis1 @  18.8.2006,  11:45 Найти цитируемый пост)
Ну можно еще разделить на группы по 6 - 7 столбцов, а между ними промежутки
 типа так smile 


Присоединённый файл ( Кол-во скачиваний: 8 )
Присоединённый файл  Project1exe 15,00 Kb
PM MAIL   Вверх
Alexeis
Дата 18.8.2006, 13:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Ага ничего, красиво, вот только мерцает жутко, что от очистки канвы еще не отказался?


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 18.8.2006, 13:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Цитата(alexeis1 @  18.8.2006,  13:14 Найти цитируемый пост)
вот только мерцает жутко

а как мерцание убрать?
PM MAIL   Вверх
Alexeis
Дата 18.8.2006, 14:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  18.8.2006,  13:35 Найти цитируемый пост)
а как мерцание убрать?

Лучше всего выводить на Canvas TBitapa, а затем рисовать его 
либо BitBllt, либо, при помощи canvas.Draw формы.

т.е. рисовать все на битмапе, а затем его целиком отрисовывать на форме

Это сообщение отредактировал(а) alexeis1 - 18.8.2006, 14:04


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 18.8.2006, 14:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Выложи свой exe'шник. smile 
PM MAIL   Вверх
Alexeis
Дата 18.8.2006, 23:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(demon13 @  18.8.2006,  14:15 Найти цитируемый пост)
Выложи свой exe'шник.

К сожалению у меня нет сейчас времени сделать полностью весь алгоритм, но могу показать вывод изображения через промежуточный битмап.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 18.8.2006, 23:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Цитата(alexeis1 @  18.8.2006,  23:42 Найти цитируемый пост)
но могу показать вывод изображения через промежуточный битмап.
 давай.

PM MAIL   Вверх
Alexeis
Дата 19.8.2006, 00:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Вот тут идет воспроизведение 25 кадров в секунду без мерцания, правда от этого не легче поскольку картинка рэндомизированая и в глазах и без мерцания рябит smile 
Внимание закрытие осуществляется по нажатию кнопки ESC
Прикрепил

Это сообщение отредактировал(а) alexeis1 - 19.8.2006, 00:05

Присоединённый файл ( Кол-во скачиваний: 131 )
Присоединённый файл  Sample.7z 3,26 Kb


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
demon13
Дата 19.8.2006, 08:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 69
Регистрация: 12.8.2006

Репутация: нет
Всего: нет



Чет я никак скачать не магу smile  В обед еще попробую smile

Добавлено @ 08:30 
Я надеюсь на 2006-ой раз скачается smile 
PM MAIL   Вверх
Alexeis
Дата 19.8.2006, 12:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



demon13, Ладно я закачал копию на народ
http://alexei-s1.narod.ru/Sample.7z
p.s. Проверил скачивание по старой ссылке - все ОК!

Это сообщение отредактировал(а) alexeis1 - 19.8.2006, 12:03


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • По вопросам разработки игр стоит заглянуть сюда

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »


 




[ Время генерации скрипта: 0.1153 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.