百骏图
模块内容加载中...
湖南省 怀化市 双子座
发消息 写留言
喜欢：旅游+网上看书+网上看新闻+ 网上听音乐+Delphi编程
| 近期心愿 | 已经完成《你梦我圆3D预测》 |
| 博客等级 | 加载中... |
| 今日访问 | 加载中... |
| 总访问量 | 加载中... |
| 最后登录 | 加载中... |
图片的合并与缩放
2017-12-24 16:11:35 阅读30 评论0 242017/12 Dec24
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
一个拼图工具的制作思路
2017-12-24 14:49:49 阅读30 评论0 242017/12 Dec24
http://www.cnblogs.com/del/archive/2010/04/24/1719631.html![一个拼图工具的制作思路 - 你梦我圆 - 鑫淼梦园的博客]( "一个拼图工具的制作思路 - 你梦我圆 - 鑫淼梦园的博客")
功能简介:
1、双击左窗口可打开源图像;
2、框选左窗口可把图像选取复制到右窗口;
3、剪取的图块可以移动, 可配合 Ctrl 单选或多选, 可用 Delete 删除选择的图块;
4、双击右窗口可保存拼好的图像.
功能实现:
1、MoveImage 主要完成 "图块" 的功能;
2、ImageBox 主要完成源图像及选取功能;
3、其他有主模块 Unit1 完成.
窗体:
Delphi 拖动的例子
2017-12-23 22:49:02 阅读30 评论0 232017/12 Dec23
TreeView1.DRAGmODE := dmAutomatic；//被拖动的控件必须设置的
procedure TForm1.TreeView1StartDrag(Sender: TObject;//被拖动的控件启动时要设置的内容或者不设置
var DragObject: TDragObject);
begin
Self.Tag:= 101;
end;
//TreeView1定义一个值
procedure TForm1.MyDragOver(Sender, Source: TObject; X, Y: Integer;//要经过的时产生的事件
State: TDragState; var Accept: Boolean);
如何快速取得脚本汇总的全部数据？
2017-10-23 15:58:17 阅读38 评论0 232017/10 Oct23
procedure TFrDataview.cxGridDBTableView3DataControllerSummaryAfterSummary(
ASender: TcxDataSummary);
var
I: Integer;
mm: String;
begin
ListBox6.Clear;
for I := 0 to 32 do
begin
mm := ASender.FooterSummaryTexts[i];
//delta7maxv[i + 1] := StrToIntDef(mm, 0);
昂达平板电脑忘记开机密码怎么解决
2017-7-24 23:38:58 阅读65 评论0 242017/07 July24
平板在关机状态下， 先按住“开机键”不放，按下开机键以后马上按下平板上的“音量 键” ，出现开机画面以后，松开开机键和主页键。开机以后会出现以下的界面
将光标移动到第一项[Recovery Mode] （用音量 键进行移动）然后按下“音量-键”。
操作完成以后会显示
win7 64位 [Microsoft][ODBC 驱动程序管理器] 未发现数据源名称
2017-7-18 12:33:14 阅读67 评论0 182017/07 July18
64位操作系统不支持Microsoft OLE DB Provider for Jet驱动程序，也不支持更早的Microsoft Access Driver (*.mdb)方式连接。所以，程序里面的链接字符串不能正常工作。需要修改下IIS的工作环境，改成32位的，在IIS的管理界面中，把应用程序池中的默认应用程序池常规选项中的32位方式启用就可以了。
1、Win7 下Access的 ODBC连接
控制面板---管理工具----数据源(ODBC)
cxGrid失去焦点后如何继续保持选中单元的高亮状态
2017-3-24 20:04:20 阅读76 评论0 242017/03 Mar24
在delph object Inspector 展开styles->Inactive,在里面建立一个cxStyle,设置你要的颜色，OK。
结果：
归档
数据加载中...
日志分类
日志分类列表加载中...
焦点头图
聚焦图片加载中...