delphi-6

    -4热度

    2回答

    当我在记事本中创建一个文件,包含(例如)字符串1d并保存为unicode文件,我得到一个6字节大小的文件包含字节#255#254#49#0#100#0。 好的。现在我需要一个Delphi 6函数,它需要(例如)输入宽字符串1d并返回包含#255#254#49#0#100#0(反之亦然)的字符串。 怎么样? 谢谢。 D

    2热度

    1回答

    我正在使用德尔福6. 我想解码一个葡萄牙UTF-8编码的字符串到WideString,但我发现它不正确解码。 原文为"ANÁLISE8"。使用UTF8Decode()后,结果为"ANALISE8"。 "A"上方的符号消失。 下面是代码: var f : textfile; s : UTF8String; w, test : WideString; begin

    -1热度

    1回答

    我用下面的代码将文本分配到一个SQL参数: quInsert.Parameters.ParamByName('veh_type').value := copy(s,11,1); 有时在.txt文件我的文字从UTF-8读取数据,其中字符使用两个字节。如何更改以下代码以接受UTF-8数据? procedure TPrepareform.Button1Click(Sender: TObject);

    1热度

    1回答

    调用idTelnet.Connect通常立即连接到远程设备。 但是, 如果远程设备没有响应,则 然后对idTelnet.Connect的调用不返回。 它等待来自远程设备的响应。 这挂起了整个应用程序。 如何设置超时时间,以便idTelnet.Connect在nn ms 之内返回,而不管连接是否已建立?

    1热度

    1回答

    Delphi 6附带的Indy版本不包含打开TCP连接时指定超时的选项。我已被告知another question Indy 9和10可以做到这一点。 是否有可能将德尔福6升级到Indy 9或10? 我到目前为止一直无法找到任何一个下载,并且同样找不到升级说明。 任何人都可以帮我解决这个问题吗?

    -1热度

    1回答

    我需要每两秒重复发送4个字节,即00 00 00 F6。 但是,IdUDPClient.SendBuffer传输后没有返回。 我尝试发送几个字节,并且每次都返回。 这工作: UDP.SendBuffer(RawToBytes(#0 + #0 + #0 + #1 + #127 + #128 + #246, 7)); 这不起作用: UDP.SendBuffer(RawToBytes(#0 + #0

    0热度

    1回答

    如何确定数组项是否是对另一个数组或其他类型项目(如Single)的引用。 我正在研究这个问题,因为我想制作一个统一代码,它将遍历动态多维数组的所有项目,而不管数组的维数有多少。 我需要这个以确定是否需要递归迭代表示内部维度的数组或者我是否已经处于最内层维度。 我认为我可能需要依靠RTTI,但我必须承认我目前还没有使用RTTI的经验。

    1热度

    1回答

    在Delphi 6中是否有内置函数?即,检索MaxValue函数返回值的索引的函数。 如果不是什么是最有效的例程?

    4热度

    1回答

    的Delphi 6. 我实现居中的所有者形式 上作为1月6日2011年 建议通过@大卫赫弗南一个的MessageDlg从2011原来的问题是在这里: How to make MessageDlg centered on owner form。 居中的对话框工作一次。 第一次抛出异常。 - EAccessViolation - 访问冲突在地址00000000 - 地址00000000 读什么可能我做

    -1热度

    1回答

    我想实现一个类,其实例名为toto的属性是一个动态数组我可以追加,读取,写入像一个tlist。 我写这个: Tmodel = Class(TObject) ftoto:array of single; function gettoto(ind : integer):single function gettotosize:integer; proced