小编Cha*_*iga的帖子

我们使用巡航控制.net 在我们的Delphi 2006应用程序中进行持续集成.我们使用类似于此处描述的设置.

题:

1)使用实现构建脚本的最佳脚本工具/语言是什么？

2)使用WANT比使用NANT有什么好处吗？

(注意:D2006与MSBuild不兼容)

我正在为delphi寻找数据识别树视图

什么是最好的使用？

我需要在表中更新日期值,如果它不存在则必须插入

在MySql中执行此操作的最佳方法是什么

目前我正在使用

   SELECT Id INTO LId  FROM ATABLE WHERE ID = FID;
   IF LId IS NULL THEN
     INSERT INTO ATABLE(abc) Values (2)
   ELSE
     UPDATE ATABLE Set Abc = 2 Where Id = LId
   END IF;

但这次击中了数据库3次

有没有更好的方法呢？

嗨,我使用的是Mysql 5.0.x.

我刚刚将很多表从MyISAM改为InnoDB

使用MyISAM表大约需要1分钟来安装我们的数据库使用InnoDB大约需要15分钟来安装相同的数据库

为什么InnoDB需要这么长时间？

我该怎么做才能加快速度？

数据库安装执行以下步骤

1)删除架构

2)创建架构

3)创建表

4)创建存储过程

5)插入默认数据

6)通过存储过程插入数据

编辑:

大多数情况下,插入默认数据

我正在为TRichEdit添加行如何将注意力集中在刚刚添加的行上？

For Idx := 1 to 1000 do
   RichEdit.Lines.add(IntToStr(Idx));

编辑

我只是丰富的底线显示刚刚添加的内容和所有其他行向上滚动

有没有让InnoDB的AUTO_INCREMENT字段从0开始计数而不是1

CREATE TABLE `df_mainevent` (
  `idDf_MainEvent` int(11) NOT NULL AUTO_INCREMENT,
  PRIMARY KEY (`idDf_MainEvent`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1;

在Visual Studio中我可以"按类生成依赖图"我如何在Delphi-XE2中执行此操作？

当我使用快速报告4.12.2生成一个简单的10页报告并将其另存为PDF时,它的大小约为5兆.

在Rave Reports中生成并使用eDocEngine转换为PDF的类似报告大小约为50k.

这是快速报告TfrxPDFExport组件的设置方式:

  object frxPDFExport1: TfrxPDFExport
    UseFileCache = True
    ShowProgress = True
    OverwritePrompt = False
    CreationTime = 40993.786098020840000000
    DataOnly = False
    OnBeginExport = frxPDFExport1BeginExport
    PrintOptimized = True
    Outline = False
    Background = False
    HTMLTags = True
    Author = 'FastReport'
    Subject = 'FastReport PDF export'
    ProtectionFlags = [ePrint]
    HideToolbar = False
    HideMenubar = False
    HideWindowUI = False
    FitWindow = False
    CenterWindow = False
    PrintScaling = False
    Left = 216
    Top = 56
  end

如何使快速报告生成的PDF更小？

救命

我正忙于对Datasnap项目中的类型库进行更改.

如何在类型库编辑器中复制和粘贴文本？

我正在使用BDS2006

编辑1

有没有办法在不使用TLB编辑器的情况下选择类型库？

编辑2

有没有办法在类型库编辑器的"属性"和"用户"屏幕中进行复制和粘贴？

编辑:

有没有更好的方法呢？

TPendingBets = class(TDataModule)
  private
  public
    function    GetBdy(out IdEvent : Integer                           )                                                           : Boolean; overload;
    function    GetBdy(out IdEvent : Integer; out idBetType : TBetTypes)                                                           : Boolean; overload;
    function    GetBdy(out IdEvent : Integer; out idBetType : TBetTypes; Out TotalOrgStake,Price : Double; out PriceError :Boolean): Boolean; overload;
  end;

implementation

////////////////////

function    TPendingBets.GetBdy(out IdEvent : Integer ): Boolean;
var idBetType : TBetTypes;
    TotalOrgStake,Price : Double;
    PriceError :Boolean;
begin
   result :=  GetBdy(IdEvent,idBetType,TotalOrgStake,Price,PriceError);
end;

////////////////////

function    TPendingBets.GetBdy(out IdEvent : Integer; out idBetType : TBetTypes): …