Создание TBitmap с ScanLine другого битмапа...

[SalasAndriy]

Здравствуйте!

Как можно создать TBitmap или пусть даже HBITMAP на основе указателя уже имеющегося TBitmap.ScanLine[0]?

Вот например есть ф-я

function DrawEffect(PVideo: Pointer; Width, Height: Integer): boolean;
begin
  
end;

Пример использования:

procedure TForm1.Button2Click(Sender: TObject);
var
  bmp: TBitmap;
begin
  bmp := TBitmap.Create;
  bmp.LoadFromFile('Какой-то файл.bmp');
  bmp.PixelFormat := pf32bit;

  if DrawEffect(bmp.ScanLine[0], bmp.Width, bmp.Height) then
  bmp.SaveToFile('Какой-то файл 2.bmp');

  bmp.Free;
end;

Как можно внутри функции DrawEffect создать TBitmap или HBITMAP из этого параметра PVideo который она имеет...

Чтобы я мог работать с той памятью которую получаю так как с обычным TBitmap.

Или единственный выход будет такой? Копирование - Обработка - Копирование обратно?

function DrawEffect(PVideo: Pointer; Width, Height: Integer): boolean;
var
  dstPixel: PRGBQuad;
  srcPixel: PRGBQuad;
  X, Y: integer;
  TempBitmap: TBitmap;
  i: Integer;
begin
  TempBitmap := TBitmap.Create;
  TempBitmap.PixelFormat := pf32bit;
  TempBitmap.Width := Width;
  TempBitmap.Height := Height;

  srcPixel := PVideo;

  for Y := 0 to Height - 1 do
  begin
    dstPixel := Bmp1.ScanLine[Y];
    for X := 0 to Width - 1 do
    begin
      with dstPixel^ do
      begin
        rgbRed := dstPixel^.rgbRed;
        rgbGreen := dstPixel^.rgbGreen;
        rgbBlue := dstPixel^.rgbBlue;
        Inc(srcPixel);
      end;
      Inc(dstPixel);
    end;
  end;

  // обработка

  // И таким же способом копирование обратно
end;

Но мне кажется что это будет очень долго... Так как ф-я DrawEffect будет вызываться не при нажатии на кнопку, а по таймеру... Плюс к тому что еще обработать нужно данные (Нарисовать эффект)... теряется скорость...

Есть другие варианты решения проблемы?

[DomiNick]

Зачем всё так запутанно и сложно?
HBITMAP - это указатель на описание битмапа...
bmp.ScanLine[0] - это указатель на начало диб-секции в памяти (массив байт)...

Для вашего "эффекта" обязательно делать копию картинки? Может просто через указатель работать?
Или передавайте функции DrawEffect сам TBitmap...

[BOBAH13]

CreateDIBSection

[SalasAndriy]

Зачем всё так запутанно и сложно?
HBITMAP - это указатель на описание битмапа...
bmp.ScanLine[0] - это указатель на начало диб-секции в памяти (массив байт)...

Дело в том, что я пишу визуализационный плагин Sonique которые проигривает AIMP... И мне плеер передает только те параметры которые я показал на примере функции DrawEffect.

Для вашего "эффекта" обязательно делать копию картинки? Может просто через указатель работать?
Или передавайте функции DrawEffect сам TBitmap...

Можно работать и через указатель и вручную всё рисовать... Но тогда нужно строить кучу велосипедов LineTo ... и других процедур рисования...

CreateDIBSection

Я этой функцией имею дело первый раз... Вчера шарил в инете но нужного результата не добился... Она создает мне указатель на массив бит, а мне нужно чтобы она его не создавала, а использовала уже существующий указатель ScanLine...

[DomiNick]

Можно работать и через указатель и вручную всё рисовать... Но тогда нужно строить кучу велосипедов LineTo ... и других процедур рисования...

Ну так это зависит от того какие именно "эффекты" планируются...

Дело в том, что я пишу визуализационный плагин Sonique которые проигривает AIMP...

Хм... А можно тогда посмотреть описание этой штуковины?

И мне плеер передает только те параметры которые я показал на примере функции DrawEffect.

Передаётся только это? о___О
Как-то странно... А как же формат (количество бит на пиксель)? Или он там известный/фиксированный?


Ничего подходящего сходу не вспомнилось... Возможно если только ещё в gdiplus посмотреть...
Если нужна скорость, то ИМХО лучше "построить кучу велосипедов"... Кстати в сети полно готовых "велосипедных" алгоритмов с открытым исходным кодом...

[BOBAH13]

Я этой функцией имею дело первый раз... Вчера шарил в инете но нужного результата не добился... Она создает мне указатель на массив бит, а мне нужно чтобы она его не создавала, а использовала уже существующий указатель ScanLine...

1. MSDN
2. Сначала разберитесь, а потом подумайте прежде чем писать ерунду
3. Что мешает по полученному указателю на биты HBITMAP, скопировать из указателя ваших данных?
4. Вы понимаете что после создания HBITMAP таким образом, система уже сама заботиться о корректном освобождении занимаемой памяти данным HBITMAP? А вы хотите чтобы она связала ваш указатель с новым HBITMAPом, что не есть хорошо по моему.
5. А кто мешает сначала создавать HBITMAP (CreateDIBSection), а потом зная прямой адрес битовой карты, работать как с обычным указателем?

UPD:
В принципе можете еще использовать CreateBitmap, но я не уверен что после создания нового HBITMAP'а с помощью данной функции, вы сможете обращаться на прямую к памяти/битам используя старый указатель (указанный в функции в качестве параметра).

[SalasAndriy]

Ну так это зависит от того какие именно "эффекты" планируются...

Согласен)) Если в одном плагине планируется немного, то нужно иметь запас на будущее...

Хм... А можно тогда посмотреть описание этой штуковины?

Можно)
Это SDK плагина...

Передаётся только это? о___О
Как-то странно... А как же формат (количество бит на пиксель)? Или он там известный/фиксированный?

Количество бит на пиксель всегда равно 32 бита...

Ничего подходящего сходу не вспомнилось... Возможно если только ещё в gdiplus посмотреть...
Если нужна скорость, то ИМХО лучше "построить кучу велосипедов"... Кстати в сети полно готовых "велосипедных" алгоритмов с открытым исходным кодом...

может и так... Спасибо DomiNick

1. MSDN

Спасибо, смотрю но разобраться не разобрался...

2. Сначала разберитесь, а потом подумайте прежде чем писать ерунду

Ерунду пишу потому что не разобрался и потому прошу помощи у знатоков!
Не писал бы вообще если бы знал как решить задачу...

3. Что мешает по полученному указателю на биты HBITMAP, скопировать из указателя ваших данных?

Я писал об этом... Вот я скопировал, а потом как? Мне нужно работать с данными которые уже есть... Получается я работаю напрямую но уже с новыми данными, хорошо я обработал их и получается нужно снова всё обратно скопировать в старые? Я этого и пытаюсь избежать... Туда сюда перебрасывать данные... Или может я вас не правильно понял?

4. Вы понимаете что после создания HBITMAP таким образом, система уже сама заботиться о корректном освобождении занимаемой памяти данным HBITMAP? А вы хотите чтобы она связала ваш указатель с новым HBITMAPом, что не есть хорошо по моему.

Теперь понимаю, спасибо!

5. А кто мешает сначала создавать HBITMAP (CreateDIBSection), а потом зная прямой адрес битовой карты, работать как с обычным указателем?

Можно примерчик? Я не профи, с этим дела не имел...

UPD:
В принципе можете еще использовать CreateBitmap, но я не уверен что после создания нового HBITMAP'а с помощью данной функции, вы сможете обращаться на прямую к памяти/битам используя старый указатель (указанный в функции в качестве параметра).

Спасибо, BOBAH13, попробую и этот вариант.

[SalasAndriy]

Сори... нажал 2 раза кнопку отправить... Модеры, удалите это сообщение...