tx14

tx14 的事例代码(delphi)

    Repeat
        nFieldID := Form1.TXTextControl1.FieldNext(nfieldID, 0);
        If nFieldID > 0 Then
          cboBookmark.Items.Add(string(Form1.TXTextControl1.FieldData[nFieldID]))
    Until nFieldID = 0;

怎么 cboBookmark.Items.Add(string(Form1.TXTextControl1.FieldData[nFieldID]))
这行报错,我如果用 .net 写就不报错

jxhis 你好，
由于我们是针对 .NET 环境下技术支持，所以目前没有 delphi 环境去验证该问题，从代码中分析可能有两个方面会出错：

1. 
   
2. cboBookmark.Items.Add(string(Form1.TXTextControl1.FieldData[nFieldID]))
   

复制代码

1.nFieldID 是否存在或为非法值。
2.cboBookmark.Items.Add 添加出错。

1.nFieldID 是否存在或为非法值。
2.cboBookmark.Items.Add 添加出错

这两个都不是

那用DELPHI的话，是不是就没办法使用这个控件呢？
如果是，真有点遗憾

jxhis 你好，
TX 是支持 delphi 环境的，关于 1# 的问题我们需要和厂家购后确认，有结果后我会尽快通知楼主。

期待中……，出于某些原因，我特别希望能够在 Delphi环境下实现

有结果我会尽快通知楼主～

jxhis 你好，

经和生产商沟通，证实所有 TX Text Control 的 featrue 都支持 Delphi。

只是有些代码片段中的编码方式和 Delphi 的编码方式不同。因此会抛出异常，需要楼主手动修改。请问楼主抛出的异常信息是？能否请楼主发个 Demo 到论坛来调试呢？

就是
   Repeat
        nFieldID := Form1.TXTextControl1.FieldNext(nfieldID, 0);
        If nFieldID > 0 Then
          cboBookmark.Items.Add(string(Form1.TXTextControl1.FieldData[nFieldID]))
    Until nFieldID = 0;

这段代码报错

jxhis 你好，
该问题正在处理中，有结果会尽快通知楼主～