Identificar Begin e End no código

Delphi

19/11/2004

Alguém conhece alguma técnica para identificar de forma mais rápida BEGIN sem um END para fechar um bloco.
Fiz a identação mas ainda está complicado para localizar qual END esta faltando.


Obrigado.


Airoosp

Airoosp

Curtidas 0

Respostas

Sremulador

Sremulador

19/11/2004

begin
cods
begin
cod´s...
end
end

acho que e isso...


GOSTEI 0
Inara

Inara

19/11/2004

só para complementar.... sempre que começo um BEGIN eu já coloco o END correspondente justamente pra depois não ter que ficar procurando...

[]´s


GOSTEI 0
Inutaishou

Inutaishou

19/11/2004

Cara, eu faço o seguinte... A cada Begin que coloco, o que estiver dentro dele, fica quatro espaços a frente... Exemplo:
Begin
    If True Then Begin
        ShowMessage( ´tal´ );
        ...
        If Not False Then Begin
            ShowMessage( ´x´ );
            ...
        End;
    End;
End;


Isso me ajuda muito pra identificar que End está faltando...

[]´s,


GOSTEI 0
José Henrique

José Henrique

19/11/2004

Li aqui mesmo neste fórum sobre um add in que desenha um linha colorida ligando o begin ao end correspondente.


GOSTEI 0
Ruysalles

Ruysalles

19/11/2004

Você pode trabalhar com marcação de números comentados como abaixo:

if trim(edit1.text) = ´´ then
begin //1
showmessage(´Favor informar o seu nome´);
end //1
else
begin //2
if lenght(edit1.text) > 100 then
begin //3
showmessage(´O seu nome não pode ter mais de 100 caracteres´);
end //3
else
begin //4
edit2.text := ´Bom dia´;
end //4
end //2


Espero ter ajudado.
Até a próxima


GOSTEI 0
Willian

Willian

19/11/2004

Instale o GExperts! www.gexperts.com. É free e faz isso o que vc está pedindo, além de ser ótimo pra depuração.


GOSTEI 0
POSTAR