Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.01.2011, 16:03   #1
RIO
Форумчанин
 
Аватар для RIO
 
Регистрация: 15.12.2007
Сообщений: 422
По умолчанию Передать картинку как указатель

Здравствуйте. Как передать картинку как указатель? Есть функция фильтрации изображения, нужно в нее передать изображение с Image1 как указатель.
RIO вне форума Ответить с цитированием
Старый 11.01.2011, 16:30   #2
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

а подробнее прототип функции?
ей надо указатель на что?
не думаю что на объект класса TImage(учитывая что Делфи хранит классы всегда через указатель)
скорее на данные картинки...
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 11.01.2011, 16:39   #3
RIO
Форумчанин
 
Аватар для RIO
 
Регистрация: 15.12.2007
Сообщений: 422
По умолчанию

Код:
procedure gBrightnessFilter(pF : PFilter; gDst, gSrc : Pointer; Width, Height : Integer);
var
  pbDst, pbSrc : PByte;
  i, k : Integer;
  ks, kd : Double;
begin
  pbDst := gDst;
  pbSrc := gSrc;
  k := pF^.fbCoeff;
  kd := k / 32;
  ks := 255 / Power(255, kd);
  ShowMessage(FloatToStr(KS));
  for i := 0 to Width * Height - 1 do
    begin
      pbDst^ := Round(Power(pbSrc^, kd) * ks);
      Integer(pbDst) := Integer(pbDst) + 1;
      Integer(pbSrc) := Integer(pbSrc) + 1
    end
end;
RIO вне форума Ответить с цитированием
Старый 20.01.2011, 21:05   #4
генерал
 
Аватар для генерал
 
Регистрация: 05.05.2009
Сообщений: 6
По умолчанию

есть такая функция - scanline, возвращает указатель на переданное изображение. содержится в классе самого изображения
Код:
var p:pointer;
p:=Image1.Picture.Bitmap.scanline[1]
1- номер нужной строки
bitmap изображение хранится построчно, массивами точек
специализация - программирование и проектирование (icq: 419-319-475; e-mail: maxov-1@mail.ru)

Последний раз редактировалось генерал; 20.01.2011 в 21:07.
генерал вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Передать указатель на файл функции v01d Общие вопросы C/C++ 7 01.01.2013 07:56
Как получить картинку при наведении на другую картинку (ссылку) seeker1 JavaScript, Ajax 8 04.07.2010 19:42
Как передать в функцию указатель на String avd Общие вопросы C/C++ 6 06.06.2010 17:52
как использовать указатель this z3rg Общие вопросы C/C++ 2 16.03.2009 23:28
Как передать указатель в процедуру??? kate4ka Общие вопросы Delphi 1 17.03.2008 12:49