小编Adm*_*ulo的帖子

我正在努力解决这个简单的事情，一定是我没有看到的愚蠢的事情：

为什么这个脚本不起作用？

<button onclick="myFunction()">Try it</button>

<script>
function myFunction()
{
window.open("http://www.google.com","_blank");
window.open("http://www.yahoo.com","_blank");
}
</script> 

第二个窗口不会出现。

编辑：问题是导航器挡住了第二个窗口。有什么解决方法吗？

我有一个存储功能,可以提取所有员工的时钟信息.我正试图提出一份例外报告来审核午餐.我当前的查询一次构建所有信息1段.

SELECT        ftc.lEmployeeID, ftc.sFirstName, ftc.sLastName, ftc.dtTimeIn,
              ftc.dtTimeOut, ftc.TotalHours, ftc.PunchedIn, ftc.Edited
FROM          dbo.fTimeCard(@StartDate, @EndDate, @DeptList,
                            @iActive, @EmployeeList) AS ftc
              LEFT OUTER JOIN Employees AS e ON ftc.lEmployeeID = e.lEmployeeID
WHERE        (ftc.TotalHours >= 0) AND (ftc.DID IS NOT NULL) OR
                         (ftc.DID IS NOT NULL) AND (ftc.dtTimeOut IS NULL)

这个输出看起来像这样:

24  Bob bibby   8/2/2013 11:55:23 AM    8/2/2013 3:36:44 PM 3.68
24  bob bibby   8/2/2013 4:10:46 PM 8/2/2013 8:14:30 PM 4.07
39  rob blah    8/2/2013 8:01:57 AM 8/2/2013 5:01:40 PM 9.01
41  john    doe …

我正在尝试在PascalScript函数中使用TStrings.ValueFromIndex(在FreePascal和Delphi中工作),但它不起作用,编译器返回:

                                        未知标识符'GETVALUEFROMINDEX'

我用得好吗？
PascalScript中是否提供此功能？
如果没有,有没有简单的方法呢？

代码:

Function dummy(R: TStringList):String;
var
   i: Integer;
   RESULTv: string;
begin
   for i := 0 to ReqList.Count-1 do
     RESULTv := RESULTv + R.Names[i]+' -> '+ R.ValueFromIndex[i];
   dummy := RESULTv;
end;