Hallo und danke für die Antworten.
Das mit ScanLine werde ich mal umsetzen, nichts desto trotz funktioniert die Prozedur jedoch nicht so wie man sich das vorstellt. Auch bei Graphics32 werd ich mich reinarbeiten, hört sich vielversprechend an. Die Mandelbrotmenge wird eben ganz simpel erzeugt und dann gefärbt. Der Quellcode hierzu sieht ungefähr so aus:
Delphi-Quellcode:
for x := 0 to bitmap.width do
begin
for y := 0 to bitmap.height do
begin
re := (x/bitmap.width)*zoom+movex; // mit Startwerten zoom = 4, move = -2
im := (y/bitmap.height)*zoom+movey;
rez := 0;
imz := 0;
a := true;
it := 0;
for i := 0 to iterations do
begin
if a then
begin
rezold := rez;
rez := rez*rez-imz*imz+re;
imz := 2*rezold*imz+im;
if rez*rez+imz*imz > 4 then
begin
a := false;
it := i;
end;
end;
end;
col := (rez*rez+imz*imz)/4*colchangevar*10
if a then
bitmap.canvas.Pixels[x,y] := clBlack
else
bitmap.canvas.Pixels[x,y] := round(col+256*col+256*256+col);
end;
end;
Das Verkleinern mit Delphiinternen Funktionen geht auch wirklich schnell nur führt es nicht zu gewünschten Ergebnis, ich bräuchte also etwas, das in dieser Form das Bild verkleinert.