QuoteText parsen?

[lbccaleb]

Hier kannst du dir vllt auch noch was abschauen??

http://www.delphipraxis.net/126859-b...trichedit.html

[Bjoerk]

Ok. Thanx. Ich denke aber ich habs jetzt soweit. Etwas optimiert und mit korrekter LinesOut. Man kann übrigens auch von außen (FBBCParser.List.Add..) oder auch im constructor weitere BBCodes setzen. Die werden dann automatisch berücksichtigt.

[Jens01]

Cool ist, wenn der Parser noch sowas kann :
"F[sub]d[/sub]"
"N/mm[sup]2[/sup]"

[himitsu]

Parser können das, da es problemlos in die Syntax passt, aber es muß das Ziel auch diese Art ver Formatierung können und es benötigt bei der Auswertung des geparsten Textes noch die Funktion, das entsprechend zu übergeben.

[Bjoerk]

Gut. Machen kann man viel..

[SqrtSign]
[Picture]c:\...\.jpg[/Picture]

[Sir Rufo]

Zitat von Bjoerk:

[Picture]c:\...\.jpg[/Picture]

Das solltest du aber so nicht machen, logischer (und einfacher zu integrieren) wäre das

Code:

[font="Arial"]blabla[/font]
text [image="c:\...\foo.jpg"] text

[DeddyH]

Die Syntax ist aber soweit ich verstanden habe vorgegeben (BBCode).

[Bjoerk]

Zitat von Sir Rufo:

Zitat von Bjoerk:

[Picture]c:\...\.jpg[/Picture]

Das solltest du aber so nicht machen, logischer (und einfacher zu integrieren) wäre das

Code:

[font="Arial"]blabla[/font]
text [image="c:\...\foo.jpg"] text

Richtig. Und DeddyH ebenso.

Deshalb hab ich's so gemacht.

Delphi-Quellcode:

  FBBCParser := TBBCParser.Create;
  FBBCParser.List.AddFont('_Delphi', 'Courier New', 10, clNavy, [fsBold]);
  FBBCParser.List.AddPicture('ATHENA', 'C:\Delphi2007\Abel2007\Sonstige\ATHENA.BMP');

  FSL := TStringList.Create;
  FSL.Add('Test');
  FSL.Add('[_Delphi]inherited[/_Delphi]');
  FSL.Add('f[fsSub]d[/fsSub] = 10 N/mm[fsSup]2[/fsSup]');
  FSL.Add('Picture: [ATHENA]0,5[/ATHENA] very nice '); // 0,5 = Zoom (StrechDraw);
  FSL.Add('Hier geht''''s weiter');