Hoi,

Ik heb een simpele vraag maar kom er maar niet uit.

Wat ik wil is het volgende:
Met een klik op de button verschijnt er een image op het form met een icon. Vervolgens wil ik dat gebruikers in runtime deze image (en meerdere) naar eigen inzicht kunnen verplaatsen (drag and drop) binnen het panel. Als ze weer op de button klikken komt een volgend image (met icon) in het panel en ook die moeten ze vrij kunnen verplaatsen. Wat ik maar niet krijg gedaan in firemonkey is het vrij verplaatsen van deze images.

Wie kan mij helpen?

Hier de code:

Code:
var  Form13: TForm13;
     ImageNummer: integer = 0;

implementation

{$R *.fmx}

procedure TForm13.Button1Click(Sender: TObject);
var newimage : TImage;
begin
  newImage := TImage.Create(Self);
  ImageNummer:= ImageNummer + 1;
  newImage.Name := 'Image' + IntToStr(ImageNummer);
  Showmessage(NewImage.Name);
  newImage.Parent := Form13;
  newImage.Visible := True;
  newImage.Bitmap.LoadFromFile('iconplaatje.ico');
  newImage.Width := 50;
  newImage.Height := 50;
  newImage.Position.X:= 100;
  newImage.Position.Y:= 100;
end;