Actualizar mayusculas

[[Fenareth]]

Empezado por ContraVeneno

¿por qué AnsiLowerCase y no LowerCase?

Por eso digo que AnsiLowerCase y AnsiUpperCase

Código Delphi [-]
var apellido:string;
     i,j:integer;

begin

     for i:=1 to Table.RecordCount do
     begin
            apellido:= Tabla.FieldByName('Apellido').AsString;

           apellido[1]:=ansiuppercase(apellido[1]);
            for j:=2 to length(apellido) do
            begin
                        apellido[j]:=ansilowercase(apellido[j]);
            end;
            Tabla.FieldByName('Apellido').AsString:=apellido;
     end;
end;