Hallo
Delphi-Quellcode:
...
ResizeImage(nw , nh);
bmp.Assign(Image2.Picture.Bitmap);
Helligkeit(bmp);
...
funktioniert beim ersten mal,
danach musst Du aber Dein Ergebnis
wieder nach Image1 kopieren, wenn
Du die Prozedur noch mal durchlaufen willst.
Deine Quelldatei für die Prozedur ResizeImage
ist ja in Image1.
und Dein bmp musst Du auch wieder freigeben:
bmp.Free;