选择用线程函数解决。调用主窗体代码:procedure TForm1.Button17Click(Sender: TObject);var Thd:FindForm;beginThd := FindForm.Create(False);thd.DoIt := True;Thd.MainWnd := ...
本文引自：http://www.danieleteti.it/category/embarcadero/delphi-xe7-embarcadero/ 并行编程库是delphi XE7中引进的最受期待的功能之一。下面是一个简单的并行编程例子： procedure TFormThreading.But...
分类：
其他好文 时间：
2014-09-27 18:04:30
阅读次数：
183
1. 窗体上全局 快捷键，首先设置keyprivew 属性为true.procedure TFMzcfLr.FormKeyDown(Sender : TObject; var Key : Word; Shift : TShiftState);begin if Key = 13 then ...
分类：
其他好文 时间：
2014-09-26 22:38:18
阅读次数：
169
实例1：仅仅返回单一记录集的存储过程。银行存款表（bankMoney）的内容例如以下IduserIDSexMoney001Zhangsan男30002Wangwu男50003Zhangsan男40要求1：查询表bankMoney的内容的存储过程create procedure sp_query_ba...
分类：
数据库 时间：
2014-09-26 18:22:48
阅读次数：
205
create procedure RefreshAllViewas begin declare @ViewName varchar(250) declare #views cursor for select name from sysobjects where objectproperty(i...
分类：
数据库 时间：
2014-09-26 17:57:08
阅读次数：
250
procedure TbsAdPartParaDMSForm.cxGridDBTableView3Editing( Sender: TcxCustomGridTableView; AItem: TcxCustomGridTableItem; var AAllow: Boolean);var v...
分类：
其他好文 时间：
2014-09-26 13:29:39
阅读次数：
219
PostgreSql Procedure copy split string to table...
分类：
数据库 时间：
2014-09-25 17:44:27
阅读次数：
306
了当一个存储仓库出现问题或者你想停止使用一个存储仓库时，怎样从XenServer主机上删除存储仓库。背景XenServer的存储仓库是用来存储ISO或者时VDI的。存储仓库通过物理块设备（PBD）与XenServer相连接，PBD包含了存储仓库（SR）的配置信息。当你从XenServer主机上分离或者删除S..
分类：
其他好文 时间：
2014-09-25 12:29:29
阅读次数：
237
set ANSI_NULLS ONset QUOTED_IDENTIFIER ONgoALTER PROCEDURE [dbo].[db_article_GetArticlePagination]( @pagesize int, @pageindex int,@classid int,@sp_key...
分类：
其他好文 时间：
2014-09-24 19:07:27
阅读次数：
153
今天我一个朋友问我一个问题，通过showprocesslist看见一个%百分号，例：这种情况是由于执行存储过程造成的，示例如下：DELIMITER$$
USE`test`$$
DROPPROCEDUREIFEXISTS`test`$$
CREATEDEFINER=`admin`@`%`PROCEDURE`test`()
BEGIN
SELECTSLEEP(60);
END$$
DELIMITER;存..
分类：
数据库 时间：
2014-09-24 18:30:37
阅读次数：
207
