Borrar Texto seleccionado de un Memo

[Stevenmn]

Buenas, como puedo borrar el texto que este seleccionado de un memo.

he probado con memo1.lines.delete,y poniendole el valor como seltext, pero el problema es que seltext seria string y el valor que pide delete tendria que ser integer, probe tambien haciendole un strtoint,pero mara error.

[[seoane]]

¿Probaste haciendo algo asi?

Código Delphi [-]
  Memo1.SelText:= '';

[Stevenmn]

Empezado por seoane

¿Probaste haciendo algo asi?
Código Delphi [-] Memo1.SelText:= '';

que cosas no, si es asi y funciona bien, como no cai en cuenta

Gracias

[paldave]

Prueba esto:

Código Delphi [-]
procedure BorrarSeleccion;
var s:Integer;
begin
  s:=Memo1.SelStart;
  Memo1.Text := Copy(Memo1.Text,1,s)+ Copy(Memo1.Text, s+Memo1.SelLength+1,Length(Memo1.Text)-(s+Memo1.SelLength));
  memo1.SelStart :=s;
end;

Espero te sirva