Main とは違う場所に Procedure を作成し、Main からそれを呼び出し
その処理結果を構造体変数のように参照する事は可能ですか？

AAA_Proc(Valur);
BBB := AAA.Item1;
CCC := AAA.Item2;

つまり一度の処理で、複数の結果を得たいと言う事ですが。