Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   como cortar texto de un edit (https://www.clubdelphi.com/foros/showthread.php?t=1283)

superhopi 10-06-2003 12:23:45

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.

__cadetill 10-06-2003 13:03:03

el problema es que lo que le tienes que pasar por parametro es una variable, es decir, tienes que hacer algo asi....

Código:

var str : string;
begin
  str := edit.text;
  delete (str,1,150);
  edit.text := str;
end;

Espero te sirva


La franja horaria es GMT +2. Ahora son las 19:48:13.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi