Thema: Copy-Problem

Einzelnen Beitrag anzeigen

Tommy1988
(Gast)

n/a Beiträge
 
#1

Copy-Problem

  Alt 22. Nov 2007, 00:02
Guten Abend.. ich habe ein kleines Problem..

Folgender Code bewirkt, dass wenn ich eingegeben HABE automatisch hinten dran gehangen wird:
Delphi-Quellcode:
 if Copy(SynMemo1.Text, CurPosition-2, 3) = '[b]then
 begin
  SynMemo1.SelText := '[/b]';
  SynMemo1.SelStart := CurPosition-4;
 end;
gehe ich mit dem cursor jetzt aber zwischen und und drücke ENTF
so sieht der Text folgendermaßen aus:
'/b>'

Was kann man dagegen machen?
Ich hab es schon so versucht:
Delphi-Quellcode:
 if (Copy(SynMemo1.Text, CurPosition-2, 3) = ' [b]')
 and (Copy(SynMemo1.Text, CurPosition-3, 4) <> '[/b]') then
 begin
  SynMemo1.SelText := '[/b]';
  SynMemo1.SelStart := CurPosition-4;
 end;
Wenn das 2. Copy also nicht [/b] ist soll da das [/b] eingefügt werden. Nur es klappt leider nicht

Achso, vielleicht sollte ich sagen, dass der Code in einer Extra Prozedur steht die beim
"SynMemo1Change" aufgerufen wird.
  Mit Zitat antworten Zitat