小编MX4*_*399的帖子

如何在WiX中创建静默安装程序,该安装程序不向用户显示任何UI对话框,并使用默认设置进行安装,升级和卸载？

我需要在我的控制下为有限数量的类提供undo + redo堆栈,这些类必须非常非常快并且使用RTTI和XML或流是不可行的,因为嵌套对象中的实例数可以高达2000+名单.需要通过memento模式复制和移出对象并立即重新加载.

有没有办法通过复制内存并从该内存重新实例化对象来克隆对象？

我曾经为NSIS的应用程序构建安装,最终的自我提取器是1.2 MB.现在我需要使用WIX,因为操作需要,同样的安装在4.2 MB.我将压缩标志设置为包节点上指示的文档和规范.使用7z压缩MSI会产生2.4 MB的zip文件.

问题:如何在MSI上进行最大压缩或创建小型MSI(例如删除不需要的资源等)？

注意 - 尺寸非常重要,我现在必须使用MSI/WIX - 这是一个显示停止!

你有一个类函数可以创建一个类的实例:

TMyClass = class(TSomeParent)
public
  class function New(AValue : integer) : TMyClass; 
end;

TDerivedClass = class(TMyClass)
public
  function Beep;
end;

然后按如下方式使用它

...   
var
  myList : TList<T>;
  item : TDerivedClass;
begin
  myList.Add(TDerivedClass.New(1))
  myList.Add(TDerivedClass.New(3))
  myList.Add(TDerivedClass.New(5))

  for item in myList do
    item.Beep; //times the count in the class function
...

如果是这样,那个功能代码是什么样的？您是否使用TObject的NewInstance方法并且每次为每个派生类重新实现？使用构造函数是否更安全/更好？

目标是在命令模式中使用此方法并使用类类型和接收器加载命令列表,例如:

//FYI: document is an instance of TDocument
commandList.Execute(TOpenDocument(document)); 
commandList.Execute(TPasteFromClipboard(document)); 
//... lots of actions - some can undo
commandList.Execute(TPrintDocument(document)); 
commandList.Execute(TSaveDocument(document));

原因是某些命令将通过text/script指定,需要在运行时解析.

安装成功完成后,需要将日期和时间以及其他一些信息写入注册表.如何生成日期以及如何知道安装是否成功完成？(用wix写入注册表不是问题).

是否可以"按需/有选择地"禁用DelphiXE中的表单设计器,并且只在需要控件未安装的情况下才能使用表单/类的代码？

哪个是检测字符串是否为Base64Encoded的最佳方法(使用Delphi)？

在使用提议的多播委托方法响应Delphi问题中的信号和槽实现时,代码无法添加多个事件处理程序.

问题与向事件列表中添加方法有关TDelegateImpl<T>.Add(),该TList<T>.IndexOf方法使用Compare方法查找现有方法,结果始终为0 - 意味着对于TMethod,Left和Right是相同的.Equals方法使用TMethod类型转换并显式比较TMethod.Code和TMethod.Data,其中Compare强制转换为始终相同的地址.

为什么Compare使用TList<T>.IndexOf而不是Equals？

目标是创建一个名为TURLString的类型,如下所示:

var
  newURl : TURLString;
begin

  newURL.Append('http://').Append('www.thehost.com').Append('path/on/server').Append('?');

  ...lots of app logic...

  newURL.AppendParam('name', 'value').Append('#').AppendParam('name', 'value');

  ...more params added...

  result := httpClient.Get(newURL);

end;

使用TURLString定义(注意它的记录):

//from actual code used
TURLString = record
private
    FString : string;
public
    function Append(APart : string) : TURLString;
    function AppendParam(AParam, AValue : string) : TURLString;
end;

function TURLString.Append(APart: string) : TURLString;
begin
  FString := FString + APart;
  result := self;
end;

function TURLString.AppendParam(AParam, AValue: string): TURLString;
begin
  if (not Empty) then
    FString := FString + URL_AMB;
  FString := …

Delphi表单设计器非常好,但我们需要直接从源代码工作.是否有可以获取一批DFM文件并将其转换为Delphi源代码的工具或脚本？