Board index » delphi » AVI from BMPs

AVI from BMPs

How to create AVI file in Delpi or BCB from a squence of BMP files?
 

Re:AVI from BMPs


Hi,

have a look on Earls great homepage:

http://www.efg2.com/Lab/Library/Delphi/Graphics/BMP.htm

and search for 'avibuild' or 'BMPs to AVI'

Joann

Re:AVI from BMPs


I have written a class (TWriteAviClass) that does exactly this. If you want,
i can send it to you because then code is about 430 lines and i dont know if
it is a good idea to post it here ...

 All you need is to create and call the class like this :

-----------------------------------------
  NewAvi:=TWriteAviClass.Create (Self.Handle,filename);
  NewAvi.PrepareForVideo (width,height of the bitmaps) or
  NewAvi.PrepareforVideo (bitmap) // width & height are taken from bitmap
  ...// make a loop to put bitmaps
  NewAvi.AddFrameToVideoStream (bitmap,position);
  ... //
  NewAvi.SavetoFile (filename);
  NewAvi.Free;
----------------------------------------

L.

Quote
"Miem Chan" <miemc...@yahoo.com> wrote in message news:3cd7c50f_1@dnews...
> How to create AVI file in Delpi or BCB from a squence of BMP files?

Re:AVI from BMPs


I wouldn't mind having a look at the code myself :)

I don't suppose you've got a class to go back the other way as well (AVI ->
BMPs)? <g>

--
Paul Nicholls (Delphi 5 Professional)
"Life is like a road - occasionally you run into potholes or get blowouts." -
Paul Nicholls

HomePage: www.southcom.com.au/~phantom
Email: paul_f_nicho...@antispam.hotmail.com
(Remove "antispam." to reply)

Quote
"lazikas" <NOSPAMS_lazi...@iname.com> wrote in message

news:3cd93eb1$1_2@dnews...
Quote
> I have written a class (TWriteAviClass) that does exactly this. If you want,
> i can send it to you because then code is about 430 lines and i dont know if
> it is a good idea to post it here ...

>  All you need is to create and call the class like this :

> -----------------------------------------
>   NewAvi:=TWriteAviClass.Create (Self.Handle,filename);
>   NewAvi.PrepareForVideo (width,height of the bitmaps) or
>   NewAvi.PrepareforVideo (bitmap) // width & height are taken from bitmap
>   ...// make a loop to put bitmaps
>   NewAvi.AddFrameToVideoStream (bitmap,position);
>   ... //
>   NewAvi.SavetoFile (filename);
>   NewAvi.Free;
> ----------------------------------------

> L.

> "Miem Chan" <miemc...@yahoo.com> wrote in message news:3cd7c50f_1@dnews...
> > How to create AVI file in Delpi or BCB from a squence of BMP files?

Re:AVI from BMPs


"Paul Nicholls" <paul_f_nicho...@antispam.hotmail.com> escribi en el
mensaje news:3cd9b3b2_2@dnews...

Quote
> I wouldn't mind having a look at the code myself :)

> I don't suppose you've got a class to go back the other way as well
(AVI ->
> BMPs)? <g>

    Well, I do.... I'm working in a Component to allow to convert a
collection ob bitmaps into an AVI,
and the reverse too...  It's not a 'release' quality thing, but it seems
this topic repeats over and over again...
What do you guys think... Any one has a site where the code could be
uploaded and donated... Be forewarned,
it will need some rewriting.

regards

--
Gonzalo N?ez Riboni
Puebla, Puebla
MXICO

Re:AVI from BMPs


Sorry.

    Forgot to mention.... It's written in Builder 5.

--
Gonzalo N?ez Riboni
Puebla, Puebla
MXICO

Re:AVI from BMPs


Gonzalo

Of yourse, that would be a VERY interesting work. I very hope you get it
workung in Delphi too...

"Gonzalo N?ez" <gnun...@hotmail.com> schrieb im Newsbeitrag
news:3cd9e556$1_2@dnews...

Quote
> Sorry.

>     Forgot to mention.... It's written in Builder 5.

> --
> Gonzalo N?ez Riboni
> Puebla, Puebla
> MXICO

Re:AVI from BMPs


"Alex" <aleuth...@leual.ch.nospan> escribi en el mensaje
news:3cdbfe26$1_2@dnews...

Quote
> Gonzalo

> Of yourse, that would be a VERY interesting work. I very hope you get it
> workung in Delphi too...

Hi Alex.

    Unfortunately, I don't code a lot in Delphi... I guess I could try (at
some time) to get the
code translated into Delphi... I was thinking about releasing the code to
some project
group (JEDI comes to mind) where people much more versated in Delphi than me
could
take a look at the code and translate it (Ok, call me lazy ;) )

    If enough interest is developed on this code, I could take some time to
tidy it up, and
debug it a little bit more, add some comments (which honestly the code
severely lacks of)
end then send it up to someone.

    If you or anyone else reading this thread wants to spend some time
bringing this
code to a good level, and perhaps translate it into Delphi, please let me
know.

Best regards

---
Gonzalo N?ez Riboni
Puebla, Puebla
MXICO

Other Threads