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

[douglas]

gracias lepe buena onda, me funciono re bien el codigo me queda asi

procedure TForm1.Button2Click(Sender: TObject);
var
i:integer;
area:array[1..15] of string;
begin
for i:=0 to memo1.Lines.Count-1 do
begin
area[i+1]:=memo1.Lines[i];
end;
end;

bueno ahora ya sabemos que cada linea del memo esta en cada variable del array.

pero ahora te vuelvo a molestar con otra pregunta:

a[1]:='hola'
suponiendo que lo anterio fue capturado en la primer linea del memo, pero ahora eso lo quiero pasar a otro array pero de esta forma

b[1]:='h';
b[2]:='o';
b[3]:='l';
b[4]:='a';

existen algun modo???? ayudenme si

[[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...!

[[Lepe]]

douglas: Lo primero es informarte de como "trabajamos" aqui. Cuando entramos en el foro, vamos directo al menú Enlaces -> hilos suscritos, si alguien ha aportado un nuevo mensaje en el hilo, éste tendrá un icono diferente y el texto en negrita. Después solemos ir a "Enlaces -> Temas de hoy" y vemos los hilos en los que no hemos participado aún.

Por tanto, no es necesario enviar un mensaje privado a los que te han ayudado, ya que es doble molestia para ti, y para nosotros, ya que al recibir un mensaje el foro nos avisa, lo abrimos, leemos.... viendo después que es lo mismo que has puesto en este hilo.

Por otra parte el espíritu del foro es dar la solución en un hilo, (que pueda ser encontrado con las búsquedas de otras personas con tu misma inquietud), si lo resolvemos por mensajes privados, nadie más se puede beneficiar de la ayuda prestada.

Te recomiendo que leas la guía de estilo para que tengas presente la forma correcta de preguntar y responder.

Saludos