stupido ciclo if

[ssssss]

if tag = 'IMAGE ' then
begin
tag:= '0004,1511';
tag:= dat.getelemento(list, tag);
if (precedente = 'SERIES') then
begin
AggiungiFiglio(tag);
preview.add(directoryDicomDir); dopo questa istruzione non esegue la successiva ma esce dal ciclo
end;
if precedente = 'IMAGE ' then
AggiungiStessoLivello(tag);
precedente:= 'IMAGE ';
end;
Non riesco a capire cosa ho sbagliato a scrivere!!! Mi esegue la prima istruzione e poi esce, magari ho sbagliato l'uso del begin?!?! BHa..
Grazie!!

[LeleFT]

Leggere il Regolamento interno per conoscere le norme di partecipazione al forum: titolo non conforme, manca l'indicazione del linguaggio, il codice non è postato correttamente con l'uso degli appositi tag.

Ciao.