小编Kro*_*ica的帖子

使用进度条进行文件复制

我用过这段代码:

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Windows.Forms;
using System.IO;

namespace WindowsApplication1 {
  public partial class Form1 : Form {
    // Class to report progress
    private class UIProgress {
      public UIProgress(string name_, long bytes_, long maxbytes_) {
        name = name_; bytes = bytes_; maxbytes = maxbytes_;
      }
      public string name;
      public long bytes;
      public long maxbytes;
    }
    // Class to report exception {
    private class UIError {
      public UIError(Exception ex, string path_) {
        msg = ex.Message; path = path_; …
Run Code Online (Sandbox Code Playgroud)

c# file-io backgroundworker file-copying progress-bar

33
推荐指数
4
解决办法
8万
查看次数

Delphi TList的记录

我需要存储一个临时的记录列表,并认为这TList是一个很好的方法吗?但是我不确定如何用a做这个TList并且想知道这是否是最好的,并且如果有人有任何如何做到这一点的例子?

delphi record tlist

31
推荐指数
4
解决办法
6万
查看次数

Chrome进程(选项卡)的最大内存使用量以及如何增加它?

嗨我在一个选项卡上通过chrome运行几千个https客户端,我似乎在浏览器中达到了限制,当我检查任务管理器时,该选项卡的chrome进程使用了​​高达897MB,所以我假设有某种限制(900MB~).

周围是否有任何镀铬向导可以解释这一点,因为我无法在网上找到任何东西,如果我可以增加最大限制,那么这将是理想的,因此我可以通过单个选项卡运行更多客户端.

谢谢!

memory ssl https google-chrome http

28
推荐指数
3
解决办法
4万
查看次数

从visual studio 2012专业版缺少ADO.NET实体数据模型模板

缺少Visual Studio 2012 Professional中的ADO.NET实体数据模型模板.我甚至没有Visual Studio模板类别的"数据"类别.

我修改了Visual Studio 2012安装,并选择了要安装的所有可用软件包.但即便如此也没有运气.

visual-studio-2012

27
推荐指数
4
解决办法
4万
查看次数

多态如何使我的代码更灵活?

我正在阅读Head First面向对象设计,以便更好地理解OOP概念.

多态性解释为:

Airplane plane = new Airplane();
Airplane plane = new Jet();
Airplane plane = new Rocket();
Run Code Online (Sandbox Code Playgroud)

您可以编写适用于超类的代码,如飞机,但可以使用任何子类.: - 嗯...... 我得到了这个.*.

它进一步解释说:

- > 那么多态如何使代码变得灵活?

好吧,如果你需要新的功能,你可以写一个新的AirPlane子类.但是,由于您的代码使用了超类,因此您的新类将在不对代码的其余部分进行任何更改的情况下工作.

现在我没有得到它.我需要创建一个飞机的子类.例如:我创建一个类,Randomflyer.要使用它,我将不得不创建它的对象.所以我会用:

Airplane plane = new Randomflyer();
Run Code Online (Sandbox Code Playgroud)

我没有得到它.即使我会直接创建子类的对象.当我添加新的子类时,我仍然不需要在任何地方更改我的代码.使用超类如何使我免于对其余代码进行额外更改?

oop polymorphism

27
推荐指数
6
解决办法
3993
查看次数

vim正则表达式和普通正则表达式有什么区别?

我注意到vim的替代正则表达式与其他正则表达式略有不同.他们之间有什么区别?

regex linux vim

26
推荐指数
4
解决办法
6073
查看次数

由于更改了8087CW模式(Png + stretchblt),System.Move中的内存损坏

我有一个奇怪的内存损坏问题.经过几个小时的调试和尝试,我想我找到了一些东西.

例如:我做一个简单的字符串赋值:

sTest := 'SET LOCK_TIMEOUT ';
Run Code Online (Sandbox Code Playgroud)

但是,结果有时会变成:

sTest = 'SET LOCK'#0'TIMEOUT '
Run Code Online (Sandbox Code Playgroud)

所以,_被0字节取代.

我在System.Move函数中看到过这种情况发生一次(复制很棘手,取决于时间),当它使用FPU堆栈(fild,fistp)进行快速内存复制时(如果要移动9到32个字节):

...
@@SmallMove: {9..32 Byte Move}
fild    qword ptr [eax+ecx] {Load Last 8}
fild    qword ptr [eax] {Load First 8}
cmp     ecx, 8
jle     @@Small16
fild    qword ptr [eax+8] {Load Second 8}
cmp     ecx, 16
jle     @@Small24
fild    qword ptr [eax+16] {Load Third 8}
fistp   qword ptr [edx+16] {Save Third 8}
...
Run Code Online (Sandbox Code Playgroud)

使用FPU视图和2个内存调试视图(Delphi - > View - > Debug - > CPU - > Memory)我看到它出错...一次......无法重现......

今天早上我读到了关于8087CW模式的一些内容,是的,如果将其更改为$ …

delphi png stretchblt x87

24
推荐指数
1
解决办法
1499
查看次数

Embarcadero RAD Studio XE许可证是否允许在多台机器上使用?

在过去,Borland"没有废话"许可证允许一个开发人员进行多次安装.

我很想升级到Embarcadero RAD Studio XE专业版,但我担心许可限制,以及它是否会让我像以前一样工作.

我下载了30天的试用版,这只允许一次安装,所以我有点担心升级会强制执行类似的限制.

我使用小型和大型笔记本电脑和PC,并希望在所有3个以及虚拟机中安装RAD Studio.我在供应商网站上发布了一个询问此问题的问题,但目前还没有回复,我想知道人们是否可以根据自己的经验回答?

我也有兴趣知道升级只会在同一台机器上现有的早期产品安装时运行.

delphi licensing upgrade

22
推荐指数
1
解决办法
8494
查看次数

三个值策略的中位数

在快速排序中选择枢轴值的三种策略的中位数是多少?

我在网上看到它,但我无法弄明白究竟是什么?以及它如何比随机快速排序更好.

sorting algorithm quicksort

21
推荐指数
5
解决办法
7万
查看次数

"左侧不能分配给"Delphi中的记录类型属性

我很想知道为什么Delphi将记录类型属性视为只读:

  TRec = record
    A : integer;
    B : string;
  end;

  TForm1 = class(TForm)
  private
    FRec : TRec;
  public
    procedure DoSomething(ARec: TRec);
    property Rec : TRec read FRec write FRec;
  end;
Run Code Online (Sandbox Code Playgroud)

如果我尝试为Rec属性的任何成员赋值,我将得到"左侧无法分配"错误:

procedure TForm1.DoSomething(ARec: TRec);
begin
  Rec.A := ARec.A;
end;
Run Code Online (Sandbox Code Playgroud)

允许对底层字段执行相同操作:

procedure TForm1.DoSomething(ARec: TRec);
begin
  FRec.A := ARec.A;
end;
Run Code Online (Sandbox Code Playgroud)

这种行为有什么解释吗?

delphi record

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