摘要:
//包含控件数: var num: Integer; begin num := Self.ControlCount; ShowMessage('窗体上共有控件: ' + IntToStr(num)); //没有包括不可视控件和panl内的控件 //ShowMessage('Panel1上共有控件: ' + IntToStr(Panel1.ControlCount)); end; ... 阅读全文
摘要:
arr = new Array( //这里加入页号------------- 1,3,5,7,9 //------------------------- ); //var re = /.*\/|\.pdf$/ig; //var filename = this.path.replace(re,""); var re = /\.pdf$/ig; var filepath = this.path.... 阅读全文