TImage zur Laufzeit mit weiteren Properties ausstatten

[torud]

Klingt plausibel. Dies wird aber nun mein erster Versuch. Wie und wo muss ich Deinen Beispiel-Code nun einsetzen?

Bisher ist es bei mir so:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ComCtrls, pngimage, ExtCtrls,Math, StdCtrls, jpeg ;

type
  TForm1 = class(TForm)
    img_src: TImage;
    img_bg: TImage;
    ScrollBar1: TScrollBar;
    img_dest: TImage;
    ScrollBar2: TScrollBar;
    lbl_size: TLabel;
    lbl_angle: TLabel;
    procedure FormCreate(Sender: TObject);
    procedure ScrollBar1Change(Sender: TObject);
    procedure ScrollBar2Change(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}