type
TFloatArray: array of Double;
function GetGains(AString: String; out Gains: TFloatArray): Boolean;
var
sa: TStringArray;
i: Integer;
begin
sa := AString.Split(',');
SetLength(Gains,Length(sa));
for i := 0 to High(sa) do
if not TryStrToFloat(sa[i], Gains[i]) then
begin
Gains := nil;
Result := false;
exit;
end;
Result := true;
end;