Cargar un TTreeView

[Angel.Matilla]

Me está ocurriendo, además, otra cosa. Cuando cargo el TreeView (por ejemplo el primer registro del query) el valor que se asigna en ese newNodo->Codigo = fMenu->Query->Fields->FieldByNumber(4)->AsInteger es correcto (en ese caso es 1217). Sin embargo cuando voy a rescatarlo con esto:

Código PHP:

fMenu->Auxiliar->Close();
fMenu->Auxiliar->SQL->Text = "SELECT Municipio, Comarca, Partido, Actualiza, Concejales, Partido_alcalde, Constitucion, TlfSede, Sede, Observaciones FROM Dl01 WHERE CodPrv = (SELECT Literal FROM Instalacion WHERE Etiqueta = 'Provincia') AND Codigo = :Codigo";
fMenu->Auxiliar->ParamByName("Codigo")->AsInteger = tNodo(Node->Data)->Codigo;
fMenu->Auxiliar->Open(); 


siendo ese tNodo lo mismo que en el anterior código, me devuelve valores rarísimos como 17550088 o más raros.