Delphi 与 DirectX 之 DelphiX(66): TDIB.DoResample(); 本例效果图: 代码文件:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1:
使用 IntraWeb (39) - THttpRequest、THttpReply 在其它服务器脚本语言中熟悉的 Request、Response(THttpRequest、THttpReply) 在 IntraWeb 中算是幕后英雄了, 用户基本不需要直接操作它们了.IW 默认 Post 传值(WebApplication.Request.HttpMethod = hmPost, 只读), 但
使用 IntraWeb (38) - TIWAppForm、TIWForm、TIWBaseHTMLForm、TIWBaseForm 窗体 < TIWAppForm < TIWForm < TIWBaseHTMLForm < TIWBaseForm.TIWAppForm 所在单元及继承链:IWAppForm.TIWAppForm < TIWForm < TIWBaseHTMLForm < TIWBaseForm < TIWModuleDsn &l
使用 IntraWeb (37) - TIWApplication 每个访问用户都会拥有一个它的实例(WebApplication), 它除了承载 Session(会话)数据, 还要记忆着用户的浏览器信息、登陆信息等等; 另外, 窗体的建立也都依附(Owner)于它, 并随之自动释放.TIWApplication 所在单元及继承链:IWAppli
使用 IntraWeb (34) - TIWAJAXNotifier 在异步事件中, 可以通过 TIWAJAXNotifier 发出一个通知(通过其 Notify 方法), 该通知会激发其 OnNotify 事件.这一般用在: 当一个异步事件完成后, 立即处理随后的事情.TIWAJAXNotifier 所在单元及继承链:IWCompExtCtrls.TIWAJAXNo
使用 IntraWeb (22) - 基本控件之 TIWCalendar TIWCalendar: 日历控件, 继承于 TIWCustomGrid, 所以它和 TIWGrid 共同属性特多.它的 Cell 是 TIWCalendarCell 对象, 直接从 TIWGridCell 继承.TIWCalendar 所在单元及继承链:IWCompCalendar.TIWCalendar < TIWCustomGrid
使用 IntraWeb (33) - Cookie 在 IW.HTTP.Cookie 单元提供有两个相关类: THTTPCookie、TCookieList; 另外 IWServerController 还有一个 CookieOptions 选项.但实用起来一般用不到它们.测试:{读取 Cookie; 放在 OnCreate 中不太合适, 因为在切换页面时, 如果窗口
使用 IntraWeb (31) - IntraWeb 的 Xml 操作使用的是 NativeXml 在 IWNativeXml 单元. 知道了这个, 以后在其他 Delphi 程序中也可以直接 Uses IWNativeXml 了.TNativeXml (IWNativeXml.TNativeXml < TPersistent < TObject) 的主要成员:property AbortParsing: Boole
XP 之后, Delphi 动注册表不方便了...逼出来一个办法: 手头的程序需要修改注册表, 以让当前程序成为某格式的默认打开程序并关联图标; Vista 之后需要管理员权限才能操作注册表, 很麻烦, 所以有了下面的尝试.unit Unit1; interface uses Winapi.Windows, Winapi
Delphi 中的自动释放策略 一、指定 Owner 后, 随 Owner 连带释放://uses Vcl.StdCtrls, Vcl.ExtCtrls; var panel: TPanel; procedure TForm1.Button1Click(Sender: TObject); begin panel := TPanel.Create(Self); panel.Parent := Self;
先创建一个测试表: -- 创建测试表格 CREATE TABLE table_test ( [id] [int] NOT NULL PRIMARY KEY IDENTITY(1, 1), [name] [varchar] (50) NULL, ) GO 创建存储过程: -- 测试用的存储过程 CREATE PROCEDURE proc_test @name AS VARCHAR(60) AS BEGIN INSERT INT
一个类范围过程 -- Chapter 23 - Program 1 with Ada.Text_IO, Ada.Integer_Text_IO, Ada.Float_Text_IO; use Ada.Text_IO, Ada.Integer_Text_IO, Ada.Float_Text_IO; package Conveyance4 is -- A very simple transportatio
Oracle直方图直方图是一种按数据出现的频率来进行分类存储的方法.在oracle中直方图是用来描述表中列数据的分布情况.每一个sql在被执行前都要经过优化这一步骤那么在优化器给出一个最优执行计划之优化器应该要知道sql语句中所引用的底层对象的详细信息.直方图描述的对象包括列中不
张铎,HBase PMC member,目前在小米人工智能与云平台负责HBase的研发工作。主要介绍一下Procedure V2的设计和结构,以及为什么用Procedure V2能比较容易实现出正确的AssignmentManager。以及在2.1分支上对一些Procedure实现修正和改进。
存储过程 存储过程: 可以有0个或多个返回值,适合做批量插入,批量更新; 函数: 有且只有一个返回值,适合做处理数据后返回一个结果 创建语法 CREATE PROCEDURE 存储过程名(参数模式 参数名 参数类型) BEGIN 存储过程体(一组合法的SQL语句) END 参数模式: IN: 调用方传入值 O
转: MySQL-存储过程-高效清理数据 使用存储过程清理数据,往往会引起全表扫,如果表内数据非常大,清理效率会很低。 本文讲解了如何在存储过程中合理利用索引清理数据。 一、准备表结构(测试数据量740W) CREATE TABLE `test`.`procedure_test` ( `pk` bigint(20) NOT NULL AUTO_INCR
SQL专栏 SQL数据库基础知识汇总 SQL数据库高级知识汇总 最近有不少小伙伴来私信存储过程到底是怎么一回事?之前有详细介绍过,不过时间比较久远,可能不好找。重新给需要的小伙伴介绍一下,语法比较固定,但是写法还是有点灵活,可以先模仿,写多了也就明白了。存储过程其实就是已预编译为可执行
包装不仅仅具有把过程和函数打包的功能,还有其他只有通过包能实现的功能: 首先解释第一个功能:制作多个同名的过程函数。 例如,有些函数,内容相同,但是参数的类型和数量不同,就可以用包来实现。这个定义称为重载。 名字相同,参数的数量或者参数数据类型的不同,或者函数返回的数据类型
存储过程和函数 存储过程和函数:类似于Java中的方法。 好处: 提高了代码的重用性简化操作减少了编译次数并且减少了和数据库服务器的连接次数,提高了效率。 存储过程 含义:一组预先编译好的SQL语句的集合,可以理解成批处理语句。 一、创建语法: CREATE PROCEDURE 存储过程名(参数列
存储过程 1.什么是存储过程? 存储过程就类似于python中的自定义的函数,它的内部包含了一系列可以执行的sql语句,存储过程存放于mysql服务端中,你可以直接通过调用存储过程触发内部sql语句的执行 2.存储过程的基本使用 procedure /prəˈsiːdʒə(r) 程序, 过程 -- 创建语法 del
存储过程创建和调用 DELIMITER $$ DROP PROCEDURE IF EXISTS bxx$$ CREATE PROCEDURE bxx() BEGIN DECLARE x INT; DECLARE str VARCHAR(255); SET x = 1; SET str = ''; WHILE x <= 5 DO INSERT INTO `ancb_yun`.`test`(`id`, `code`, `name`, `price`,
Delphi回调函数及其使用 1 回调函数的概述 回调函数是这样一种机制:调用者在初始化一个对象(这里的对象是泛指,包括OOP中的对象、全局函数等)时,将一些参数传递给对象,同时将一个调用者可以访问的函数地址传递给该对象。这个函数就是调用者和被调用者之间的一种通知约定,当约定的事件
mysql常见的三种循环方式:while、repeat和loop循环。还有一种goto,不推荐使用。 1.while循环 -- 设置mysql分隔符为//,也就意味着,当遇到下一个//时,整体执行SQL语句 DELIMITER // DROP PROCEDURE if EXISTS ‘test’; # 如果存在test存储过程则删除 CREATE procedure test(
简单的封装了一下,有很多不完善的地方,很多细节未考虑进去。 client代码 unit ClientMainFormUnit; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, System.Win
#新建库create database bigdata;use bigdata;#新建表deptcreate table dept(id int unsigned primary key auto_increment,deptno mediumint unsigned not null default 0,dname varchar(20) not null default "",loc varchar(13) not null default "")engine=