Leer cada linea de un memo y como determinar si llego al final

[[ArdiIIa]]

No se ese empeño de utilizar arrays para el tratamiento de cadenas...

mira este ejemplo:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var
I,Z : Integer;
Texto : string;
begin
Edit1.Text := '';
  For I := 0 To Memo1.Lines.Count -1 DO
    Texto := Memo1.Lines[i];
    For Z := 0 To Length(Texto) DO
      Edit1.Text := Edit1.Text + Texto[Z] + '-' ;
end;

En él, se maneja un string como un array.

Tal como te dije anteriormente, creo que deberías leer algo sobre el tratamiento y tipo de variables en Delphi.


¡Por favor, no me escribas a mi correo privado con estas cuestiones...!