Click auf Textbox setzt Cursor an falsche Stelle

Hallo,

ich versuche mal zu beschreiben wo das Problem liegt:

- Es ist ein Dokument erstellt mit mehreren Textboxen.

- ich klicke auf eine solche Textbox, aber da springt der Cursor schon im MouseDown an den Dokumentanfang und das Dokument wird nach oben gescrollt und das gewünschte Textobjekt verschwindet aus dem Sichtbereich

- damit wird dann ein falsches, gerade unter dem Cursor befindliches Textobjekt angewählt.

Im TextObject.Mouseup habe ich

procedure TWPTDokument.WPRichTextTextObjectMouseUp(Sender: TWPCustomRtfEdit;
  pobj: TWPTextObj; obj: TWPObject; Button: TMouseButton; Shift: TShiftState;
  X, Y: integer);
var
  par, startpar: TParagraph;
  t: string;
begin
  if (obj <> nil) and (obj.GetRTFDataBlock <> Sender.ActiveText) then
  begin
    // showmessage(pobj.name);
    obj.Edit;
  end;
end;

Wie kann ich das temporäre Springen des Cursors an den Dokumentanfang verhindern?

Ciao

Stefan

Danke für den Hinweis!

Ich habe alle Eventhandler auskommentiert, außer OnGetSpecialText und OnTextObjectClick, und in den Events exakt den Code eingefügt, mit der die Demo die Textboxen in den Headern erstellt bzw. editiert!

Sobald ein MouseDown auf einer Textbox erfolgt, sehe ich den Cursor an den Dokumentanfang springen und das Dokument scrollt an den Anfang!

Den einzigen Unterschied zur Demo sehe ich darin, dass die Demo bereits Text enthält, wogegen ich mit einem leeren Dokument starte?

Ich bin echt ratlos, daran suche ich seit 3 Tagen!

Kann man das beschriebene Verhalten durch "ungünstige" Propertys des WPRichText erzeugen?

Ciao

Stefan