Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Insertar datos en RichEdit (https://www.clubdelphi.com/foros/showthread.php?t=94612)

santiago14 28-04-2020 01:36:42

Insertar datos en RichEdit
 
Buenos días. Tengo un problema que me está matando.
Resulta que tengo unas cajas de texto, y quiero poner el contenido de ellas en un RichEdit (por código).
Utilizo el método .Add() y pone la oración en el renglón de abajo, igual que Append().
No puedo hacer funcionar .Lines..Insert() y tampoco lo logro con .Lines.Strings()

Lo que quiero es poner una oración al lado de la otra, lo único que debo agregar yo es un espacio entre oraciones.
¿Alguien sabe como hacer esto?

Gracias

ecfisa 28-04-2020 03:07:52

Hola.

Si no te entendí mal, podrías hacer algo así:
Código Delphi [-]
procedure InsertInREColFil(const str: string; col, fil:Integer; RE: TRichEdit);
var
  s: string;
begin
  if fil <= RE.Lines.Count then
  begin
    Dec(fil);
    s := RE.Lines[fil];
    Insert(str, s, col);
    RE.Lines[fil] := s;
  end;
end;

Uso:
Código Delphi [-]
...
begin
  InsertInREColFil(Edit1.Text, SpinCol.Value, SpinFil.Value, RichEdit1);
...

Saludos :)


La franja horaria es GMT +2. Ahora son las 18:22:29.

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