mysine-CSDN博客

原创控制Windows分辨率

EnumDisplaySettings() 和ChangeDisplaySettings()，function DynamicResolution(X, Y: word): BOOL;var lpDevMode: TDeviceMode;begin Result := EnumDisplaySettings(nil, 0, lpDevMode);if Resul

2001-07-23 09:01:00 750

原创讲述如何开发一个控件,很有价值(七)

SUCCESS - (Nearly...) I think youll agree we are pretty close. There is just a little bit of flicker. This flicker is the SelStart jumping the Cursor position around the text. We need to hide thi

2001-07-20 14:46:00 751

原创讲述如何开发一个控件,很有价值(六)

ASH - Automatic Syntax highlight (Attempt 2) [Please note: I have my Delphi Editor colors set-to the [Ocean] colour speed settings for testing purposes. This setting works well on the default Ric

2001-07-20 14:45:00 775

原创讲述如何开发一个控件,很有价值(四)

To start with I used the Edit1 Control to display the results of all these variables. I then tried manipulating text in the RichEdit to see what values I got. You should do the same. Type slowly in:

2001-07-20 14:44:00 631

原创讲述如何开发一个控件,很有价值(五)

To start with I used the Edit1 Control to display the results of all these variables. I then tried manipulating text in the RichEdit to see what values I got. You should do the same. Type slowly in:

2001-07-20 14:44:00 569

原创讲述如何开发一个控件,很有价值(三)

blank.rtf - empty -so I could see the "plain" header line {/rtf1/ansi/deff0/deftab720{/fonttbl{/f0/fswiss MS Sans Serif;}{/f1/froman/fcharset2 Symbol;}{/f2/froman Times New Roman;}} {

2001-07-20 14:43:00 903

原创讲述如何开发一个控件,很有价值(二)

would be divided up into: proceduretsKeyWord tsSpaceTForm1tsIdentifier.tsSymbolFormCreatetsIdentifier(tsSymbolSendertsIdentifier:tsSymbolT

2001-07-20 14:42:00 689

原创讲述如何开发一个控件,很有价值

The Unofficial Newsletter of Delphi Users by Robert Vivrette Automatic Syntax Highlighting Using a RichEdit Control (Updated with fixes) Part 1 of "A Tale of Two RichEdits" by Jon Hogan

2001-07-20 14:40:00 839

原创 Delphi 程序员代码编写标准指南 (六）

七、构件 7.1 用户自定义构件在标准构件中命名出来的构件的名称同在“类类型”部分定义中的一样定义成一个类类型，不同的是它们有一个3字符的指示前缀，这个前缀可以表示公司、个人或其它实体。例如，一个为Delphi 4开发者指南编写的时钟构件的名称定义为： TddgClock = class(TComponent)注意，那三个前缀字符是小写的。 7.2

2001-07-19 09:11:00 873

原创 Delphi 程序员代码编写标准指南 (五）

五、窗体和数据模板 5.1 窗体 5.1.1 窗体类型命名标准窗体类型的取名应能表达使用该窗体的目的。类型定义应加以前缀T。前缀后面跟随着描述性的名字。最后，应加以Form后缀来描述名字。例如，一个“关于”的窗体的类型的名字应为： TAboutFrom = class(TForm);主窗体的定义为： TMainForm = c

2001-07-19 09:10:00 719

原创 Delphi 程序员代码编写标准指南 (四）

四、文件 4.1 工程文件 4.1.1 命名工程文件应取个描述性的名字。例如，Delphi 4开发者指南错误管理器的工程名字是：DDGBugs.dpr。一个有关系统信息的程序的名字就应象 SysInfo.dpr。 4.2 窗体文件 4.2.1 命名一个窗体文件的取名应可以描述使用该窗体的目的，并加以后缀Frm。例如，一个“关于”的窗体的文

2001-07-19 09:09:00 741

原创 Delphi 程序员代码编写标准指南 (三）

3.5 类型 3.5.1 大写约定如果类型的名字是保留字，那么它应全部小写。Win32 API类型通常全部大写，并且你必须遵循在Windows.pas或其他API单元中的详细类型名称的约定。对于其他变量名字，地一个字母应为大写，而其他字母应错落有致。下面是一些例子： var MyString : string; //保留字

2001-07-19 09:08:00 694

原创 Delphi 程序员代码编写标准指南 (二）

一、序言本文档详述了在Delphi 4开发者指南下进行编程的代码编写标准。在通常情况下，本文档遵循“取消”式格式的指引方针，该方针由Borland国际通过一些例外来使用。在Delphi 4开发者指南中包含本文档的目的在于阐述一种方法，通过该方法，开发小组可以在他们所编写的代码中保持一贯的风格。这样做的目的是使在开发小组中的每一个程序员都可以明白其他程序员的代码。这有助于提高代码编写

2001-07-19 09:07:00 722

原创 Delphi 程序员代码编写标准指南

一、序言二、通用源代码格式规则2.1 缩格2.2 页边空格2.3 Begin…End 配对三、Object Pascal3.1 括号3.2 保留字和关键字3.3 过程和函数（例程） 3.3.1 命名/格式化 3.3.2 形式参数 3.3.2.1 格式化 3.3.2.2 命名 3.3.2.

2001-07-19 08:51:00 716

原创特色按钮

每当用到DELPHI自带的控件都感到少了一点什么，形状也好，颜色也好，变化的方式也好，都与自已的项目所需要的标准相差了一些，查阅了一些书籍后发现下面的控件很有可用之处！！！以下是它的源代码：unit DsFancyButton;interfaceuses SysUtils,Windows, Messages, Classes, Graphics, Controls, For

2001-07-13 09:15:00 693

WITH –-小九九算法 t_base AS (SELECT LEVEL AS lv FROM dual CONNECT BY LEVEL <= 9), t_join AS (SELECT a.lv lv_a, b.lv lv_b, to_char(b.lv) || 'X' || to_char(a.lv) || '=' || rpad(to_char(a.lv * b.lv), 2, ' ') AS text FROM t_base a, t_base b WHERE b.lv <= a.lv) SELECT listagg(t_join.text, ' ') within GROUP(ORDER BY t_join.lv_b) AS m99 FROM t_join GROUP BY t_join.lv_a;

2022-08-28

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

mysine的专栏