Thema: Delphi Transparenz, Code?

Einzelnen Beitrag anzeigen

jbg

Registriert seit: 12. Jun 2002
3.477 Beiträge
 
Delphi 10.1 Berlin Professional
 
#2
  Alt 26. Mär 2003, 19:38
Für das Formular gibt es bereits bei den JVCL Komponenten Formularmasken.

Wenn du es aber für Bilder (Bitmaps) machen willst, dann kannst du zum einen das langsame Canvas.Pixels[] Array benutzen oder das um einiges schnellere, aber gefährlichere (Schutzverletzung) Canvas.ScanLine[] Array.

Ich würde das ganze zuerst mal mit dem Pixel-Array machen und wenn der Algorithmus dann steht, diesen nach ScanLine[] umbauen.


Delphi-Quellcode:
for X := 0 to Width - 1 do
  for Y := 0 to Height - 1 do
    if BildEins.Pixels[X, Y] = BildZwei.Pixles[X, Y] then
      BildEins.Pixels[X, Y] := BildDrei.Pixles[X, Y];
(vorausgesetzt die drei Bilder haben die selben Ausmaße)
  Mit Zitat antworten Zitat