Forum: Object-Pascal / Delphi-Language
Delphi
by Lannes,
11. Jan 2006
Hallo,
:gruebel: ich schaffe es nicht damit eine Exeption zu erzeugen.
Bist Du sicher das die Exeption durch meinen Code erzeugt wird,
wenn ja, in welcher Zeile tritt er auf?
Forum: Object-Pascal / Delphi-Language
Delphi
by Lannes,
11. Jan 2006
Hallo,
etwas zum erweitern, verbessern :wink: :
was u.a. noch fehlt:
-prüfen ob Tag im nachfolgenden Text schon geschlossen wurde
-erzeugen von leeren Taggerüsten verhindern'<></>'
-Groß-/Kleinschreibung der Tags
function SetEndTag(aMemo: TMemo): Boolean;
const NoTagEnd = 'br,hr,img';//Tag abschließen nicht erforderlich