Delphi提取PDF文本实例
生成PDF的控件很多,但解析的不是太多,pdf Toolkit可以,但测试的第一个复杂的pdf就报告错误,并且汉字乱码,可能使用的版本或使用方法不对。
想起之前使用java调用的Apache名下的pdfBox库很好用,于是就用下载了pdfBox,使用Delphi来调用pdfBox解析pdf文本。
环境要求:java运行环境
pdfBox应用包:pdfbox-app-2.0.6.jar
...
Delphi XE5 为Android应用制作签名的方法(图文)
要发布android应用,必须做签名的。看一下具体的操作步骤:
1.进入Project-Options:
2.打开Options窗口,选择Provisioning,在这里,可以为目标平台选择签名文件,也可生成新的签名文件。
2.1 选择目标平台,可以为dubug或release设置签名,默认情况下,debug签名文件是存在的,可不用设置,这也是我们建立一个新的Andro ...
ListView 百分比进度条(delphi版)
在看代码之前先给大家附上效果图:
废话不多说了,直接给大家贴代码了。
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls, ImgList;
type
TForm1 = class(TForm)
btn1: TButton;
lv1: TListView;
trckbr1: TTrackBar;
il1: TImage ...
delphi制作wav文件的方法
本文实例讲述了delphi制作wav文件的方法。分享给大家供大家参考。具体如下:
这里delphi用waveIn...函数制作wav文件
具体代码如下:
//使用窗口接受音频设备发出的消息:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls ...
Windows API GetLastError()函数返回值含义解释
〖0〗-操作成功完成。
〖1〗-功能错误。
〖2〗-系统找不到指定的文件。
〖3〗-系统找不到指定的路径。
〖4〗-系统无法打开文件。
〖5〗-拒绝访问。
〖6〗-句柄无效。
〖7〗-存储控制块被损坏。
〖8〗-存储空间不足,无法处理此命令。
〖9〗-存储控制块地址无效。
〖10〗-环境错误。
〖11〗-试图加载格式错误的程序。
〖12 ...
Delphi基本图像处理方法汇总
本文实例汇总了Delphi基本图像处理方法。分享给大家供大家参考。具体分析如下:
//浮雕
procedure Emboss(SrcBmp,DestBmp:TBitmap;AzimuthChange:integer);overload;
var
i, j, Gray, Azimuthvalue, R, G, B: integer;
SrcRGB, SrcRGB1, SrcRGB2, DestRGB: pRGBTriple;
begin
for i := 0 to SrcBmp.Height - 1 do
beg ...
Delphi实现截屏存盘的方法
本文实例讲述了Delphi实现截屏存盘的方法。分享给大家供大家参考。具体分析如下:
该实例可实现截取屏幕,并保存为JPEG文件格式的功能。
procedure TForm1.ScreenCap(LeftPos,TopPos,RightPos,BottomPos:integer);
var
RectWidth,RectHeight:integer;
SourceDC,DestDC,Bhandle:integer;
Bitmap:TBitmap;
MyJpeg: TJpe ...
Delphi实现窗体感知鼠标滑过并自动隐藏与显示窗口的方法
本文实例讲述了Delphi实现窗体感知鼠标滑过并自动隐藏与显示窗口的方法。分享给大家供大家参考。具体实现方法如下:
const
WM_MouseEnter = $B013;
WM_MouseLeave = $B014;
type
TfrmMain = class(TForm)
.
.
Timer1: TTimer;
procedure Timer1Timer(Sender: TObject);
protected
procedure WMMouseEnter(var ...
Delphi解析FTP地址的方法
本文实例讲述了Delphi解析FTP地址的方法。分享给大家供大家参考。具体实现方法如下:
procedure TForm1.FTPAnalysis(S:string;var UserName,Password,IP,FileName:String;var DirList:TStringList);
var
i,j:integer;
strAuthorization,strAddr,strDirFile:string;
//授权信息
begin
UserName:= 'anonymous';
Passwo ...
delphi实现将BMP格式图形转化为JPG格式图形的方法
本文实例讲述了delphi实现将BMP格式图形转化为JPG格式图形的方法。分享给大家供大家参考。具体实现方法如下:
复制代码 代码如下:
procedure ConvertBMPtoJPG(SFileName,DFileName:string);
Var
J:TJpegImage;
I:TBitmap;
S,D:String;
begin
s:=SFileName;
d:=DFileName;
J:=TJp ...
delphi字符串分隔函数用法实例
本文实例讲述了delphi字符串分隔函数用法。分享给大家供大家参考。具体实现方法如下:
该实例可实现根据字符串Separator的表示将字符串s分隔为若干个字符串,存入rs字符串列表中,具体代码如下:
复制代码 代码如下:procedure SeparateTerms2(s:string;Separator:string;var rs:TStringList);
var
AStr: string;
&nb ...
Delphi7中群发Email邮件的方法
本文实例讲述了Delphi7中群发Email邮件的方法。分享给大家供大家参考。具体分析如下:
这段时间需要对所有参加考试的考生将考生信息及考试信息通过电子邮件群发,经过多次调试,算是成功了,发来给大家参考一下:
总的思路是:
1、安装局域网版的邮件服务器,并通过设置DNS使得给服务器能给网外用户发送电邮,这方面的软件 ...
delphi实现保存和读取图片的方法
本文实例讲述了delphi实现保存和读取图片的方法,是非常实用的技巧。分享给大家供大家参考。具体实现方法如下:
首先引用jpeg
1.显示图片:
if OpenPictureDialog.Execute then
begin
img1.Picture.LoadFromFile(OpenPictureDialog.FileName);
btnPicture.Text:=OpenPictureDialog.FileName;
end;
2.保存图片: ...
Delphi远程连接Mysql的实现方法
本文实例讲述了Delphi远程连接Mysql的实现方法,是Delphi数据库程序设计中非常重要的技巧。分享给大家供大家参考之用。具体方法如下:
Delphi 通过ADOConnection链接远程Mysql数据库,要在安装软件的电脑上安装Mysql 驱动,没有的在百度下载,搜索mysql ODBC驱动就出来了
主要的链接代码如下:
var srstring:string;
srs ...
Delphi2007编译的程序在Win7下图标模糊的解决办法
使用Delphi2007编译GUI程序的时候会发现在Win7的状态栏中显示的程序图标非常模糊,如果原始的图标清晰度怎么样。造成这样结果的原因是因为Delphi2007生成的icon图标只符合XP等系统的要求,没有对Win7进行优化处理。网上有很多处理的方式,后来找到一个最简单有效的方法,就是只设置项目的图标而不要设置Form窗口的图标。
参 ...
Delphi实现检测并枚举系统安装的打印机的方法
本文以实例说明Delphi打印程序的实现方法。该实例可以检测系统中安装的所有打印机,枚举出这些打印机,主要功能代码非常简单,便于大家阅读与理解。
主要功能代码如下:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,Printers, XPMan;
...
delphi7连接mysql5的实现方法
本文简单介绍了Delphi7连接MySQL数据库的实现方法,具体步骤如下:
首先先去下载:http://www.justsoftwaresolutions.co.uk/delphi/dbexpress_and_mysql_5.html
然后将下载到的dbxopenmysql5_dll.zip解压出来,再把dbxopenmysql50.dll和libmysql.dll都放到工程文件夹下。
在Form上放上TSQLConnection、TSQLQuery、TStringGr ...
Delphi下OpenGL2d绘图之画四边形的方法
一、前言:
Delphi实现画四边形的方法基本上与前几遍文字代码是相同的。其区别知识在于glBegin()的参数“GL_QUADS”。绘制的框架代码可以使用Delphi下OpenGL2d绘图初始化中的代码,地址为https://www.jb51.net/article/52141.htm。修改的部份为 Draw 函数的内容。
二、画四边形方法:
使用GL_QUADS:绘制由四个顶点组成的一 ...
Delphi下OpenGL2d绘图之画线的方法
一、前言:
Delphi画线方法与画点基本上是相同的。区别在于glBegin()的参数。绘制的框架代码可以参考Delphi下OpenGL2d绘图初始化中的代码,地址为https://www.jb51.net/article/52141.htm。修改的部份为 Draw 函数的内容。
二、画线步骤:
GL_LINES:把每一个顶点作为一个独立的线段,顶点2n-1和2n之间共定义了n条线段,总 ...
Delphi下OpenGL2d绘图之画点的方法
一、前言
Delphi图形的绘制可以在glBegin()、glEnd()之间完成,绘制的框架代码可以使用Delphi下OpenGL2d绘图的初始化代码,具体内容可参考本站https://www.jb51.net/article/52141.htm。修改的部份为 Draw 函数的内容。
二、画点
使用glPointSize 函数指定栅格化点的直径。默认为1.0,只在GL_POINTS下起作用,关于消锯齿等 ...