O código abaixo até versões do Delphi 2007, compilado em versões igual ou superiores ao Delphi 2009, receberá esta mensagem ao compilar:

W1050 WideChar reduced to byte char in set expressions. Consider using ‘CharInSet’ function in ‘SysUtils’ unit

var
  Status : Char;
begin

  if Status in [ 'a', 's', 'c']  then
  begin
    ...
  end;

Para evitar este warning, você deverá passar a usar a função CharInSet.

var
  Status : Char;
begin

  if CharInSet(Status, ['a', 's', 'c']) then
  begin
    ...
  end;

O código abaixo irá gerar a mensagem W1057 Implicit string cast from ‘ShortString’ to ‘string’

var
  s : ShortString;
  u : string;
begin
  u := s;
end;

Para eliminar este mensagem basta fazer um cast da varíavel ShortString para String, este código será compatível com versões anteriores ao Delphi 2009.

var
  s : ShortString;
  u : string;
begin
  u := String(s);
end;

A mesma situação se aplica para variáveis AnsiString gerando a mensagem W1057 Implicit string cast from ‘AnsiString’ to ‘string’

var
  a : AnsitString;
  u : string;
begin
  u := s;
end;

Basta fazer um cast da variável AnsiString para String e a mensagem será eliminada.

var
  a : AnsitString;
  u : string;
begin
  u := AnsiString(s);
end;

A mensagem W1058 Implicit string cast with potential data loss from ‘string’ to ‘AnsiString’ precisa ser analizada com cuidado, podemos fazer o cast e resolver o problema, mas você precisa saber o que está fazendo.

var
  a : AnsitString;
  u : string;
begin
  u := s;
end;

Se você tem certeza que a variável a contém apenas caracteres Ansi, poderá fazer o cast sem problemas.

var
  a : AnsitString;
  u : string;
begin
  u := AnsiString(s);
end;

Até aqui vimos as mensagens geradas pelo compilador, Unicode vai muito mais além e se você quiser exportar sua aplicação para países asiáticos por exemplo, terá que suportar Unicode, existem 3 artifos no EDN que eu recomendo a leitura, são eles:

• EDN Article: “Delphi in a Unicode World Part I: What is Unicode, Why do you need it, and How do you work with it in Delphi?” by Nick Hodges
• EDN Article: “Delphi in a Unicode World Part II: New RTL Features and Classes to Support Unicode” by Nick Hodges
• EDN Article: “Delphi in a Unicode World Part III: Unicodifying Your Code” by Nick Hodges

Posts relacionados

• Entendendo Unicode para migrar sua aplicação Delphi
• Hora de seguir em frente
• Apresentações do Delphi Conference 2011 disponíveis para download
• White Paper: Razões para migrar para o Delphi XE2 | O que você pode ter perdido desde o Delphi 7
• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”
• Conectando ao PostgreSQL com dbExpress ODBC driver

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse

Durante todo o desenvolvimento do Delphi 2009, tivemos reuniões com várias empresas desenvolvedoras de componentes e Allen Bauer, Delphi Chief Scientist, através do seu blog comentou sobre o suporte a Unicode. Estas iniciativas foram fundamentais para permitir que componentes de terceiros estejam disponíveis rapidamente para o Delphi 2009 e informar aos desenvolvedores como trabalhar com Unicode.

Unicode é um padrão que permite aos computadores representar e manipular, de forma consistente, texto de qualquer sistema de escrita existente.

The Unicode Standard: Version 5.0. 5. ed. Addison-Wesley Professional, 2006. 1472 p

Diversos conjuntos de caracteres como chineses, japoneses, russos e outros de origem asiáticas são representados através de Unicode, utilizando, na maioria dos casos, sistemas de mapeamento e codificação UTF (Formato de Transformação Unicode) e UCS (Conjunto Universal de Caracteres). Para maiores detalhes sobre Unicode, recomendo o seguinte link: http://pt.wikipedia.org/wiki/Unicode.

O resultado foi um Delphi 100% Unicode, sem exceção. Você deve estar se perguntando, a migração é tranqüila? Podemos dizer que sim, muita coisa foi tratada pela VCL e pelo compilador.

Uma das grandes mudanças foi nos tipos String, que anteriormente era baseado em padrão ANSI. Agora estão baseadas em padrão UNICODE. Os tipos AnsiString e WideString continuam funcionando da mesma forma, exceto para tamanho de dados.

Resumo das mudanças para Unicode:

• String mapeia UnicodeString e não mais AnsiString
• Char agora mapeia WideChar (2 bytes e não 1 byte) e é um caractere UTF-16
• PChar mapeia PWideChar
• AnsiString mapeia o antigo tipo String

Não ocorreram mudanças:

• AnsiString
• WideString
• AnsiChar, PAnsiChar
• Short String contém elementos AnsiChar
• Conversões implícitas continuam funcionando
• O editor de código controla o modo de gravação (Unicode vs AnsiString), ambos continuam sendo suportados.

Operações que não dependem do tamanho do caractere:

• Concatenação de Strings
• Funções padrão para manipulação de Strings, exemplo: Lenght, Copy, Pos e outras.
• Operadores, exemplos: <string> <op. de comparação> <string>, CompareStr(), CompareText(), etc.
• FillChar ( <struct or memory> )
• Windows API

Operações que envolvem tamanho de caractere em bytes, talvez requeiram algumas mudanças, nada complicado, aqui vai uma dica, verifique código onde você:

1. Assume que o Sizeof (Char) é 1.
2. Assume que o tamanho de uma string é igual ao número de bytes na string.
3. Manipula diretamente String ou PChars.
4. Grava ou lê string de/para um arquivo.

Os itens 1 e 2 não valem para Unicode, porque para Unicode Sizeof (Char) são 2 bytes e o tamanho de uma string é duas vezes o número de bytes. Além disso, o código que lê e grava arquivos precisa entender o número correto de bytes para efetuar estas operações, pois um caractere não é mais representando por 1 byte.

Como vocês podem ver, a migração é muito tranqüila. O benefício de suportar Unicode é permitir que o desenvolvedor Delphi distribua as suas aplicações em todo o mundo. O Brasil hoje é um dos grandes desenvolvedores de software mundiais. Diversas empresas brasileiras distribuem as suas aplicações na China, Japão, Rússia e outros Países onde Unicode é fundamental.

Em 2007, o governo Russo adquiriu 1 milhão de licenças de Delphi, que serão utilizadas para ensinar alunos do 1º e 2º graus a desenvolver software com Delphi. Portanto, o suporte a Unicode é fundamental naquele País.

Para ajudar a conhecer todos os recursos do Delphi 2010 e auxiliar na migração disponibilizamos o RAD Studio Migration Center, onde você encontrará diversos materiais, como artigos e vídeos, divirtam-se.

Posts relacionados

• Delphi Unicode – entendo os avisos (warning) do compilar sua aplicação
• Hora de seguir em frente
• Apresentações do Delphi Conference 2011 disponíveis para download
• White Paper: Razões para migrar para o Delphi XE2 | O que você pode ter perdido desde o Delphi 7
• CopyReaderToClientDataSet, Blob e a mensagem “Feature not implemented”
• Conectando ao PostgreSQL com dbExpress ODBC driver

Andreano Lanusse | Tecnologia e Desenvolvimento de Software
Follow me on Twitter: @andreanolanusse