应用程序通过内嵌浏览器的方式，利用js的window.external可以达到控制窗体行为的效果，如控制窗体宽高大小，透明度，网页截屏，网页读写文件，网页控制桌面行为等，最近利用DELPHI就实现了这一点，一般软件可以是很小巧，2，3百K的样子，如果大家有谁需要的，我将无偿提供这方面的源代码，因为这方面的应用目前还不是很广（QQ Zone用的这样的技术），所以我就不在这里给出代码了。我扩展的win
转载
2023-07-21 14:33:30
59阅读
JSON(JavaScript Object Notation) 是一种轻量级的数据交换格式。易于人阅读和编写，同时也易于机器解析和生成。它基于JavaScript（Standard ECMA-262 3rd Edition - December 1999）的一个子集。 JSON采用完全独立于语言的文本格式，但是也使用了类似于C语言家族的习惯（包括C, C++, C#, Java, JavaScript, Perl, Python等）。这些特性使JSON成为理想的数据交换语言。
转载
2011-06-03 19:57:00
529阅读
2评论
一直盼着 Delphi 能够直接支持 "正则表达式" 与 "JSON";Delphi 2009 刚来的时候, 有了 JSON, 但不好, 那时尝试过一点. 这是以前的链接: 什么是 JSON?Delphi 2010 带了两个相关单元: DBXJSON、DBXJSONReflect 貌似很强大, 但主要是给 DataSnap 准备的; 尝试了半天, 也很失望:
转载
精选
2013-09-10 20:58:35
967阅读
一、使用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阅读
Diesel，Rudolf，1858-1913，德国工程师，所谓的DIESEL的发明者。“Dumb Interpretively Evaluated String Expression Language”的缩写，AutoCAD和AutoCAD LT中的简单编程语言AutoCAD附带了大量API（应用程序编程接口），可以使用LISP，VBA或C ++等语言构建自定义环境。在AutoCAD的第12版中
转载
2023-06-30 22:36:17
77阅读
怎样在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阅读
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
764阅读
DELPHI中EXCEL组件的使用方法:
一) 使用动态创建的方法
首先创建 Excel 对象，使用ComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' );
1) 显示当前窗口：
ExcelApp.Visible := True;
2) 更改 Excel 标题栏：
E
转载
精选
2013-01-01 22:27:49
1383阅读
先上个例子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
1903阅读
输入 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
405阅读
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评论
在进行win32开发中对文件的读写是最常用的操作之一，这编文章西西小编和大家一起来学习一下在Delphi中如何读写文件的方法。 Delphi 支持三种文件类型: 文本文件、记录文件、无类型文件。 文本文件的读写： 文本文件 是以行为单位进行读、写的。由于每一行的长度不一定相同，不能计算出给定行在文件中的确切位置，因而只能顺序地读写。 文本文件只能单独为读或写而打开
转载
2023-10-27 23:22:44
177阅读
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
1014阅读
文件是同一种类型元素的有序集合，是内存与外设之间传输数据的渠道。
转载
2012-06-18 19:30:00
67阅读
2评论
1.选择设置对齐 RichEdit1.SelectAll;RichEdit1.Paragraph.Alignment:=taLeftJustify; // switch for other alignmentsRichEdit1.SelLength:=0;2.设置对齐和内容 redt1.Clear;
转载
2016-03-08 14:49:00
829阅读
2评论
