Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#1

Welches Objekt wurde in der Scrollbox angeklickt

  Alt 8. Aug 2007, 13:58
Ich habe mehrere Objekte in einer Scrollbox:
Delphi-Quellcode:
procedure TForm1.FillScrollBox;
var
  i: Integer;
  Img: TImage;
  rect: TRect;
begin
  for i := 0 to 9 do
  begin
    Img := TImage.Create(ScrollBox1);
    Img.Parent := ScrollBox1;
    Img.Width := ScrollBox1.Width - 50;
    Img.Left := (ScrollBox1.Width div 2) - (Img.Width div 2) - 10;
    Img.Height := 150;
    Img.Top := (Img.Height + 30) * i;
    Img.Canvas.Brush.Color := clWhite;
    Img.Canvas.Pen.Color := clBlack;
    rect.Left := 0;
    rect.Top := 0;
    rect.Bottom := Img.Height;
    rect.Right := Img.Width;
    Img.Canvas.Rectangle(rect);
  end;
end;
Wie kann ich nun herausfinden, welches Objekt vom Benutzer angeklickt wurde?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat