delphi - SynEdit - Indsæt tekst efter og før markeret tekst - Hvordan? - Udvikleren.dk

Tags: delphi

Bruger #8254 @ 17.04.06 10:49

Hvordan tilføjer jeg en tekst før og efter den markeret tekst i SynEdit?

fx:

hvis "TEXT" er markeret så skal der fx. tilføjes "" før og "" så outputen kommer til at se sådan ud:

TEXT

og "TEXT" er stadig markeret!

Hvordan gør jeg det?

4 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma

Sorter efter stemmer Sorter efter dato

Bruger #782 @ 17.04.06 17:27

291

Kode

var i1,i2: integer;
begin
   i1 := synedit1.SelStart;
   i2 := synedit1.SelEnd;
   synedit1.Lines.Text := copy(synedit1.Lines.Text,1,synedit1.SelStart-1) + '<b>' + synedit1.SelText + '</b>' + copy(synedit1.Lines.Text, synedit1.SelEnd, length(synedit1.lines.Text)-synedit1.SelEnd-1);
   synedit1.SelStart := i1 + length('<b>');
   synedit1.selend := i2 + length('<b>');
end;

Indlæg senest redigeret d. 17.04.2006 17:29 af Bruger #782