Q1: 多线程中需避免多个线程同时向全局变量进行写入操作，导致访问冲突问题。A1: 可以通过使用加锁机制（比如：临界区、互斥、信号量）解决此问题。 Q2:多线程中对于结构体和CLASS类型的全局变量是需要进行加临界区机制来实现数据同步A2: 注意：临界区只有在所有的线程都使用它来访问全局内存时才起作用，如果有线程直接调用内存，而不通过临界区，也会造成同时访
转载
2024-05-21 14:51:47
75阅读
应用程序通过内嵌浏览器的方式，利用js的window.external可以达到控制窗体行为的效果，如控制窗体宽高大小，透明度，网页截屏，网页读写文件，网页控制桌面行为等，最近利用DELPHI就实现了这一点，一般软件可以是很小巧，2，3百K的样子，如果大家有谁需要的，我将无偿提供这方面的源代码，因为这方面的应用目前还不是很广（QQ Zone用的这样的技术），所以我就不在这里给出代码了。我扩展的win
转载
2023-07-21 14:33:30
59阅读
怎样在vc、delphi、vb等程序中使用mysql呢(mysql odbc驱动程序的使用)？我们经常会遇到这样问题，怎样在非web程序或asp程序中使用mysql数据库呢？对于这个问题有两个解决方案：1、使用mysql提供的api函数库，很多有名的mysql客户端工具就是这样实现的，大名鼎鼎的winmysql工具就是这样的。这在大部分的开发工具中都可以实现。比如vc,bcb,delphi,vb等
转载
2023-10-21 18:58:04
90阅读
Delphi 操作多线程的代码， 在项目中需要在webservice中使用多线程，程序思想如下：1.就创建一个线程， 也就是说有两个线程，主线程和创建的线程， 主线程用于程序的别的操作，例如停止服务，和关闭程序等等。2.辅线程用于调用Webservice，用他的目的，还有就是方便查看memo中的日志， 如果只有一个线程，这是不可能的，只有等调用结束才可以，但是这里面又用到了Timer，结果想在主线程查看memo，很费劲。故创建一个辅线程。type TMyThread = class(TThread) private FMyThreadExecfinish: Boolean; FHTTPRIOL
转载
2013-09-13 14:41:00
211阅读
2评论
# Delphi MySQL 查询线程的实现
在现代软件开发中，尤其是在与数据库的交互时，处理查询的线程化是非常重要的。线程可以帮助提高应用程序的响应性。本文将引导你了解如何在 Delphi 中实现 MySQL 查询的线程，以确保应用程序在查询数据时不会被卡住。
## 流程概览
首先，让我们看看实现“Delphi MySQL 查询线程”的整个流程。以下是步骤的简要表格：
| 步骤 | 描
原创
2024-08-12 06:40:38
31阅读
之前学习了用API实现，让我们再学习下用DELPHI的TThread类。先新建一个普通的工程，再新建一个线程类File>>New>>Othre>>Delphi File>Thread Object，取个名字，DELPHI会自动生成一个单元，我们只需往里简单添加功能代码，和在要使用的单元里实例引用即可。为了节省篇幅，现把TMyThread类集成主窗体单元里，
转载
2024-02-28 13:48:57
305阅读
# 在Delphi 7中操作MySQL的完整指南
在开发应用程序时，使用数据库是一项基本技能。本篇文章将带你了解如何在Delphi 7中连接并操作MySQL数据库。我们将按步骤进行介绍，并提供必要的代码及其解释。通过以下流程表，你可以清晰地了解整个实现的步骤。
## 流程表
| 步骤 | 描述 |
|------|----------
在了解多线程之前我们先了解一下进程和线程的关系 一个程序至少有一个主进程,一个进程至少有一个线程。 主线程又程为UI线程。 进程和线程的主要差别在于它们是不同的操作系统资源管理方式。进程有独立的地址空间，一个进程崩溃后，在保护模式下不会对其它进程产生影响，而线程只是一个进程中的不同执行路径。线程有自
转载
2015-04-03 16:04:00
348阅读
2评论
function ThreadFunc(P:Pointer):LongInt;stdcall;var i:Integer; dc:HDC; s:string;begin dc := GetDC(Form2.Handle); for i := 0 to 10000 do begin s := IntToStr(i); TextOut(dc,10,10,PChar(s),Length(s)); e
原创
2013-10-30 08:01:28
846阅读
# Delphi操作MySQL数据库的基础教程
在现代软件开发中，数据库的使用是不可或缺的。本文将介绍如何使用Delphi编程语言操作MySQL数据库。我们将通过具体实例，演示如何连接数据库，进行基本的CRUD操作（创建、读取、更新、删除），以及一些可视化的图表。
## 一、环境准备
在开始之前，请确保你已经安装了以下软件：
1. **Delphi IDE**（可以使用任何支持数据库连接的
近期，由于学习数据库的需要，利用Delphi7开发一个数据库管理系统！ 首先了解一下Delphi吧！ Delphi为第四代编程语言，提供可视化的编程环境。可以很方便的对数据库进行连接，从而操作数据。Delphi发展历史Borland公司在1995年推出了基于Windows平台的Delphi 1。 Delphi 2新增加的主要功能是对32位编程的支持。还增加了如数据模块等多种高效的数据重用功能。 D
转载
2023-11-13 15:51:25
74阅读
一、使用FileStream
例1、
Code
var
qFileStream: TFileStream;
buffer: string;
begin
qFileStream := TFileStream.Create('Test.txt', fmCreate); qFileStream.Seek(0,
转载
2023-12-05 19:58:43
221阅读
<script type="text/javascript">
</script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
第三章 数据库中的图片第一节 处理BLOBs，
转载
2023-11-04 17:22:02
164阅读
unit uThreadPool;{ aPool.AddRequest(TMyRequest.Create(RequestParam1, RequestParam2, ...)); }interfaceuses Windows, Classes;// 是否记录日志// {$DEFINE NOLOGS Read More
转载
2016-02-25 19:09:00
181阅读
2评论
delphi操作word一、Delphi程序启动Word采用CreateOleObjects的方法来启动Word，调用VBA代码，具体实现过程为：首先使用GetActiveOleObject('Word.Application')判断当前内存中是否存在Word程序，如果存在，则直接连接，如果没有Word程序，则使用CreateOleObject('Word.Application')启动Word
转载
2008-04-01 14:10:21
2925阅读
{-----------------------------------------
创建XML文档，以及节点
------------------------------------------}
procedure TForm1.CreateXMLClick(Sender: TObject);
var
pNode,cNode: IXMLNode;
转载
2011-05-10 13:29:44
1949阅读
var
stream:TMemoryStream;
arr:array of byte;
begin
stream := TMemorystream.create;
TBlobField(qry_for_show.FieldByName('word')).SaveToStream(blb_tmp);
stream.S
原创
2012-10-12 08:13:13
809阅读
Delphi操作XMLDelphi操作XMl，只要使用 NativeXml。我是用的版本是4.02。NativeXML的使用方法比较简单，但是功能很强大。XE2的话，要在simdesign.inc后面加上： // Delphi XE2 / 16 {$ifdef VER230} {$define D7UP} {$define D10UP} {$define D15UP} {$endif}一、使用 1) Copy the NativeXml fi...
转载
2014-02-26 13:54:00
89阅读
2评论
uses ComObj,word2000 procedure TForm1.ExportWord(); var FWord :Variant; FDoc :Variant; i,Row:Integer; nodeString:Tstringlist; nodeList:TList; Tables,T
转载
2016-03-07 11:09:00
661阅读
2评论
Delphi 总结操作Excel Delphi 总结操作Excel 定义变量 Excelid:variant; 1、创建OLE对象 try Excelid:=CreateOleObject( 'Excel.Application' ); except on Exception do raise ex
转载
2015-04-29 00:13:00
588阅读
2评论
