当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: 今天在s8s8上看到一个帖子,http://www.s8s8.net/forums/index.php?showtopic=13495人气极旺,大家用不同的语言和脚本来下载一个网站上的MM照片,有shell脚本的,c语言的,C++的,vbs的,php的,perl的,还有java的和C#的,可谓...
 

 

    摘要: 简单介绍一下vcl消息传递 vcl除了封装了windows消息外,还有自己自定义的一些消息。windows的消息以wm_ 开头,可以参考delphi help里带的windows sdk 或msdn, 在messages.pas文件中也可以看得到. vcl的一些内部消息,一般是以cm_ cn_ cb_ 等开头的,在controls.pas文件中也可以看得到,具体的使用可以查看delph......
    摘要: 怎样编写自己的vcl控件 用过delphi的朋友们,大概对delphi的最喜欢delphi的不是他的强类型的pascal语法,而是强大的vcl控件,本人就是一位vcl控件的爱好者。 vcl控件的开源,给我们带来了享之不尽的好处。不像以前的ole控件以及activex,你完全可以重写delphhi标准控件,而且网上这方面的资源很多。 关于如何编写vcl控件,和多delphi的书籍里都......


用Delphi实现整个网站图片的极速下载
上一页   ...    procedure button1click(sender: tobject);

    procedure button2click(sender: tobject); 【程序编程相关:Delphi的下一个版本:Diamond

【推荐阅读:传说中的DELPHI9--Diamond

  private 【扩展信息:MediaPlayer9 ActiveX

    { private declarations }

    rgetmm:tthread;

    procedure getmmthread(mmurl,destpath,subj:string);

  public

    { public declarations }

  end;

var

  form1: tform1;

implementation

{$r *.dfm}

//下载过程

procedure tform1.button1click(sender: tobject);

var

  i,j:integer;

  subi,subj,cururl,destpath:string;

  strm:tmemorystream;

begin

  memo1.lines.clear;

  //建立目录

  if not directoryexists(girlpic) then

    mkdir(girlpic);

  try

    strm :=tmemorystream.create;

    for i:=1 to offi do

    begin

      for j:=1 to offj do

      begin

        if (i<10) then

          subi:=00+inttostr(i)

        else if (i>9) and (i<100) then

          subi:=0+inttostr(i)

        else subi:=inttostr(i);


...   下一页
 ·format的用法    »显示摘要«
    摘要: format是一个很常用,却又似乎很烦的方法,本人试图对这个方法的帮助进行一些翻译,让它有一个完整的概貌,以供大家查询之用: 首先看它的声明:function format(const format: string; const args: array of const): string; overload;事实上format方法有两个种形式,另外一种是三个参数的,主要区别在于它是线程安全的,......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE