Olá pessoal, estou sumido devido a muito trabalho.
Mas vamos lá, ao invés de usar o famoso #13#10 para concatenar com a string para poder pular de linha e começar um novo parágrafo, exite a palavra reservada sLineBreak.
Nativa do Delphi, essa palavra reservada faz todo o trabalho de pular de linha e começar um novo parágrafo, fazendo com que não precisamos ficar decorando valores da tabela ascii.
Vamos ao exemplo.
MessageDLG(‘Ocorreu um erro ao tentar gravar’+sLineBreak+’Verifique os dados’,mtError,[mbOK],0);
Com esse exemplo, a mesnsagem de erro sairia em 2 linhas:
Ocorreu um erro ao tentar gravar.
Verifique os dados
Espero ter ajudado mais um pouco.
Até a próxima.
Vale pra Delphi 7?
E no de um stringList?
Agradecida.