应用程序通过内嵌浏览器的方式，利用js的window.external可以达到控制窗体行为的效果，如控制窗体宽高大小，透明度，网页截屏，网页读写文件，网页控制桌面行为等，最近利用DELPHI就实现了这一点，一般软件可以是很小巧，2，3百K的样子，如果大家有谁需要的，我将无偿提供这方面的源代码，因为这方面的应用目前还不是很广（QQ Zone用的这样的技术），所以我就不在这里给出代码了。我扩展的win
转载
2023-07-21 14:33:30
50阅读
一、使用FileStream
例1、
Code
var
qFileStream: TFileStream;
buffer: string;
begin
qFileStream := TFileStream.Create('Test.txt', fmCreate); qFileStream.Seek(0,
怎样在vc、delphi、vb等程序中使用mysql呢(mysql odbc驱动程序的使用)？我们经常会遇到这样问题，怎样在非web程序或asp程序中使用mysql数据库呢？对于这个问题有两个解决方案：1、使用mysql提供的api函数库，很多有名的mysql客户端工具就是这样实现的，大名鼎鼎的winmysql工具就是这样的。这在大部分的开发工具中都可以实现。比如vc,bcb,delphi,vb等
转载
2023-10-21 18:58:04
78阅读
在进行win32开发中对文件的读写是最常用的操作之一，这编文章西西小编和大家一起来学习一下在Delphi中如何读写文件的方法。 Delphi 支持三种文件类型: 文本文件、记录文件、无类型文件。 文本文件的读写： 文本文件 是以行为单位进行读、写的。由于每一行的长度不一定相同，不能计算出给定行在文件中的确切位置，因而只能顺序地读写。 文本文件只能单独为读或写而打开
转载
2023-10-27 23:22:44
126阅读
delphi操作word一、Delphi程序启动Word采用CreateOleObjects的方法来启动Word，调用VBA代码，具体实现过程为：首先使用GetActiveOleObject('Word.Application')判断当前内存中是否存在Word程序，如果存在，则直接连接，如果没有Word程序，则使用CreateOleObject('Word.Application')启动Word
转载
2008-04-01 14:10:21
2865阅读
{-----------------------------------------
创建XML文档，以及节点
------------------------------------------}
procedure TForm1.CreateXMLClick(Sender: TObject);
var
pNode,cNode: IXMLNode;
转载
2011-05-10 13:29:44
1881阅读
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
742阅读
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
87阅读
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
573阅读
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
578阅读
2评论
1响应OnKeyPress事件。
此事件在用户键入某键时触发。
procedure TForm1.FormKeyPress(Sender:Object;var key:Char);
var
outmsg:string;
begin
outmsg := format('Key ''%s'' pressed',[key]);
Applicatio
原创
2012-10-02 09:18:26
715阅读
DELPHI中EXCEL组件的使用方法:
一) 使用动态创建的方法
首先创建 Excel 对象，使用ComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' );
1) 显示当前窗口：
ExcelApp.Visible := True;
2) 更改 Excel 标题栏：
E
转载
精选
2013-01-01 22:27:49
1362阅读
先上个例子procedure
TForm1.Button1Click(Sender: TObject); //写文件var
wText: TextFile;begin
AssignFile(wText, 'ip.txt');
Rewrite(wText);//创建文件，或者使用ReSet打开文件
Writeln(wText, richedit1.text);
CloseFil
转载
精选
2014-03-05 19:24:47
1852阅读
输入 procedure TypeKeyString(s: string); var c: Char; i: integer; off: integer; vkw: Word; begin for i := 1 to Length(s) do begin c := s[i]; if (c < #12
转载
2019-08-13 13:55:00
391阅读
2评论
procedure TfrmDataModule.DataModuleCreate(Sender: TObject);var reg: TRegistry; lfIni: TiniFile; lsDBName, lsSQLServeIP, lsConnStr, lscpConnStr: string;begin lfIni := TiniFile.C
原创
2014-04-24 11:10:52
972阅读
文件是同一种类型元素的有序集合，是内存与外设之间传输数据的渠道。
转载
2012-06-18 19:30:00
60阅读
2评论
1.选择设置对齐 RichEdit1.SelectAll;RichEdit1.Paragraph.Alignment:=taLeftJustify; // switch for other alignmentsRichEdit1.SelLength:=0;2.设置对齐和内容 redt1.Clear;
转载
2016-03-08 14:49:00
766阅读
2评论
Q1: 多线程中需避免多个线程同时向全局变量进行写入操作，导致访问冲突问题。A1: 可以通过使用加锁机制（比如：临界区、互斥、信号量）解决此问题。 Q2:多线程中对于结构体和CLASS类型的全局变量是需要进行加临界区机制来实现数据同步A2: 注意：临界区只有在所有的线程都使用它来访问全局内存时才起作用，如果有线程直接调用内存，而不通过临界区，也会造成同时访
https://github.com/danieleteti/delphiredisclient
原创
2021-07-29 16:07:30
703阅读
# 使用 Delphi 连接 Redis 数据库
在现代应用中，Redis 作为一种高性能的键值数据库，广泛用于缓存、存储会话信息和实时数据分析等场景。如果你是 Delphi 开发者，可能会想知道如何在 Delphi 中连接和操作 Redis 数据库。本文将介绍如何实现这一目标，并提供具体的代码示例。
## 什么是 Redis？
Redis（Remote Dictionary Server）
