private function tr_csv_from_result($query, $delim = ";", $newline = "\n", $enclosure = '"')
	{
		if ( ! is_object($query) OR ! method_exists($query, 'list_fields'))
		{
			show_error('You must submit a valid result object');
		}

		$out = '';

		foreach ($query->list_fields() as $name)
		{
			$out .= $enclosure.str_replace($enclosure, $enclosure.$enclosure, $name).$enclosure.$delim;
		}

		$out = rtrim($out);
		$out .= $newline;

		foreach ($query->result_array() as $row)
		{
			foreach ($row as $item)
			{
				if($item == '' || strlen($item) < 1) $item = '-';
				$out .= $enclosure.str_replace($enclosure, $enclosure.$enclosure, str_replace("\n","&nbsp;",$item) ).$enclosure.$delim;
			}
			$out = rtrim($out);
			$out .= $newline;
		}

		return $out;
	}