Scrollender Text

**mkinzler**

Rotating Text Component

https://github.com/zhaoyipeng/FMXComponents

**TigerLilly**

@mkinzler: Ah, ja, so was hab ich gesucht. Danke! Sehr super.

**TigerLilly**

Ich hab mir das TMemo-verhalten nochmal angesehen, weil ich ob der "Was ist denn eigentlich dein Problem" unsicher wurde. Also nochmal:

Ich habe ein TMemo + füge mit TMemo.Lines.Add(Info) Zeilen dazu. Die werden unten im Memo angefügt + sobald der Platz für die Darstellung aus ist, sieht man die neu angefügten nicht. Der Inhalt scrollt also nicht automatisch nach oben. Das ist aber das, was ich gerne hätte: die jeweils letzte zugefügte Info soll sichtbar sein.

Unter Windows kann ich eine Message senden, die das tut, aber nicht unter FMX.
Ich kann - sobald das Memo voll ist - die erste Zeile löschen, aber wann weiß ich, dass das Memo voll ist?

Also immer noch danke für jeden Tipp!

**DeddyH**

Ganz pragmatisch hätte ich jetzt gesagt:

markieren

Delphi-Quellcode:

			Memo.Lines.Add(Text);

Memo.ScrollTo(0, MAXINT);

**Uwe Raabe**

Warum dann nicht direkt: Memo.GoToTextEnd ?

**TigerLilly**

Yep, das ist es. Dankeschön!

Scrollender Text

AW: Scrollender Text

AW: Scrollender Text

AW: Scrollender Text

AW: Scrollender Text

AW: Scrollender Text

AW: Scrollender Text

Forumregeln

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.858 Beiträge Delphi 11 Alexandria	#11 AW: Scrollender Text 26. Okt 2017, 18:51 Rotating Text Component https://github.com/zhaoyipeng/FMXComponents Markus Kinzler
	Zitat

TigerLilly Registriert seit: 24. Mai 2017 Ort: Wien, Österreich 1.205 Beiträge Delphi 11 Alexandria	#12 AW: Scrollender Text 26. Okt 2017, 21:07 @mkinzler: Ah, ja, so was hab ich gesucht. Danke! Sehr super.
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.624 Beiträge Delphi 12 Athens	#14 AW: Scrollender Text 27. Okt 2017, 09:16 Ganz pragmatisch hätte ich jetzt gesagt: markieren Delphi-Quellcode: Memo.Lines.Add(Text); Memo.ScrollTo(0, MAXINT); Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

Uwe Raabe Registriert seit: 20. Jan 2006 Ort: Lübbecke 11.453 Beiträge Delphi 12 Athens	#15 AW: Scrollender Text 27. Okt 2017, 09:30 Warum dann nicht direkt: Memo.GoToTextEnd ? Uwe Raabe Certified Delphi Master Developer Embarcadero MVP Blog: The Art of Delphi Programming
	Zitat

TigerLilly Registriert seit: 24. Mai 2017 Ort: Wien, Österreich 1.205 Beiträge Delphi 11 Alexandria	#16 AW: Scrollender Text 27. Okt 2017, 09:38 Yep, das ist es. Dankeschön!
	Zitat