como se elimina un carecter de un string...

[roman]

Empezado por nefy

l:=Edit1.GetTextLen;
a:=Edit1.Text;
a[l]:=' ';
Edit1.Text:=a;

Pero esto no elimina el último caracter, sólo lo sustituye por un espacio.

// Saludos

[nefy]

Haber q tal esta Roman

a:='';
for l:=1 to (Edit1.GetTextLen-1) do
begin
a:=a+Edit1.Text[l];
end;
Edit1.Text:=a;

[roman]

Empezado por nefy

Haber q tal esta Roman

¡Hombre! sí claro, pero es una forma rebuscada de hacer

Edit1.Text := Copy(Edit1.Text, 1, Length(Edit1.Text) - 1);



// Saludos

[nefy]

Vaya que se darle sabor a mi vida. Jamas pense en el Copy.

Salu2.