ActiveDelphi

JCMF

Boa tarde pessoal!

Por acaso, alguém já se deparou com esse erro do compilador: E2283 Too many local constants.
Encontrei isso no site da embarcadero: http://docwiki.embarcadero.com/RADStudio/en/E2283_Too_many_local_constants._Use_shorter_procedures_%28Delphi%29

Mas não estou compreendendo o real motivo... muito "Literal String" declarado ou muita "Constant" declarada?

imex · Enviada: Seg Jan 30, 2012 3:05 pm Assunto:

Boa tarde

Nunca vi este erro, mas pelo que entendi do link são muitas literais (não somente strings, como set's e floating-point's) dentro da procedure/function, e uma das sugetões é substitui-las por constantes.

Espero que ajude.

_________________
Assinatura: Imoveis em Suzano

JCMF · Enviada: Seg Jan 30, 2012 3:10 pm Assunto:

felipecaputo · Enviada: Seg Jan 30, 2012 5:50 pm Assunto:

Que tipo de método está causando este erro. Pois o limite é por função ou método, portando se você dividí-lo por cada parte da tarefa deve resolver o problema.
_________________
if Post.State = psResolvido then
Post.Caption := Post.Caption + ' [RESOLVIDO]';
_____________________________________________
O único homem que está isento de erros, é aquele que não arrisca acertar. Albert Einstein

JCMF · Enviada: Seg Jan 30, 2012 8:40 pm Assunto:

JCMF · Enviada: Seg Mai 27, 2013 10:00 am Assunto:

Galera!

A classe helper ajudou bastante mas já não está conseguindo resolver... o método está crescendo e não é jogada ficar criando várias classes helper para resolver isso.

O problema é uma unit chamada TDatabase que possui um método onde são definidas as tabelas do banco de dados.

Como são várias tabelas, o método está estourando com a mensagem abaixo:

[dcc32 Error] ClassDatabase.pas(5315): E2283 Too many local constants. Use shorter procedures

Alguém já conseguiu resolver essa bronca!?
Valeu!