Unterer Rand eines RichEdit Feldes

[Leo]

Hi,

wie würdet ihr fetstellen, dass der Benutzer mit dem Cursor den unteren Rand eines RichEdit Feldes erreicht hat.

BEISPIEL:
Das RichEdit feld enthält genau eine Zeile, die aber aufgrund ihrer Länge im RichEdit in mehreren Zeilen angezeigt wird.

Zeile: 'Sie organisieren Streiks und Demonstrationen, diskutieren monatelang über Reformen ohne selbst welche entscheiden zu können.'

Anzeige:
Sie organisieren Streiks und
Demonstrationen, diskutieren
monatelang über Reformen ohne
selbst welche entscheiden zu
können.

Der Cursor befindet sich jetzt im Wort 'entscheiden' wie kann ich feststellen, ob unter diesem Wort noch ein Zeile Folgt (in diesem Fall 'könnten') oder nicht.

Anders gesagt, kann man irgendwie feststellen, in wieviele Zeilen der Satz Umgebrochen wurde.

Danke

[flow]

Damit stellst du die Zeilenanzahl deiner RichEdit fest.

Delphi-Quellcode:

RichEdit1.Lines.Count;

Damit bekommst du die Zeile in der sich der Cursor gerade befindet!

Delphi-Quellcode:

function GetRichEditRow(R : TRichEdit) : Integer;
begin
  Result := SendMessage(R.Handle, EM_LINEFROMCHAR, R.SelStart, 0);
end;

Wenn jetzt GetRichEditRow kleiner als Count ist dann ist der Cursor noch nicht am Ende der RichEdit.

FLOW

[Leo]

Cool,

das mit dem 'RichEdit1.Lines.Count' war mir schon klar, aber woher weis man das andre.

Respekt.

Danke das war genau das was ich gesucht habe. :spin:

[Leo]

Hallo,

kann man kurz nachdem man dem RichEdit einen Text zugeweisen hat die Höhe des Textes herausfinden, um die Größe des RichEditFeldes noch vor seiner ersten Anzeige so zu verändern, dass der gesammte Text zu sehen ist?

Ich nehme an, es geht so ähnlich wie das Beispiel oben aber ich habe keine Passende Message gefunden.

[flow]

Naja,

du kannst Count mit der Texthöhe multiplizieren pluseinem Texthöhenabstand.

FLOW