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)