- 博客(85)
- 收藏
- 关注
转载 Delphi 中图象的放大和缩小
在Delphi中,可利用类Tcanvas的CopyRect方法实现图象的放大和缩小。其功能是将源画布上的一个指定矩形区域(简称源矩形)内的象素,拷贝到目的画布上的一个指定矩形区域(简称目的矩形)中。亦可称之为象素块复制。 由CopyMode属性确定拷贝的模式。在直接拷贝模式(cmSrcCopy)下,当源矩形与目的矩形相等时,图象不变;若源矩形大于目的矩形,图象则缩小;而当源矩形小于目的矩形时
2013-03-01 08:22:52
7830
转载 delphi 文本框内容空白时加上提示文字,输入内容时提示文字不显示
unit SkinHintEdit; interface uses Windows,Classes,Controls,SysUtils,Messages,StdCtrls,Forms, Graphics; const //提示文字颜色 CONST_DEF_HELPTEXT_FONTCOLOR=clGray;
2013-03-01 08:20:48
4144
转载 Delphi - DLL
-- 注册ActiveX控件const CN_EXECUTE_STR = 'Regsvr32.exe /s %s '; var StrPath: string; begin StrPath := 'C:\aa.dll '; WinExec(PChar(Format(CN_EXECUTE_STR, [StrPath])),
2013-03-01 08:17:41
697
转载 简明批处理教程-cmd
前言最近对于批处理技术的探讨比较热,也有不少好的批处理程序发布,但是如果没有一定的相关知识恐怕不容易看懂和理解这些批处理文件,也就更谈不上自己动手编写了,古语云:“授人以鱼,不如授人以渔。”因为网上好像并没有一个比较完整的教材,所以抽一点时间写了这片>给新手朋友们.也献给所有为实现网络的自由与共享而努力的朋友们.批处理文件是无格式的文本文件,它包含一条或多条命令。它的文件扩展名为
2013-03-01 08:13:34
671
转载 [UDF系列]如何编写InterBase UDF
译者叙:由于InterBase性能方面表现突出,并且它是开源和跨平台的,有很多使用Delphi,C++Builder的程序员开始采用它做为其后数据库平台。但是InterBase的中文资料简直太少了。昨日,一网友在优快云上提到InterBase的UDF(user defined functions 用户自定义函数),我顺手一查,网上竟然查不到这方面的中文资料。于是,我今天将一篇如何编写和使用I
2013-02-25 13:09:35
2155
转载 使用interbase做Asp的后台数据库
使用interbase做Asp的后台数据库Bingo @ 2005-01-21 22:11安装interbase的oledb驱动,下载eng_IBProviderFree.exe创建data.ibp文件,作为连接参数信息文件,代码如下Persist Security Info=0;User ID=SYSDBA;password=masterkey;Data So
2013-02-25 11:46:15
1217
转载 InterBase数据库文件损坏的修复方法
InterBase数据库是一种中级数据库,它短小精悍免维护,可以满足百万记录级别的数据库应用,又有开放源码版本,个人认为是一种比较适合中小型数据库应用环境的数据库管理系统(DBMS)。Delphi内建了对InterBase数据库的支持,因此用Delphi编写以InterBase为后台数据库的软件很是方便。在实际应用中,偶尔会碰到InterBase数据文件损坏的问题。损坏的原因多种多样,
2013-02-25 11:44:48
5125
原创 Interbase6.5 Inno 安装脚本
[Setup]AppName=InterBase 6.5AppVerName=InterBase 6.5DefaultDirName={pf}\Borland\InterBaseDefaultGroupName=InterBase 6.5;UninstallDisplayIcon={app}\ExpMaster.exeCompression=lzmaSolidCompr
2013-01-11 15:20:32
1520
转载 向服务器 上传文件的代码
从ftp中调取图片时出现的不可理解的问题,请高手帮忙看看2010-12-17 标签: 从ftp中调取图片时出现的不可理解的问题,请高手帮忙看看 系统winxp delphi6.0var myjpeg1:TJPEGImage;
2011-08-09 15:09:40
975
原创 收集一些有用的 Blog 地址
描述: Delphi、cxGridhttp://blog.youkuaiyun.com/hnxxcxg/article/category/485573
2011-07-15 16:37:32
488
原创 delphi执行查询语句时的进度条怎么做
procedure TForm1.FormCreate(Sender: TObject); begin ADOQuery1.ExecuteOptions := [eoAsyncFetch];//设为异步读取 end; //ADOQuery的OnFetchProgress事件 procedureTForm1.ADOQuery1FetchProgress(D
2011-06-20 16:00:00
1662
转载 sql导出dbf文件存储过程
这里,就SqlServer,DBF两种格式的转化问题做个总结。 一: 从dBase文件中,导入数据到SQL数据库中,很简单,直接用下面的语句: /*===================================================================*/ --如果接受数据导入的表已经存在 insert into 表 sele
2011-06-20 15:57:00
2262
原创 个人开公司的流程,以后用得着
一、选择公司的形式:普通的有限责任公司,最低注册资金3万元,需要2个(或以上)股东,从06年1月起新的公司法规定,允许1个股东注册有限责任公司,这种特殊的有限责任公司又称“一人有限公司”(但公司名称中不会有“一人”字样,执照上会注明“自然人独资”),最低注册资金10万元。如果你和朋友、家人合伙投资创业,可选择普通的有限公司,最低注册资金3万元;如果只有你一个人作为股东
2010-05-18 08:46:00
624
原创 SQL经典短小代码收集 2
sqlserver的几个函数要记录今日碰到个问题:要实现数据表中的一个字段中的文本为"xxx.gif"的转换为"xxx.jpg",我不知道其具体名称,只知道是以gif结尾。问题解决:update pet set petPhoto=substring(petPhoto,1,datalength(petPhoto)-3)+jpg where petPhoto like %.gif
2010-05-15 08:31:00
638
转载 SQL经典短小代码收集 1
--SQL Server:Select TOP N * From TABLE Order By NewID() --Access:Select TOP N * From TABLE Order By Rnd(ID) Rnd(ID) 其中的
2010-05-15 08:29:00
631
转载 SQL SERVER /Excel
一、 SQL SERVER 和ACCESS的数据导入导出常规的数据导入导出:使用DTS向导迁移你的Access数据到SQL Server,你可以使用这些步骤: 1在SQL SERVER企业管理器中的Tools(工具)菜单上,选择Data Transformation 2Servi
2010-05-15 08:28:00
582
转载 谁是你随时可以说话的人
记得《艺术人生》有一次访谈,朱军问一直单身的演员王志文:40了怎么还不结婚?王志文说:没遇到合适的,朱军问“你到底想找个什么样的女孩?”王志文想了想,很认真地说:“就想找个能随时随地聊天的。” “这还不容易?”朱军笑。 “不容易。”王志文说,“比如你半夜里想到什么了,你叫她,她就会说:几点了?多困啊,明天再说吧。你立刻就没有兴趣了。有些话,有些时候,对有些
2010-05-10 15:33:00
825
转载 json 研究
http://www.json.org/json-zh.html http://blog.youkuaiyun.com/jondynet/archive/2009/06/19/4282786.aspx JSON(JavaScript Object Notation) 类似与 XML; 虽始于 JavaScript, 但被多种语言支持, 它也成了 Delphi 2009 的新功能之一.
2010-05-04 17:40:00
907
转载 Google的搜索API的Delphi封装
这个东西实现了已经有一段时间了,那个时候谷歌还没有退出中国内地呢!而现在呢,谷歌都退了有一些日子了!紧以此纪念一番! 话说谷歌API,我相信很多人应该都知道!不晓得在实际应用中,用的人多不多(我说的不是Web方面的)。谷歌API提供了很多接口,但是貌似唯独没有提供对Delphi的接口(我们Delphi程序员果然很尴尬啊,很多类库,都没有我们的份,都需要自己来实现)。而我又需要这么个
2010-05-04 17:24:00
713
转载 Delphi 组件开发教程指南(5)实现类QQ的编辑框
距离上一篇系列的文章有一段时间了,假终于是放完了!现在咱继续在TEdit上做文章,同时来熟悉某些Windows的系统消息。现在我讲的是如何实现一个类似QQ编辑框的样式。 再讲解之前,先回馈前几篇文章有些人提出的问题。通过前几篇文章,有很多人关注,同时也有人给了一些建议。所以我这里说明一下,我这个组件编写的教程指南过程可能不是和书上按部就班一样的讲解,我的着重点是如何编写一个组件
2010-05-04 17:21:00
730
转载 Delphi 组件开发教程指南(4)组件生成过程(针对TWinControl继承而来的组件)
还记得在第二章的时候,我用到了procedure CreateParams(var Params:TCreateParams);这个函数的吧!为什么我会使用这个函数来实现那个对齐的问题呢!现在就来追根底的来看看!这个过程其实是在构建窗口的时候会调用的,当然我说的这个是针对TWincontrol继承过来的组件说的,从TGraphicontrol等继承过来的是没有这个的。这个函数的产生也是
2010-05-04 17:19:00
635
原创 Delphi 组件开发教程指南(3)组件注册
在上一篇中,我们简单的实现了一个对Delphi自身的TEdit编辑框控件的一个扩充!但是我们并不能像Delphi自己的TEdit一样,能够在设计状态下进行设计,而是非得要自己手动创建控件,然后才能使用。这个虽然说也是组件,但是却失去了组件的可设计的方便性,仅仅可作为一个类库来使用。现在我就来介绍一下,如何让这个组件注册到IDE上,然后让你能够在设计状态下可以设计使用。 在讲注册
2010-05-04 17:18:00
624
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人