TImage überschreiben

[ksh]

nicht?! wie schade...

Delphi-Quellcode:

procedure BildGroesse(Seitenzahl: Integer);

procedure PAusgabe( copies: integer;    // Anzahl Ausdrucke
                    target:tcanvas;     // target : entweder bild.canvas
                       Ausgabe                 // oder printer.canvas
                    targetStr: Char;    // targetstr : entweder 'B' für Bildschirmausgabe
                                        // oder 'D' für Drucker
                    Ausgabe: char);     //  : entweder T für Teilwertausgabe
                                        // oder J für Jubiläumsausgabe
                                        // oder I für IASausgabe