Shift 是一个集合变量。 type TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble); 也就是说TShiftstate类型有ssShift, ssAlt, ssCtrl, ssLe ...
procedure TForm2.saveDfm; var inStream,outStream:TMemoryStream; begin inStream:=TMemoryStream.Create; outStream:=TMemoryStream.Create; try inStream.Wr ...
Delphi中,自定义消息处理过程与Windows消息处理过程的定义是一样的。1.主用步骤:1>. 首先定义一个消息标识符常量;如:WM_MYMessage = WM_USER+ 5;(标识符常量的取值范围为WM_USER~WM_APP-1) 2>. 在单元文件中定义消息响应过程和消息标识符常量。 ...
分类:
其他好文 时间:
2020-01-09 20:26:38
阅读次数:
78
library frmDll; { Important note about DLL memory management: ShareMem must be the first unit in your library's USES clause AND your project's (select ...
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V ...
分类:
编程语言 时间:
2020-01-07 16:07:31
阅读次数:
84
Borland Delphi 7 Enterprise(企业版)官方下载地址:http://altd.embarcadero.com/download/delphi/d7/english/ent/delphi_7_ent_en.isohttp://altd.embarcadero.com/devsu ...
分类:
其他好文 时间:
2020-01-06 15:04:39
阅读次数:
998
import requests import webbrowser import matplotlib.pyplot as plot from urllib.request import urlopen with open('t1.txt','r')as f: x=f.read().split('\ ...
分类:
其他好文 时间:
2020-01-01 23:51:21
阅读次数:
81
一、下载安装mysql驱动http://mysql.com/downloads/connector/odbc/二、添加adoconnection,adoquery,使用以下连接字符串http://www.connectionstrings.com/mysql#p31adoconnection的属性C ...
分类:
数据库 时间:
2019-12-30 19:47:14
阅读次数:
97
测试环境是:Delphi 6、Oracle、PLSQL 先创建一个模拟测试的数据表,并且添加几条模拟的数据 create table practice(uno varchar(8), uname varchar(20)); insert into practice values ('1', '1') ...
1、安装MySQL ODBC Driver。 2、设置ADO连接MYSQL的连接字符串: Provider=MSDASQL.1;Password=root;Persist SecurITy Info=True;User ID=root;Extended Properties="DATABASE=cl ...
分类:
数据库 时间:
2019-12-30 17:39:49
阅读次数:
219