jak?

ma coś takiego
If Memo1.SelLength &gt 0
jak to przerobić aby działało w synedit

spróbuj tak - nie jestem pewny czy zadziała ale spróbować można:

var
dlugosc : integer;
begin
dlugosc := Length(synedit1.SelText);
if dlugosc &gt 0 then
[...]
end;