sql.add('Select t.Nombre_tit AS NombreTitulo, t.Direccion as Direccion ');
SQL.Add('From titulos_sec t ');
sql.Add('Where t.Cod_sec = :Cod_sec ');
SQL.Add('and t.estado_tit = ''A'' ');
SQL.Add('Order by t.nombre_tit asc');
ParamByName('cod_sec').AsInteger:=cod_sec;