Registriert seit: 2. Nov 2005
4 Beiträge
|
Re: image vergößern und neu berechnen
3. Nov 2005, 10:32
@ Khabarakh
genau das will ich machen, nur weiß ich nicht genau, bzw. eigentlich gar ncht wieich das anstelen soll. ich will das das programm sich durch das rechteck 2 punkte merkt x/y 1 und x/y 2 die sollen gengeüber liegen und diesen bereich soll er nun durch weiter iterationen neu berchen und dann auf der ganen größe ds image anzeigen.
sry für die rechtschreibung aber die tastatur des notebooks ist einfach scheiße
bis jetzt habe ich das:
procedure TGUIMandelbrotmenge.ImageBmpMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
von := MandelbrotBmp.GetKomplex(X,Y);
end;
procedure TGUIMandelbrotmenge.ImageBmpMouseUp(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
bis := MandelbrotBmp.GetKomplex(X,Y);
MandelbrotBmp.SetBereich(von, bis);
MandelbrotBmp.Berechne;
ImageBmp.Canvas.Draw(0, 0, Mandelbrotbmp.GetBitmap);
end;
nur jetzt berchnet er das ganze image neu und nicht den ausschnitt, und er gibt auch nur den alten ausschnitt im image aus.
|