Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.119 Beiträge
 
Delphi 11 Alexandria
 
#16

Re: Letzte Stelle eines Strings anwählen

  Alt 13. Feb 2008, 22:38
Moin Informatik-LK,

RightStr befindet sich in der Unit StrUtils (zumindest in D7).
Die müsstest Du noch unter Uses einbinden.

Was mir aber aufgefallen ist: Du verwendest mehrfach die Eigenschaft Text von TMemo.
Zugriffe auf diese Eigenschaft sollte man möglichst vermeiden, da sie bei jedem Aufruf erst einmal aus den Lines zusammengesetzt wird. Das drückt, je nach Anzahl der Zeilen im Memo, ganz gewaltig auf die Performance.
In Deinem Anwendungsfall scheint es so, als würdest Du immer mit der letzten Zeile des Memos auskommen, also wäre doch die Abfrage

if RightStr(Memo1.Lines[Memo1.Lines.Count-1],2) = ' bthen eine Alternative.
Voraussetzung ist hier natürlich, dass mindestens eine Zeile enthalten ist, da es sonst zu einer AV kommt.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat