Hola a todos.<br><br>El siguiente código:<br><br> for car := 'A' to 'Z' do<br>   begin<br>     case car of<br>      'A':a_minu[1]:='A';<br>      'E':a_minu[2]:='E';<br>      'I':a_minu[3]:='I';<br>
      'O':a_minu[4]:='O';<br>      'U':a_minu[5]:='U';<br>    else<br>      begin<br>       inc(j);<br>       a_mayu[j]:=car;<br>      end;   <br><br>Genera el alfabeto castellano y separa vocales de consonantes con  excepción de la ñ. <br>
La sentencia:<br><br>   a_mayu[20]:= char(241);<br><br>Tendría que añadirla a la matriz, pero lo que hace es poner un carácter que es un rectangulo en vertical con sus dos diagonales trazadas.<br> Uso Lazarus 0.928-0 sobre Debian Lenny, el valor en locale del parámetro LANG=es_ES. El teclado y el idioma español. El editor de código de Lazarus admite la ñ sin embargo la instrucción:<br>
  <br>    a_mayu[20]:= 'Ñ';<br><br>Que podría se la solucción, no lo es por incompatibilidad de tipos. Cualquier sugerencia será bien recibida. Muchas gracias.<br><br>Un saludo.<br><br>  <br><br>