Re: [Tool] Bitmap to AVI (Problemchen)
Mit Objekten habe ich nicht Vertreter von Delphis TObject gemeint, sondern Interfaces.
|
Re: [Tool] Bitmap to AVI (Problemchen)
Zitat:
Zitat:
Nachteil ist bei der Unit das wenn man mit mehreren Files arbeiten möchte die procedure CloseAVIFile nich in der gedachten Art verwenden kann. Gegebenenfalls werden ich die Unit ohne OOP machen. |
AW: [Tool] Bitmap to AVI
Zitat:
|
AW: [Tool] Bitmap to AVI
Weiß jemand, wo dieser Fehler seine Ursache hat?
|
AW: [Tool] Bitmap to AVI
Japp, CreatorState <> csWriting. Hast Du vorher CreateAVIFile aufgerufen?
|
AW: [Tool] Bitmap to AVI
Hey,
Ich bekomme keine AV-Exception oder ähnliches. Bei mir wird problemlos alles erstellt wenn ich die BMP einfüge. Super Tool! :thumb: |
AW: [Tool] Bitmap to AVI
Zitat:
Der Button "Make AVI" hat folgenden Code:
Delphi-Quellcode:
bmp := TBitmap.Create;
bmp.LoadFromFile(ListView1.Items[0].SubItems[0]); AVICreator := TAVICreator.Create(Handle); AVICreator.Filename := ''; AVICreator.Width := bmp.Width; AVICreator.Height := bmp.Height; AVICreator.FPS := StrToInt(cbxFPS.Text); AVICreator.ResRestriction := TResRestriction(cbxRestriction.ItemIndex); AVICreator.CreateAVIFile; // Selbst ohne diese Zeile kommt der Fehler ProgressBar1.Max := ListView1.Items.Count - 1; for i := 0 to ListView1.Items.Count - 1 do begin bmp.LoadFromFile(ListView1.Items[i].SubItems[0]); Image1.Picture.Bitmap.Assign(bmp); Image1.Refresh; ProgressBar1.Position := i; AVICreator.AddAVIFrame(bmp); end; bmp.free; fn := AVICreator.Filename; // Return the Filename selected of SaveDialog AVICreator.CloseAVIFile; AVICreator.free; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:49 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz