Danke für deine Mühe es gibt einen
AV direkt in der ersten zeile
alpha := ((imgSpectrum[y,y] and $FF000000) shr 24) and $FF;
gruss
ein Schreibfehler meinerseits: sollte imgSpectrum[x,y] heißen nit [y,y]
Grüße
Klaus
Kein Problem
Aber nein funktioniert nicht komme niemals über 127 hinweg.
PS:
Danke für euer Interesse denke muss es aufgeben komme auf keinen grünen zweig.
Man kann es drehen wie man will aber die Berechnung von VB lässt sich scheinbar auf Delphi auch in geänderter Form nicht umlegen.
Er wendet da ein paar Tricks an die so einfach nicht nachvollziehbar sind.
gruss