龙腾至尊的专栏

1.1、激活var doc,url:Olevariant ;beginurl:='about:blank' ;//或者一个有实际意义的urlWebBrowser1.Navigate2(url);//这样就激活了！end;1.2、写HTML代码var doc:Olevariant ;s:string;begindoc:=WebBrowser1.Document

1.增加字段       alter table docdsp    add dspcode  char(200)  2.删除字段       ALTER TABLE table_NAMEDROP COLUMN column_NAME 3.修改字段类型       ALTER TABLE table_name    ALTER COLUMN column_name new_da

delphi 执行一个外部程序，当外部程序结束后言主程序立即响应我们经常能看到360安全卫士进行windows系统升级时，执行windows升级程序，当升级程序执行完成后，360马上弹出提示框。这样的程序是如何做到的呢？下述代码就能完成！uses shellAPI;procedure TForm1.Button1Click(Sender: TObject);varSEI

以前的代码：  /////////////////////////////////////// ShowWindow(Application.Handle,SW_HIDE); /////////////////////////////////////// 在 Delphi2007/2009/2010 已经失效！ 原因是 Delphi 在 Form 改写代码，在工程文件中多了：  /

用百分比比较两个字符串(彼此之间有多少相似度)返回 byte 类型，从 0 到 100%functionCompareStringsInPercent(Str1, Str2: string): Byte;type  TLink = array[0..1] of Byte;var  tmpPattern: TLink;  PatternA, PatternB: arr

Delphi打开网址链接的几种方法：1：用默认浏览器打开,uses shellapiprocedure TForm1.Button2Click(Sender: TObject);beginShellExecut(Application.Handle, nil, 'http://cy03wqh.blog.163.com', nil, nil, SW_SHOWN