Guten Abend

Undzwar geht es um folgendes:
Wenn ich z.b. folgendes in meinen Editor eingebe

markieren

Delphi-Quellcode:

 if Copy(SynMemo1.Text, CurPosition-22, 23) =
 '[list=1]' then

bekomme ich, dank Progman's Hilfe, den Endtag des Haupttags automatisch hinzugefügt.

So.. jetzt kann ich aber schlecht
für jede Zahl (start="1", start="2", start="3" ...) eine If-Abfrage machen.

Ich hatte es schon mit einem Array und einer ForSchleife versucht.
Die For-schleife ist ABSOLUT ressourcenunfreundlich ..

Wie kann man dieses start="" so umgestalten,
dass es egal ist, welche Zahl man zwischen ""'s eingegeben hat?
Ich habe mal etwas in etwa so gelesen
(Schemtaisch)
Wenn Zahl in [1..100]
tue ...

Aber ich weis nicht ob das so richtig wäre?

Du musst einfach nur dein zu testenden String auseinander nehmen und nachsehen was zwischen den
Anführungszeichen steht.

zB. so:

zusammenfalten · markieren

Delphi-Quellcode:

 procedure // ...
var
  TempStr1: String;
  TempStr2: String;
begin
  // ...

  TempStr1 := Copy(SynMemo1.Text, CurPosition-22, 23);
  TempStr2 := '';

  SoUndSo := False;

  if Pos('[list=1] 0 then
begin
Delete(TempStr1, 1, length('<ol start="'));

TempStr2 := Copy(TempStr1, 1, Pos('"', TempStr1)-1);

if StrToInt(TempStr2) in [1..100] then SoUndSo := True;
end;


// ...
end;

hm, wenn man vereinbaren könnte, dass ein Tag immer nur in einer Zeile steht, bräuchte man doch nur das Vorhandensein des Anfangs-Tag prüfen, nachschauen, ob es einen End-Tag in dieser Zeile gibt und wenn nicht, ihn einfach hinten dran hängen. Das wäre die einfachste Variante. Alles Andere ist relativ schwierig.
Man müsste den Tag analysieren (gibt ja viele), herausfinden wieviele Parameter nach dem Schema ('art="wert"') existieren und dann prüfen, ob danach der korrekte Abschluss-Tag folgt. Manche Tags erfordern ja ' />', nicht nur '>'.
Das ist schon eine sehr komplexe Angelegenheit.
Beispiel: [img]bild.jpg[/img]' als Abschluss-Tag erfordern während <a href="blubb.php" target="_blank" nur ein '>' erfordern würde.