AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia teil eines bitmaps in ein anderes kopieren
Thema durchsuchen
Ansicht
Themen-Optionen

teil eines bitmaps in ein anderes kopieren

Ein Thema von lbccaleb · begonnen am 21. Jul 2008 · letzter Beitrag vom 23. Jul 2008
Antwort Antwort
Seite 1 von 2  1 2      
Benutzerbild von lbccaleb
lbccaleb

Registriert seit: 25. Mai 2006
Ort: Rostock / Bremen
2.037 Beiträge
 
Delphi 7 Enterprise
 
#1

teil eines bitmaps in ein anderes kopieren

  Alt 21. Jul 2008, 21:28
hy ther,


also ich möchte aus einem teil eines bitmaps, ein neues erstellen!
ich habe als ausgangsbild, ein bitmap mit den maßen 8x464!
ich möchte das bild in 58 teile aufteilen, also jedes entstandene bild soll dann 8x8 sein!



dafür hab ich folgende funktion geschriebn bei der index das bild ist, was zurückgeliefert wird!



edit: nach einigen berichtigungen, bin ich nun bei folgendem source angekommen, hab nochmal nachgeschlagen und brauche bei result und sourcebitmap ein devicekontext, wo aber nehm ich mir das her??

Delphi-Quellcode:
function GetBitmapFromTable(SourceBitmap: HBitmap; index: integer): HBitmap;
  begin;
    if SourceBitmap <> 0 then
      begin
        Result := SourceBitmap;
        SetBitmapDimensionEx(Result, 8, 8, 0);
        BitBlt(Result, (index * 8), 8, 8, 8, SourceBitmap, 0, 0, SRCCOPY);
      end;
  end;
aber bitblt gibt mir immer 0 zurück, woran kann das liegen??

edit: vom ganzen probieren haben sich paar fehler eingeschlichen^^
Martin
MFG Caleb
TheSmallOne (MediaPlayer)
Die Dinge werden berechenbar, wenn man die Natur einer Sache durchschaut hat (Blade)
  Mit Zitat antworten Zitat
Benutzerbild von Sanchez
Sanchez

Registriert seit: 24. Apr 2003
Ort: Neumarkt Stmk
892 Beiträge
 
Delphi XE6 Enterprise
 
#2

Re: teil eines bitmaps in ein anderes kopieren

  Alt 21. Jul 2008, 21:34
Hi Martin,

Du gibst ein Bitmap mit, weist dem Result das übergebene Bitmap zu. Dann setzt du das Bitmap (auf das du jetzt mit SourceBitmapH und auch mit Result referenzierst) auf die Dimension 8*8. Anschließend kopierst du einen 8*8 Ausschnitt aus dem Bitmap auf sich selbst. Wenn Index > 0 ist, dann ist der Ausschnitt gar nicht mehr am Quellbitmap vorhanden.

Du musst auf alle Fälle fürs Result ein eigenes Bitmap erzeugen.

lg,
daniel
Daniel
Testen ist feige!
  Mit Zitat antworten Zitat
Benutzerbild von lbccaleb
lbccaleb

Registriert seit: 25. Mai 2006
Ort: Rostock / Bremen
2.037 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: teil eines bitmaps in ein anderes kopieren

  Alt 21. Jul 2008, 21:38
Zitat von Sanchez:
Hi Martin,

Du gibst ein Bitmap mit, weist dem Result das übergebene Bitmap zu. Dann setzt du das Bitmap (auf das du jetzt mit SourceBitmapH und auch mit Result referenzierst) auf die Dimension 8*8. Anschließend kopierst du einen 8*8 Ausschnitt aus dem Bitmap auf sich selbst. Wenn Index > 0 ist, dann ist der Ausschnitt gar nicht mehr am Quellbitmap vorhanden.

Du musst auf alle Fälle fürs Result ein eigenes Bitmap erzeugen.

lg,
daniel
das oben mit dem h war schreibfehler, wie erzeug ich das denn am besten??? und wieso ist der kopierende auschnitt nicht mehr auf dem bild??? das ausgangsbild ist doch gross genug, und ich will ihm ja nur sagen ab wann er von dem bild kopieren soll

wie würdest du das machen??
Martin
MFG Caleb
TheSmallOne (MediaPlayer)
Die Dinge werden berechenbar, wenn man die Natur einer Sache durchschaut hat (Blade)
  Mit Zitat antworten Zitat
Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#4

Re: teil eines bitmaps in ein anderes kopieren

  Alt 22. Jul 2008, 01:18
BitBlt erwartet kein hBitmap, sondern ein hDC.
  Mit Zitat antworten Zitat
Benutzerbild von roga
roga

Registriert seit: 15. Jun 2008
Ort: Sachsen-Anhalt
109 Beiträge
 
Delphi XE8 Professional
 
#5

Re: teil eines bitmaps in ein anderes kopieren

  Alt 22. Jul 2008, 01:29
...und sollte es nicht so sei...

  BitBlt(Result, 0, (index * 8), 8, 8, SourceBitmap, 0, 0, SRCCOPY); ...da das QuellBitmap 8x464 ist ??
Ronald
  Mit Zitat antworten Zitat
Benutzerbild von lbccaleb
lbccaleb

Registriert seit: 25. Mai 2006
Ort: Rostock / Bremen
2.037 Beiträge
 
Delphi 7 Enterprise
 
#6

Re: teil eines bitmaps in ein anderes kopieren

  Alt 22. Jul 2008, 17:59
Zitat von NamenLozer:
BitBlt erwartet kein hBitmap, sondern ein hDC.
OK, wie muss ich das also genau machen??? wo bekomm ich denn ein hdc her?? kenn mich damit nicht aus...




Zitat von roga:
...und sollte es nicht so sei...

  BitBlt(Result, 0, (index * 8), 8, 8, SourceBitmap, 0, 0, SRCCOPY); ...da das QuellBitmap 8x464 ist ??

ja genau, war schon spät..
Martin
MFG Caleb
TheSmallOne (MediaPlayer)
Die Dinge werden berechenbar, wenn man die Natur einer Sache durchschaut hat (Blade)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.622 Beiträge
 
Delphi 12 Athens
 
#7

Re: teil eines bitmaps in ein anderes kopieren

  Alt 22. Jul 2008, 18:07
Ein hDC wäre z.B. Bitmap.Canvas.Handle.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von lbccaleb
lbccaleb

Registriert seit: 25. Mai 2006
Ort: Rostock / Bremen
2.037 Beiträge
 
Delphi 7 Enterprise
 
#8

Re: teil eines bitmaps in ein anderes kopieren

  Alt 22. Jul 2008, 18:10
Zitat von DeddyH:
Ein hDC wäre z.B. Bitmap.Canvas.Handle.
mhh und wenn ich kein tbitmap hab??
Martin
MFG Caleb
TheSmallOne (MediaPlayer)
Die Dinge werden berechenbar, wenn man die Natur einer Sache durchschaut hat (Blade)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.622 Beiträge
 
Delphi 12 Athens
 
#9

Re: teil eines bitmaps in ein anderes kopieren

  Alt 22. Jul 2008, 18:19
Dann musst Du Dir den Devicecontext anders besorgen.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von lbccaleb
lbccaleb

Registriert seit: 25. Mai 2006
Ort: Rostock / Bremen
2.037 Beiträge
 
Delphi 7 Enterprise
 
#10

Re: teil eines bitmaps in ein anderes kopieren

  Alt 22. Jul 2008, 18:29
ok aber wie genau denn, und vor allem von was/wo soll ich ein devicekontext erzeugen oder herholen??
Martin
MFG Caleb
TheSmallOne (MediaPlayer)
Die Dinge werden berechenbar, wenn man die Natur einer Sache durchschaut hat (Blade)
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:13 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