小编Lie*_*ers的帖子

显示Delphi 2010或Delphi 7程序的单元依赖性的工具

我们试图解开100个单位的毛球,去掉一些.

如果有工具可以向我们展示明确使用单位X的单位,那将会很有帮助.

Penganza似乎没有这样做的报告.(虽然它有很多其他有用的报告.)

任何人都可以建议一个工具或策略这样做,除了隐藏单位x,然后反复击中F9 ...

delphi refactoring coding-style

4
推荐指数
2
解决办法
4102
查看次数

如何评论VIM宏

是否可以评论宏并重放它.

代替

  dddwj
Run Code Online (Sandbox Code Playgroud)

我想评论并执行以下片段

  dd # Delete line
  dw # Delete word
  j  # Move to next line
Run Code Online (Sandbox Code Playgroud)

一些背景

我们使用PICT生成测试用例输入(全对测试).由于这是一个迭代过程,因此生成代码的宏需要在后续运行之间进行调整.当一切都在一行上而没有注释时,很难修改宏.

PICT运行的输出可能是这样的:

1 cInstallationX Pu380
2 cInstallationY U400
Run Code Online (Sandbox Code Playgroud)

可以用宏转换成测试用例

procedure TWatchIntegrationTests.Test1;
begin
  //***** Setup
  builder
    .withInstallation(cInstallationX)
    .withIsotope(Pu380)
  .Build;

  //***** Execute
  CreateAndCollectWatches;

  //***** Verify
  VerifyThat
    .toDo;
end;

procedure TWatchIntegrationTests.Test2;
begin
  //***** Setup
  builder
    .withInstallation(cInstallationY)
    .withIsotope(U400)
  .Build;

  //***** Execute
  CreateAndCollectWatches;

  //***** Verify
  VerifyThat
    .toDo;
end;
Run Code Online (Sandbox Code Playgroud)

vim macros editor

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

查询优化如何

在我的脚本中,我将Object ID作为查询字符串参数传递.喜欢?idobject=1962

现在首先我必须从OBJECTS表中访问GeoLatGeoLng列,我必须再次检查是否有其他对象包含相同的Geo Data

SELECT GeoLng, GeoLat
FROM OBJECTS
WHERE ID = 1962   
Run Code Online (Sandbox Code Playgroud)

从上面的查询我必须读取GeoLngGeoLat变量,并必须编写第二个查询如下

SELECT O.ID
FROM OBJECTS O
WHERE GeoLng = '12.72812515' /* will be taken from above query */
AND GeoLat   = '47.7794388' /* will be taken from above query */

AND EXISTS(
    SELECT ID 
    FROM InfObjects 
    WHERE ID = O.ID
    )
Run Code Online (Sandbox Code Playgroud)

我可以将这两个查询写入单个查询吗?谢谢

sql sql-server

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

Android将文本对齐到吐司的中间

我有一个很长的祝酒词.我想在中间设置文本而不是开始对齐左边.

这可能吗?

android android-view

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

32/64位进程的int行为?

我是一个64位的进程,我的int大小是8个字节.

我正在引用一个编译为32位的DLL.

该dll具有接受int参数的功能.

会发生什么?

我发送8 byte到一个4 byte"容器"?

.net c# int .net-4.0

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

T-SQL平均计算

我想在select语句中为一堆值列合并两个平均计算.

请参阅此链接以获取我的简化表结构,包括所需的输出计算:Pastebin

1)移动平均线:

Month1 =该月份value1-column的值,Month2 =如果sum == 0则写入0,否则为avg(Month1和Month2),依此类推.

因此,对于每种产品,我都希望在一年内每个月的移动平均值.我在Excel中设置了这个,但我无法将表达式传递给sql.

2)总体平均值:

对于每个产品,计算所有年份的平均值,并将计算值复制到该产品的所有行.

我希望你能帮我解决这个问题.看起来我需要一个程序,但也许它只是一个简单的陈述.

sql t-sql average moving-average sql-server-2012

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

在两个DB表中使用循环引用是一种好习惯

在我们的数据库中,我们有两个表A,B,主键为A_id和B_id.

将B_id作为表A中的外键和A_id作为表B中的外键是一种良好的做法.这将允许我们在表中具有多对多关系.

另一种方法是使第三个桥表只包含两列A_id和B_id.

您认为哪一个是好习惯?

sql database sql-server database-design

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

SQL递归记录:如何折叠到"仅一级"?

我有一个带有项目ID和'inherit id'的记录,即当前项目继承的项目.继承级别未知.

我现在需要将其折叠为:'从最顶层继承'

例如:

1006 <- 1005 <- 1002 <- 999
Run Code Online (Sandbox Code Playgroud)

prj_id/inherit_id

999  / 1002

1002 / 1005

1005 / 1006
Run Code Online (Sandbox Code Playgroud)

应该崩溃到

1006 <- 1005 

1006 <- 1002

1006 <- 999
Run Code Online (Sandbox Code Playgroud)

prj_id/inherit_id

999  / 1006

1002 / 1006

1005 / 1006
Run Code Online (Sandbox Code Playgroud)

这可以在没有循环的SQL语句中完成吗?创建临时表很好.它适用于FireBird,SQL Server,Oracle 9+(即3套语句都可以)

我只有这么远:

从自身再次继承的记录继承的记录:

select tt_prj_id,tt_name,tt_inherit_id from tt_prj a

where a.tt_inherit_id in

(select tt_prj_id from tt_prj b

 where b.tt_inherit_id is not null

 and b.tt_inherit_id > 0)
Run Code Online (Sandbox Code Playgroud)

谁可以帮我进一步?

sql sql-server oracle recursion firebird

3
推荐指数
1
解决办法
743
查看次数

SQL SELECT - 将单个行上的多个值分组

我有一个包含以下数据的表:

ID  CAT  TYPE   SUBPRODUCT
--- ---- ------ ----------------
1   1     1       AA
2   1     1       BB
3   1     2       CC
Run Code Online (Sandbox Code Playgroud)

我想得到这样的数据:

CAT   TYPE   SUBPRODUCT
----- ------ ---------------
1     1      AA,BB
1     2      CC
Run Code Online (Sandbox Code Playgroud)

请回复我,我该怎么办.

谢谢.

sql sql-server sql-server-2005

3
推荐指数
1
解决办法
966
查看次数

重新加载 Vim 高亮设置和颜色方案

如果我更改 Vim 的highlight设置,如何“重新加载”它以使颜色方案生效?

\n\n

因此,就我而言,我删除了highlight\ 的光标行号

\n\n
se hl-=N:CursorLineNr\n
Run Code Online (Sandbox Code Playgroud)\n\n

更改highlight

\n\n
\n

高亮=8:SpecialKey,@:NonText,d:目录,e:ErrorMsg,i:IncSearch,l:搜索,m:Mor\n eMsg,M:ModeMsg,n:LineNr, N: CursorLineNr ,r:问题,s :StatusLine,S:StatusLineNC,c:Vert\n 分割,t:标题,v:Visual,V:VisualNOS,w:WarningMsg,W:WildMenu,f:折叠,F:FoldColumn,A:D\n iffAdd,C :DiffChange,D:DiffDelete,T:DiffText,>:SignColumn,-:隐藏,B:SpellBad,P:Spel\n lCap,R:SpellRare,L:SpellLocal,+:Pmenu,=:PmenuSel,x:PmenuSbar, X:PmenuThumb,*:TabLine,\n #:TabLineSel,_:TabLineFill,!:CursorColumn,.:CursorLine,o:ColorColumn

\n
\n\n

\n\n
\n

高亮=8:SpecialKey,@:NonText,d:目录,e:ErrorMsg,i:IncSearch,l:搜索,m:Mor\n eMsg,M:ModeMsg,n:LineNr,r:问题,s:StatusLine,S :StatusLineNC,c:VertSplit,t:标题,v\n :Visual,V:VisualNOS,w:WarningMsg,W:WildMenu,f:Folded,F:FoldColumn,A:DiffAdd,C:DiffCh\n ange,D: DiffDelete,T:DiffText,>:SignColumn,-:隐藏,B:SpellBad,P:SpellCap,R:SpellRar\ne,L:SpellLocal,+:Pmenu,=:PmenuSel,x:PmenuSbar,X:PmenuThumb,*: TabLine,#:T​​abLineSel,_:\n TabLineFill,!:CursorColumn,.:CursorLine,o:ColorColumn

\n
\n\n

(我已经强调了这一变化。)

\n\n

但光标行号仍然“突出显示”!

\n\n

更改highlight不会更新颜色方案\xe2\x80\x94那么我如何“强制”更新?我尝试过将语法着色关闭然后再次打开并更改颜色方案但无济于事。

\n

vim

3
推荐指数
1
解决办法
3038
查看次数