como cortar texto de un edit
Estoy imprimiendo un texto que hay en un edit.
El problemilla es que el texto puede ocupar mas de una linea, por lo que lo corto de la siguiente forma:
edit1.text:=texto;
if length(edit1.Text)>150 then
begin
texto:=copy(edit1.text, 1, 150);
memo1.Lines.Add(texto);
end;
Lo que quiero hacer ahora es imprimir el resto de texto que me queda, pero para ello quiero eliminar el texto que ya he impreso...
Habia probado haciendo:
delete (edit.text,1,150);
pero me da error.
¿como lo puedo hacer?
Gracias por anticipado.
__________________
Si me ves durmiendo no me despiertes, podría estar soñando que soy libre.
|