Zum markierten Objekt scrollen in einer Scrollbox

[mimi]

Hallo,
ich habe da ein problem und zwar habe ich eine liste wo objekte drin stehen(eigene) Trechteck, TKreis und soweiter.... wenn ich da doppelt draufklicke möchte ich gerne zum makierten obejkt springen... leider macht folgender code garnichts:

Delphi-Quellcode:

  if Paint2main.liste.selobject <> NIL then begin
    with Paint2main.liste.selobject do begin
      (PageControl2.ActivePage.Controls[0] as TScrollBox).ScrollBy(Position.x,position.y );
      ((PageControl2.ActivePage.Controls[0] as TScrollBox).Controls[0] as TPanel).Invalidate;

      paint2main.asf:=(PageControl2.ActivePage.Controls[0] as TScrollBox).Canvas.ClipRect;
    end;
  end;

den befehl ScrollBy habe ich aus dem forem dank der such funktion gefunden.... aber ich komme einfach nicht weiter !
kann mir da jemmand weiter helfen ???

achja ich arbeitet unter linux mit lazarus - sollte aber trozdem funktnienrn denke ich oder ? bzw. sollte kein größers problem dastellen !!
da lazarus fast so funktniert wie Delphi

[edit=MrSpock]Schreibfehler in Überschrift korrigiert. Mfg, MrSpock[/edit]