delphi-2010

0热度

2回答

我试图通过TEdit过滤TDBGrid，处理TEditonChange事件。我有一个TIBQuery列出在网格中的所有记录： SELECT id,obra,cliente,fecha,nro_estudio,sondeo FROM proyecto; 当用户将在TEdit字符，电网必须由Cliente场被刷新。我的代码试图做到这一点，但是当它执行处理程序时，查询返回一个空的结果集。我正在使

2热度

2回答

德尔福2010年，尽管相应的按钮处理Click事件被禁用

考虑给定按钮的OnClick事件中执行下面的代码： procedure TForm1.Button1Click(Sender: TObject); begin button1.enabled := false; //Line 1 application.processmessages; //Line 2 Sleep(3000); //Line 3

3热度

2回答

不能使用UTF-8编码工作

我加载使用此代码的文本文件（我的文件编码为UTF-8）（How to read a text file that contains 'NULL CHARACTER' in Delphi?）： uses IOUtils; var s: string; ss: TStringStream; begin s := TFile.ReadAllText('c:\MyFi

-2热度

1回答

如何下载大文件的一小部分？

如何在Delphi下载大文件的一小部分？（如下载管理器）例如，假设我想通过HTTP获取100MB文本文件的前300个字节。

5热度

1回答

是否可以在Synchronize中使用简单的循环？

procedure TGridThread.Execute; var i: integer; iIEBitmap: TIEBitmap; iWidth: integer; iHeight: integer; iImageCount: integer; iArrayOfBitmaps: array of TBitmap; begin

2热度

1回答

TreeView：如何确定节点是否处于编辑模式？

有没有办法告诉treeview节点当前是否处于编辑模式？我正在使用KeyUp事件来确定删除键是否被击中 - 我只想在我的'你真的要删除这个'的代码，如果用户不编辑。这个项目是用Delphi 2010

1热度

1回答

立即运行的下一行德尔福

我有一些代码在这里： procedure TForm1.Button1Click(Sender: TObject); begin //Some Codes(1) Sample; //Some Codes(2) end; Function Sample(); begin sleep(5000); end; 在这段代码，//Somecodes(1

6热度

3回答

线程安全的德尔福

我要修改和改变线程一些可视化组件，正如你知道这是不是安全的这样做。我的问题是如何编写完全线程安全的代码？这可能吗？如果是的话可以请给我一个简单的例子吗？我的代码不是线程安全的： type tMyWorkerThread = class(TThread) public procedure Execute; override; end; var

5热度

1回答

如何在Delphi组件中存储大文本？

我做了一个自定义组件，需要一个相当大（比如1MB）的UTF8文本才能运行。出于开发目的，我只是从一个文件加载这个。现在我想摆脱那个文件。在组件中存储其内容的最简单方法是什么？这样组件的用户就不必为此而烦恼了？首先，我试着让字符串不变，但很快德尔福开始以许多不同的方式抱怨（太长或太多，内存不足等）。当我切换到嵌入它作为一种资源，我发现的资源不会被自动编译到实际的应用程序一样，所以它不是透明的组件的

2热度

1回答

如何使用Tidhttp使用名为xml的参数进行Get请求？

我已经成功地使用Delphi 2010来制作http获取请求，但对于需要一个名为'xml'的参数的一个服务，请求失败并显示'HTTP/1.1 400 Bad Request'错误。我注意到调用相同的服务，并省略'xml'参数的作品。我曾尝试没有成功如下： HttpGet('http://localhost/Service/Messaging.svc/SendReports/PDF?xml=<?