SelStart n-Zeilen nach unten verschieben

StefanH · Verfasst: Sa 28.06.03 21:22

Hallo zusammen!

Also ich hab ein RE, und da werden Oberhalb des Cursours einige Zeilen eingefügt, und danach soll der Cursour wieder an die Textstelle, wo er vorher war. Wenn ich mir den SelStart nur merk, dann bringst ja nichst, also müsste ich sozusagen sooft die "Nach-Unten"- Taste drücken, wie viele Zeilen eingegeben wurden kann ich das irgendwie Machen?

Stefan

_________________
"Als es noch keine Computer gab, war das Programmieren noch relativ einfach."(Edsger W. Dijkstra)
"Ich bin nicht von Sinnen, sondern ich rede wahre und vernünftige Worte." (Paulus)

majolo · Verfasst: Sa 28.06.03 22:27

Also so wie ich dich verstehe, brauchst du die Zeilennummer.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

var zeile:integer;
begin
zeile:=SendMessage(Richedit1.Handle,
                                     EM_LINEFROMCHAR,
                                     RichEdit1.SelStart,
                                     0)+1 ;
end;

So bekommst du die Zeilennummer raus, wo sich der Cursor befindet. Und dann kannst du damit bauen,was du brauchst.

_________________
Gruß
majolo

StefanH · Verfasst: Mo 30.06.03 17:40

Hmm, funktioniert irgendwie nichts!!
Auch wenn ich RichEdit1.SelStart auf zeile setzte und auf bie RichEdit1.SetFosu

Tja, der Cursour is weg!

Stefan

_________________
"Als es noch keine Computer gab, war das Programmieren noch relativ einfach."(Edsger W. Dijkstra)
"Ich bin nicht von Sinnen, sondern ich rede wahre und vernünftige Worte." (Paulus)

StefanH · Verfasst: Mo 07.07.03 17:06

Hat denn keiner ´ne Idee???

_________________
"Als es noch keine Computer gab, war das Programmieren noch relativ einfach."(Edsger W. Dijkstra)
"Ich bin nicht von Sinnen, sondern ich rede wahre und vernünftige Worte." (Paulus)

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme