静态数组的定义方法 //1. 标准方法： var MyArr: array[0..10] of Integer; //定义静态数组 -------------------------------------------------------------------------------- //2. 可以使用非0下标： var MyArr: array[9..10...
使用delphi2007，安装quickreport后，在使用quickreport时，编译提示： F1026 File not found: 'QuickRpt.dcu' 导致编译无法通过，当然就无法运行了。 解决方法： Tools-options-Libraty-win32,添加quickrepotr安装...
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtrls, SHDocVw; type TForm1 = class(TForm) WebBrowser1: TWebBrowser; Button1: TButton; Edit1: TEdit; ListBox1: TList...
消息，就是指Windows发出的一个通知，告诉应用程序某个事情发生了。例如，单击鼠标、改变窗口尺寸、按下键盘上的一个键都会使Windows发送一个消息给应用程序。消息本身是作为一个...
一. 如何初始化一个TreeView？ 弄一个窗口，放上一个TreeView和一个Button，分别取名为TV1和Btn1。如果需要 在每个节点前有个图，请在窗口上放上一个ImageList，取名为ImageList1，双击 它，加...
inc有两种用法: 一个是inc(integer)，就是加1 比如 i := 100; inc(i); 就是i变为101 另一个是inc(integer,integer)就是加n 比如 i:=100; inc(i,50); 就是i变成150 --------------------------------- Dec是递减函数 i:=1...
Delphi中的split函数 procedure TForm1.Button1Click(Sender: TObject); var s1:TStringList; begin s1:=split('11111111:2222:33333:44444',':'); Memo1.Lines.AddStrings(s1); s1.Free; end;function split(s,s1:string):TStringList; begin Result:=TS...
function QuickPos(const Substr, S: WideString; MatchesIndex: Integer = 1): Integer; function QuickPosBack(const Substr, S: WideString; MatchesReverseIndex: Integer = 1): Integer; 主要用途是搜索字符串中第n个Substr。 经过测试，...
1.VarArrayCreate()和VarArrayOf()这两个常用就不说了 2.VarArrayRedim()函数能修改variant数组的最高限。 3.VarArrayDimCount()函数返回Variant数组的维数， 4.VarArrayLowBound()和VarArrayHighBound()函数分别返回...
SetWindowPos 函数功能：该函数改变一个子窗口，弹出式窗口式顶层窗口的尺寸，位置和Z序。子窗口，弹出式窗口，及顶层窗口根据它们在屏幕上出现的顺序排序、顶层窗口设置的级别最...