小编NGL*_*GLN的帖子

.slice和.wrapall

我正在使用stackoverflow上的成员建议的一些代码,并由我调整以包装每个3列表项作为大型菜单的一部分.代码是:

var lis = $("ul > li");
for(var i = 0; i < ls.length; i+=3) {
  lis.slice(i, i+3).wrapAll("<div class='new'></div>");
}
Run Code Online (Sandbox Code Playgroud)

不幸的是,这将从下一个父菜单中获取子li,以填充div中3 li的'quota'.这当然是大大搞砸了我的菜单.有关示例,请访问此处.

有没有人有任何建议如何解决这个问题?

jquery slice wrapall

5
推荐指数
1
解决办法
1866
查看次数

CSS导航精灵 - 奇怪的形状(不是正方形)

我通常没有制作CSS精灵的问题,但是这个让我难过......而且我不确定如何解决它.基本上我有一个如下所示的导航精灵:

纳斯达克广告网络NAV-sprit.png

我正在使用标准惯例将它们放在<li>标签中,例如:

<li class="welcome"><a href="#" title="welcome">welcome</a></li>
Run Code Online (Sandbox Code Playgroud)

然后应用CSS来调整背景位置:

#navigation li.welcome a {
  width:155px;
  background-position:-0px -46.5px; }
Run Code Online (Sandbox Code Playgroud)

当然我没有想到这一点,但问题发生在悬停.由于您只能定义"方形"区域,当您将鼠标悬停在元素上时,"蓝色"悬停状态将被转移到下一个导航项.

然后我想我必须为每个项目制作单独的图像...但由于重叠的箭头部分,这不会很正常.

也许我必须分开"中间"箭头分离器?我真的不确定.

我在这里难过.有任何想法吗?

html css xhtml css-sprites

5
推荐指数
2
解决办法
2737
查看次数

使用 TWebBrowser 使用 Delphi 填充网页

我在 Vista 上使用 Delphi 7。到目前为止,我已经实现了一个简单的浏览器(使用 TWebBrowser),但我想在网页要求时自动输入信息。例如,我想告诉我的应用程序转到 Google,检测搜索字段,输入搜索词组,然后单击搜索按钮,然后获取结果。

有人可以解释一下这是如何完成的吗?

delphi parsing web

5
推荐指数
1
解决办法
1904
查看次数

使用 Access 2007 中的 VBA 在 AutoCAD (dwg) 文件中搜索

我有数百个 DWG、AutoCAD 文件,我想在 MS Access 数据库中搜索和编目这些文件。

基本上,我想搜索 DWG 并提取标题框中的任何描述以及日期,并将所有内容带到 Access 中,使其成为可搜索的目录。

例如,我有一个文件名为 T-25682.DWG,它的名称为 Machine Spacer,创建时间为 01/20/2010。

我将从 DWG 文件中提取该信息并将其插入到 Access 数据库中,如下所示:

== ID ==    == DESCRIPTION ==    == CREATED ON ==    == FILENAME ==

    1       Machine Spacer       01/20/2010          T-25682.dwg
Run Code Online (Sandbox Code Playgroud)

我该如何处理和解决这个问题?是否有可以与 Access 一起使用的 AutoCAD 库?如何在 DWG 文件中搜索?

ms-access vba autocad

5
推荐指数
1
解决办法
2768
查看次数

如何从Google搜索结果中提取目标网址?

我正在尝试从Google搜索结果中提取网址.我使用Indy IdHTTP从Google获取HTML结果,并使用Achmad Z的代码从页面获取链接href.如何获取每个网址的真实链接目标,而不是通过Google重定向程序的网址?


我试过了,但是在这段代码中我得到了"操作数不适用"的错误:

function ToUTF8Encode(str: string): string;
var
  b: Byte;
begin
  for b in BytesOf(UTF8Encode(str)) do
  begin
    Result := Format('%s%s%.2x', [Result, '%', b]);
  end;
end;
Run Code Online (Sandbox Code Playgroud)

我使用Delphi 7和Indy 9.00.10.也许indy update会有帮助吗?

delphi delphi-7

5
推荐指数
2
解决办法
3866
查看次数

实现线程安全日志记录

我的任务是创建一个类,它将围绕多个应用程序收集用户活动.

假设我有一个类TLogging和一个名为的全局对象Logging.

用户活动(屏幕打开等)应该在内存中收集(可能放入(字符串)列表中TLogging)并在一段时间间隔(每10分钟)或应用程序关闭后保存到日志文件中.

最重要的是日志记录必须处于"静默模式",它不得以任何方式影响用户工作流程:没有屏幕挂起,没有例外.

请给我这个任务的方向.

delphi queue logging multithreading

5
推荐指数
1
解决办法
3499
查看次数

当我给它一个负数时,为什么带'%u'的格式打印错误值?

为什么会Format('%u', [-100])导致'4294967196'?我在D7和XE2中对此进行了测试.

关于该功能的文档Format说:

%u无符号十进制.与%d类似,但不输出任何符号.

所以我希望得到一个结果'100'.

这是一个错误吗?

delphi string-formatting

5
推荐指数
1
解决办法
265
查看次数

Delphi中的GDI行间距?

我想在Delphi的画布上绘制时为字母添加字符间距.水平间距通过使用SetTextCharacterExtraAPI 工作正常,但如果我在画布上使用DrawText并在其中有一个换行符,我将如何调整垂直间距?我尝试过,SetTextJustification但我认为它只适用于太空角色.

无论如何我可以调整字符的垂直间距吗?

windows delphi text gdi spacing

5
推荐指数
1
解决办法
1009
查看次数

BorderWidth> 0的错误修复与滚动条组合?

在编写自定义控件时,在尝试BorderWidth正确实现默认属性时,我似乎偶然发现了滚动条显示时绘画行为中的错误:滚动条和控件范围之间的空格未绘制.

要重现该错误,请OnCreate为新项目的主窗体实现以下处理程序:

procedure TForm1.FormCreate(Sender: TObject);
begin
  AutoScroll := True;
  BorderWidth := 20;
  SetBounds(10, 10, 200, 200);
  with TGroupBox.Create(Self) do
  begin
    SetBounds(300, 300, 50, 50);
    Parent := Self;
  end;
end;
Run Code Online (Sandbox Code Playgroud)

D7和XE2的结果:

在此输入图像描述

这似乎在Delphi XE2中得到了解决.可能,这个bug会存在TWinControl.WMNCPaint,但是看看Controls.pas,我发现D7和XE2之间的实现没有任何显着差异.

我想得到答案:

  • 如何写这个奇怪的错误修复,
  • 从哪个Delphi版本这个bug似乎得到修复.

delphi scrollbar

5
推荐指数
1
解决办法
730
查看次数

4
推荐指数
1
解决办法
5087
查看次数