小编Mas*_*ler的帖子

我正在开发一个基于Indy的HTTP服务器构建的Web服务器,我发现如果我在浏览器中点击一个请求,然后在第一个请求完成之前再点击另一个请求,则会导致各种问题.但我无法找到任何方法来确定我是否在取消请求.每个请求都在其自己的线程内发生,因此将线程设置为Terminated将是一种很好的检查方式,但这似乎并没有发生.

有什么方法我可以让Indy通知我,它当前正在处理的请求已经被发送它的浏览器取消了,现在它正在尝试加载不同的东西吗？

如果要在FireMonkey的网格的同一列中使用不同的单元格控件,可以执行哪些操作.单元格控件似乎属于列,但有些情况(如属性编辑器),其中某些行需要复选框,而其他行需要组合框或编辑控件.

提前致谢.

我正在寻找一种方法,给定一个有向图,找到从给定起点无法到达的所有节点.我有一个想法,基于与Dijkstra算法类似的概念,就像这样(伪代码),但是有更好的方法吗？

function DisconnectedNodes(Graph, Start)
  var Unknown = new list
  var Open = new list
  var Closed = new list
  for each Node in Graph
    Unknown.add(Node)
  Open.StealFrom(Unknown, Start)
  while Open.Count > 0
    var Current = Open[0]
    for each Node in Current.Destinations
      if Node in Unknown
         Open.StealFrom(Unknown, Node)
    Closed.StealFrom(Open, Current)
  return Unknown

假设我有一个例程,当被调用时,将使用RNG并返回True30%的时间或False其他.这很简单.但是,如果我想模拟一下True如果我将该例程调用100亿次,我会得到多少结果呢？

在一个循环中调用它100亿次将花费太长时间.将100亿乘以30%将产生30亿的统计预期结果,但不会涉及实际的随机性.(和几率的结果将是准确 3十亿是不是所有的伟大.)

是否有一个算法来模拟这样一系列随机事件的聚合结果,这样如果它被多次调用,它给出的结果将显示与实际运行它模拟多次的随机序列相同的分布曲线. O(1)时间(即,随着要模拟的系列的长度增加,运行时间不会更长)？

我使用的是 Lazarus 1.0.8（最新版本），并且已经安装了 Indy 10。我还有一个带有 PHP 脚本的网站，该脚本在服务器上保存一个文本文件（称为“stats.txt”）。我想使用我的程序上传另一个文本文件，其中包含统计文本+我在备忘录中写入的新文本。我不想让你为我编写代码，只是你能给我一个关于我该怎么做的建议吗？

我想我可以下载备忘录中“stats.txt”的内容，然后再次上传，但添加新文本。有没有更好的办法？

我在Delphi 2009中有一个自定义的TObjectList后代,我想稍微使用它的枚举器并为MoveNext方法添加一些过滤功能,以使其跳过某些对象.MoveNext是由DoMoveNext调用的,这是一个虚方法,所以这不应该难以覆盖......除了一件事.TObjectList的TEnumerator不是它自己的类; 它在TObjectList声明中声明为嵌套类型.

有没有简单的方法来覆盖我的后代类中的TEnumerator.DoMoveNext,还是我必须重新实现整个TEnumerator？这不是一个很大的课程,但如果可以的话,我宁愿将冗余保持在最低限度......

我有一个DevExpress TcxGrid,它的GridView的OnEditValueChanged事件附加了一个事件处理程序,该事件应该汇总其中一个列中的一些数据.问题是,在将更新的值写入基础数据集之前,此事件在验证期间被触发.我对TcxGrid不太熟悉.有没有人知道在数据集更新后是否有办法触发事件处理程序？

在将SQL查询嵌入到多次调用SQL for Table Updates的应用程序中时,是否可以使用SQL BEGIN TRANSACTION,COMMIT TRANSACTION,ROLLBACK TRANSACTION.例如,我有以下代码:

Q.SQL.ADD(<UPDATE A RECORD>);
Q.ExecSQL;

Q.Close;
Q.SQL.Clear;
Q.SQL.ADD(<Select Some Data>);
Q.Open;

设置一些变量

Q.Close;
Q.SQL.Clear;
Q.SQL.ADD(<UPDATE A RECORD>);
Q.ExecSQL;

我想要做的是如果第二次更新失败,我想回滚第一个事务.

如果我为BEGIN,COMMIT,ROLLBACK设置一个唯一的表示法,以便指定提交或回滚的内容,是否可行.

即在第一次更新之前指定BEGIN TRANSACTION_A然后在上次更新后指定COMMIT TRANSACTION_A

我希望这是有道理的.如果我在SQL存储过程中执行此操作,那么我将能够在过程的开始和结束时指定它,但由于进程块和重载SQL上的死锁,我不得不将代码分解为可管理的块服务器.

我似乎已经创建了破坏内存的代码.

从来没有遇到过这样的问题,我现在设置了一个无效的指针操作.

在下面,我调用PromptForXYZPropertiesSettings后,const字符串sFilename的值被删除.

// Allow the user to quickly display the properties of XYZ without needing to display the full Editor
function PromptForXYZProperties(const sFilename:string; var AXYZProperties: TXYZProperties): boolean;
var
  PropEditor: TdlgEditor;
begin
  PropEditor:= TdlgEditor.create(nil);
  try
    PropEditor.LoadFromFile(sFilename);                   <-- sFilename = 'C:\My Folder\Some Folder.txt'
    PropEditor.SelectedXYZProperties := AXYZProperties;

    // Bypass PropEditor to show form owned by it
    Result := PropEditor.PromptForXYZPropertiesSettings;  

    if Result then
    begin
      PropEditor.SaveToFile(sFilename);                   <-- sFilename now somethign like 'B'#1#0#0'ë' or value of a different var
    end;
  finally
    PropEditor.free;      
  end;
end;

其他详情: …

我正在研究Ruby,尝试建立一个以块为参数的方法.我知道你这样做是通过给出一个&前缀的最后一个参数,但是一旦它被传递,我该如何验证呢？

例如,如果我想验证参数是否为字符串,我可以使用is_a?(String).但是,如何验证我收到的是一个接受1个参数的块？还是2？