delphi-2010

-2热度

2回答

我已经编写了代码来计算点之间的距离。为了让rFinal四舍五入到小数点后两位，我需要键入什么内容？ rtotaldist := arcCos(sin(degtorad(rhouselat))*sin(degtorad(rcachelat)) +cos(degtorad(rhouselat))* cos(degtorad(rcachelat))*cos(degtorad(rhouselong-r

0热度

2回答

在组合框列表项中插入配置

创建一个新项目。我在项目中插入一个组合框到项目和一个编辑框中。后来我在组合框中menambhkan串项目项目 server 1 au server 2 uk server 3 my 的列表中组合框做一个字符串之后再形成组合框列表。所有我想要的是在字符串中添加一个配置。一样，如果我选择服务器1 AU在编辑框组合框中显示服务器地址作为ns.au.server.com ns.au.s

0热度

1回答

pgpool可以管理会话，因为服务器应用程序在不再活动后会保持连接吗？

我有一个datasnap和delphi 2010的服务器应用程序（这个版本在管理会话时有一些问题），我必须每天终止一次postgres中的空闲会话。我已经安装了pgpool，但它没有任何区别，所以，我配置了错误还是因为它是保持这些连接活着的服务器pgpool不能做'魔术'来管理它？

0热度

1回答

在Delphi中使用Vigenere密码编码消息？

我想用简单的Vigenere密码加密一条消息，方法是给字母表中的每个字母赋一个数字值，例如： A = 1; B = 2; .. Z = 26。问题是我不知道使用哪个函数来识别字符串中的字符（因为它是必须被编码的消息，用空格填充），然后给它一个特定的数字值。接下来，该数字消息必须转换为二进制，这很容易，但我该如何将该字符串消息转换为整数（其他的StrToInt函数）？我只需要知道哪个函数用于Vi

-2热度

2回答

表达式评估非法（＆访问冲突）

我试图通过使用类Tbb2uc处理纯文本文件（加载到StringList中），但在调用函数GetAddress中获取AV。 TArrayQuotePositions = array[1..4] of integer; Tbb2uc = class(TObject) private Farrayquotes: TArrayQuotePositions; SlI

1热度

1回答

当我创建一个线程时，Delphi IDE挂起

我有一个问题，即在运行一个线程时，Delphi（2010）IDE和程序都在调试过程中挂起。两个窗口都不响应。当我杀死程序时，IDE再次运行。花了时间，我不得不删除我的程序片断，我发现了问题。它是由VirtualStringTree引起的。因此，如果我在窗体上只放置了空的VirtualStringTree（v.5.5.3），一个按钮在Execute过程中只用“Sleep（2000）”执行TT

1热度

1回答

快捷方式触发器第一次创建窗体而不是焦点窗体的检测

我发现（在Delphi 2010中）快捷方式总是以第一种形式（由主窗体拥有）结束，而不是当前着重的形式。我的TMainFrm拥有几个TViewFrm。每个人都有TActionManager与TActons相同。我看到一些方法，但是不知道什么最好的修复。（而不是一个坏的黑客）的形式使用它调用其隐藏（）和show（）一个标签集导航。我不希望隐藏的表单接收按键。难道我做错了什么？看来，行动捷径始终

0热度

1回答

TFIBDataset组件的“.closeopen”方法的作用是什么？

我在Delphi 2010中使用FIB Plus组件，只是想知道closeopen(true)做什么。我尝试了谷歌搜索，但没有得到它的信息。 FIBDataSet.closeopen(true);

1热度

1回答

回滚事务不适用于TpFIB组件

我正在使用Delphi 2010与FIB Components类似TpFIBDataset,TpFIBTransaction和TpFIBDataset与Firebird数据库。我已经将TpFIBDataset的'AutoCommit'属性设置为'False'，那么当我在try..finally块中执行以下语句并回滚事务数据时仍然会发布。代码： FIBDataset.Post; 下面是示例代码。

0热度

1回答

从Delphi 2010应用程序中以批处理文件的形式运行cmd脚本而不将其写入磁盘

有没有办法在不写入磁盘的情况下运行复杂的命令脚本（批处理文件）？我想在备忘录中键入我的脚本，然后ShellExecute它在按钮按下时不先写入磁盘。