有没有检查某个数字，是否在两个浮点数之间的函数（两个数大小未知的）？

Question

Pos(vChar, Format('%f%f', [vReal1, vReal2])); //可不可以？

Answer 1

自己写一个也不难啊。
function IsBetween(Target, Min, Max: Double): Boolean;
var Temp: Double;
begin
  if Min > Max then
  begin
    Temp := Min;
    Min := Max;
    Max := Temp;
  end;
  Result := (Target >= Min) and (Target <= Max);
end;

Answer 2

唉，把问题理解错误了to westfly(西翔):
你写的代码风格很标准
建议最好给标识加个前缀
Min和Max是Math单元的两个函数
比如:
function IsBetween(ATarget, AMin, AMax: Double): Boolean;

Answer 3

唉，把问题理解错误了to westfly(西翔):
你写的代码风格很标准
建议最好给标识加个前缀
Min和Max是Math单元的两个函数
比如:
function IsBetween(ATarget, AMin, AMax: Double): Boolean;