Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Tiles Funktion von Photoshop

    Delphi
    by -NIP-, 7. Dez 2004
  Also die 2. hat nicht funktioniert, aber die erste. Dabei kam allerdings voll der Müll raus :-D
  Muss meinen Code wohl noch einmal unter die Haube schaun ;)
  
  Danke
  
  -NIP-
• Forum: Multimedia

  Re: Tiles Funktion von Photoshop

    Delphi
    by -NIP-, 7. Dez 2004
  Wenn ich euch richtig verstanden habe muss der Code nach dem ganzen Zeichnen so enden:
  if Assigned(Zielbild) then
  begin
  Zielbild.Free;
  end;
  Zielbild.Assign(Endbild);
  Wenn ich den Code dann ausführe gibt es komischerwiese eine AccessViolation... :gruebel:
  Hab ich was falsch gemacht?
  
  -NIP-
• Forum: Multimedia

  Re: Tiles Funktion von Photoshop

    Delphi
    by -NIP-, 7. Dez 2004
  Kommt schon Leute :zwinker:
  Liegt es an der Zuweisung von Endbild zu Zielbild?
  Da auf dem Zielbild ja garnichts erscheint, bin ich ziemlich ratlos...
  
  -NIP-
• Forum: Multimedia

  Tiles Funktion von Photoshop

    Delphi
    by -NIP-, 6. Dez 2004
  Hi!
  Ich habe hier mal versucht den Tiles-Filter von Photoshop nachzuahmen:
  
  procedure Vierecke (Quellbild:TBitmap; Zielbild:TBitmap; XAnzahl:Integer;
  YAnzahl:Integer; Abweichung:Integer; Hintergrundfarbe:TColor);
  var
  Breite,Hoehe,i,i2,AbweichungX,AbweichungY,XRasterPos,
  YRasterPos,HoehePos,BreitePos:Integer;
  EndBild:TBitmap;
  begin