Panel folgt Cursor

**Orhan**

Hallo

Ich bitte um Ihre Hilfe

Ich möchte dass dem Textcursor im Richedit immer ein Panel nachfolgt. Das heißt: wo der Textcursor ist, dort soll auch der Panel sein.

Ich danke für Ihre Interesse

**himitsu**

Du mußt eigentlich "nur" das RichEdit nach der Position des Cursors fragen

schau dich einfach mal dort um

http://www.delphipraxis.net/internal...=976287#976287

**Larsi**

markieren

Delphi-Quellcode:

			procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,

  Y: Integer);

begin

  if ssLeft in Shift then

    begin

      ReleaseCapture;

      Panel1.Perform(WM_SYSCOMMAND,$F012,0);

    end;

end;

**patti**

@Larsi: Ich glaube, du hast ihn falsch verstanden. Er will, dass das Panel dem Textcursor und nicht dem Mauscursor folgt

Patti

**Orhan**

Hallo patti

Mit deiner Vermutung haben Sie recht.

Ich will, dass das Panel dem Textcursor folgt.

Danke

Panel folgt Cursor

Panel folgt Cursor

Re: Panel folgt Cursor

Re: Panel folgt Cursor

Re: Panel folgt Cursor

Re: Panel folgt Cursor

Forumregeln

Orhan Registriert seit: 24. Dez 2004 Ort: Breslauerstr.9 Neu-Ulm 46 Beiträge	#1 Panel folgt Cursor 10. Nov 2009, 14:58 Hallo Ich bitte um Ihre Hilfe Ich möchte dass dem Textcursor im Richedit immer ein Panel nachfolgt. Das heißt: wo der Textcursor ist, dort soll auch der Panel sein. Ich danke für Ihre Interesse
	Zitat

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 43.163 Beiträge Delphi 12 Athens	#3 Re: Panel folgt Cursor 10. Nov 2009, 15:12 Du mußt eigentlich "nur" das RichEdit nach der Position des Cursors fragen schau dich einfach mal dort um http://www.delphipraxis.net/internal...=976287#976287 Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. my Delphi wish list : BugReports/FeatureRequests
	Zitat

Larsi Registriert seit: 10. Feb 2007 2.262 Beiträge Delphi 2007 Professional	#4 Re: Panel folgt Cursor 10. Nov 2009, 15:32 markieren Delphi-Quellcode: procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if ssLeft in Shift then begin ReleaseCapture; Panel1.Perform(WM_SYSCOMMAND,$F012,0); end; end; Ein Tag ohne Delphi ist ein verlorener Tag! Homepage zu meinem neuen Programm: StreamZ
	Zitat

patti Registriert seit: 20. Okt 2004 Ort: Mittelfranken 665 Beiträge Turbo Delphi für Win32	#5 Re: Panel folgt Cursor 10. Nov 2009, 15:34 @Larsi: Ich glaube, du hast ihn falsch verstanden. Er will, dass das Panel dem Textcursor und nicht dem Mauscursor folgt Patti Patrick Kreutzer [Informatik-Student im 4. Semester] http://www.patti-k.de/
	Zitat

Orhan Registriert seit: 24. Dez 2004 Ort: Breslauerstr.9 Neu-Ulm 46 Beiträge	#6 Re: Panel folgt Cursor 10. Nov 2009, 17:15 Hallo patti Mit deiner Vermutung haben Sie recht. Ich will, dass das Panel dem Textcursor folgt. Danke
	Zitat