手机随时阅读
新人专享大礼包¥24
51CTO博客开发
VS2008,vs2010 快捷键大全 Ctrl+m+Crtr+o折叠所有大纲 Ctrl+M+Crtr+P: 停止大纲显示 Ctrl+K+Crtr+C: 注释选定内容 Ctrl+K+Crtr+U: 取消选定注释内容 Ctrl+J : 列出成员 智能感知 Shift+Alt+Enter: 切换全屏编辑 Ctrl+B,T&
--统计 小计 合计 create table trade_flow (user_code varchar2(12),trans_time date,trans_amount number); insert into trade_flow values('321000',to_date
/// <summary> /// 数据源 /// </summary> private DataTable g_dtSource = new DataTable();#region InitGrid 初始化Gri
/******************************************************************************************************* * * Decription: 用于修改处理数据表字段类型 * 1) 要求先删除
代码将导致 ADO 在 WHERE 子句中包括的每个字段。如果您想确保所做的当前用户更新才会成功如果为表格中的行中的任何字段中不进行了任何更改,将"更新条件"属性中使用此值。此属性可用的常数,如下所示: adCriteriaKey = 0 Uses only the primary key
using System;using System.Collections.Generic;using System.Text;using System.Data;using System.Data.SqlClient;using System.Configuration;namespace DBTest{ public class OpactionData&n
USE MyDBGO/********************************************************************************** * * Author: Kinwar * Create Date: 2015-4-X * Description: 1) 汇总
强烈建议安装CnPackCTRL+SHIFT+C 编写申明或者补上函数CTRL+SHIFT+↑(↓) 在过程、函数、事件内部, 可跳跃到相应的过程、函数、事件的定义CTRL+SHIFT+G 插入GUIDCTRL+J (弹出DELPHI语句提示窗口,选择所需
//Dxdbgrid,则直接用SaveToexcel即可//使用 ExcelWithOdbc 控件function TDataModule1.GetDataToFile(DsData: TObject): Boolean; //用于将数据导入文件中var DataSet: TCustomADODataSet; FileName: string;&nb
(1) idispatch是COM object的接口, 在Delphi中通常指一个OleObject. (2) OleVariant是一种COM object兼容的Variant类型, 可以通用任何Ole Automation 类型, 他与CreateOleObject创建的idispatch兼容1:Com+的编写: 1:
一、QuickReport的设置:1、将QuickReport的PageSize属性设为Custom;2、设定纸张的长度、宽度及边距等信息;3、将QuickReport的PageSize的属性改为Default。二、页面相关设置qrRepareSmallCard.Page.Length := 180;qrRepareSmall
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls, MSComm
分享Delphi处理EXCEL源码,源码如下: (****************************************************************************************)var FExcelApp:Variant;  
自定义截图函数function TForm1.CaptureForm(HWND: THandle; W, H: Integer): TBitmap;var TmpBitmap: TBitmap; TmpCanvas: TCanvas; DC: HDC;begin TmpBitmap := TBitmap.Create; TmpBitmap
{TDBLookupComboBox属性:DataField, DataSource, KeyField, ListSource。这几个属性代表的意义是:DataField, DataSource指定了需要修改的字段(就是用户改变了TDBLookupComboBox的值之后需要修改的字段),而KeyField, ListSource指定了TDBLookupComboBox的值的来源(来自哪个Dat
//从服务器上把图片下载到本地并处理procedure TForm3.ImgShow(filename:string);var p_w_picpathStream:TMemoryStream; jpg:TJpegImage; imgFile:string; Bmp1,Bmp2 :TBitmap; w1,h1:Integer;begin&n
实现步骤:1、生成密钥文件用于给程序集强名称签名(必须)sn -k MyKey.snk 2、使用强名称签名的Key编译成类库Tester.DLLcsc /t:library /keyfile:MyKey.snk Tester.cs3、生成类型库 (此tlb文件提供给Delphi导入, 使用OLE方式调用此步可省略了)tlbexp Tester.dll /out:Tester.tlb 4、生成注册D
然后进入http://www.microsoft.com/zh-cn/download/default.aspx输入winhlp32.exe搜索下载。Windows8-RT-KB917607-x86.msu
在开发过程运用中,有时候一个ADO控件返回了多个数据集,例如存储过程返回了2个查询结果,如下面处理------------------PAS文件--------------------------------------procedure TForm1.Button1Click(Sender: TObject);var recval: _Recordset; Records
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExcelWithOdbc, StdCtrls, DB, ADODB;type TForm1 = class(TForm)
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls, MSCommLib_TLB, StdCtrls, ExtCtrls;type TForm1 = class(TForm)&nb
(********************************************************************************************************** * * * 窗体描述:产生SQL条件语句,系统模块 [计划管理-打卡] 打印大/小卡 * &nbs
(* 关键工序控制开始处 *) (* 检查送下一工序内容时,前面应该做的工序是否都做了 *) (* ----------------------------------------------------------------------------
/* 资料库的导入和导出*/ --复制表结构USE LWSfGOselect * into T_tmp_statusdescriptfrom T_statusdescriptwhere 1=2 --字段值分隔符:, 换行符:<回车>,从第行开始,因为第一行是标题BULK INSERT dbo.T_tmp_statusdescriptFROM 'D:\T_status
/* SQLServer优化与配置*/ --读写快照:适用于读取与写入的比例可能是几十一或者数百--查看当前已提交读快照状态--is_read_committed_snapshot_on:0 未启用1 已启用Select Name,is_read_committed_snapshot_onFrom Sys.Databases Where Name='LCWSfis'Go--启用已提交读快
--字符串函数--分别取左边个字符、右边个字符Declare @S Varchar(200)='abcdefghijk'Select Left(@S,3) as S1,Right(@S,3) as S2Go--从第个字符开始,取个字符Declare @S Varchar(200)='abcdefghijk'Select SubString(@S,3,4) as S1Go--从第个字符开始,取个字符
/* SQL Server 常用维护脚本 */ --维护索引CREATE PROCEDURE usp_MaintainIndex@DBName NVARCHAR(20) = NULLAS BEGINSET NOCOUNT ON;DECLARE @objectid int;DECLARE @indexid int;DECLARE @partitioncount bigint;DE
/*Description: 生产库自动派送报表派送失败之重新派送 */ USE [DB] --Replace yourDBGO DECLARE @ProductDate nvarchar(10)
/* Author: kinwar Create Date: 2014-09-03 Description: 积分贴纸数据表 普通表 转为分区表 目地
Copyright © 2005-2022 51CTO.COM 版权所有 京ICP证060544号