开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 多显示器编程 > 查看源码
Unit1.dfm
资源名称：第6章 多线程编程.rar　[点击查看]
上传用户：gyjjlc
上传日期：2013-03-29
资源大小：2124k
文件大小：7k
源码类别：

多显示器编程

开发平台：

C++ Builder

Unit1.dfm：源码内容
  1. object Form1: TForm1
  2.   Left = 195
  3.   Top = 106
  4.   Width = 544
  5.   Height = 391
  6.   Caption = '网页中广告删除程序'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Icon.Data = {
  14.     0000010001002020100000000000E80200001600000028000000200000004000
  15.     0000010004000000000080020000000000000000000000000000000000000000
  16.     0000000080000080000000808000800000008000800080800000C0C0C0008080
  17.     80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFF
  18.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  19.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7CCCCFFFFFFFFFFFCFFFFFFFFFFFFFFCC
  20.     CCCCCCFFFFFFFFCCFFFFFFFFFFFFFFCCCCCCCCCCFFFFFFCCCFFFFFFFFFFFFCCC
  21.     CCCCCCCCCFFFFCCCCFFFFFFFFFFFFCCCCCCCCCCCCCFFFCCCCCFFFFFFFFFFFCCC
  22.     CCCCFFFFFCFF7CCCCCFFFFFFFFFFFCCCCCCFFFFFFFFFCCCCCCCFFFFFFFFFFCCC
  23.     CCCCFFFFFFF7CCCCCCCFFFFFFFFFFFCCCCCCFFFFFFFCCCCCCCCCFFFFFFFFFFCC
  24.     CCCCCFFFFFFCCCCCCCCCFFFFFFFFFFCCCCCCCCFFFFFFCCCCCCCFFFFFFFFFFFFC
  25.     CCCCCCFFFFFFCCCCCCFFFFFFFFFFFFFCCCCCCCCFFFFF7CCCCCFFFFFFFFFFFFFF
  26.     CCCCCCCCFFFFFCCCCFF7FFFFFFFFFFFFFCCCCCCCCFFFF7CCCFF7CFFFFFFFFFFF
  27.     FFCCCCCCCCFFFFCCFFFFCCFFFFFFFFFFFFFCCCCCCCCCFFFCFFFFFCCCFFFFFFFF
  28.     FFFFCCCCCCCCFFFFFFFFFCCCCFFFFFFFFFFFFCCCCCCCCFFFFFFFFFCCCCFFFFFF
  29.     FFFFFFCCCCCCCCCCCFFFFFCCCCFFFFFFFFFFFFFCCCCCCCCCCCFFFFCCCCCFFFFF
  30.     FFFFFFFFCCCCCCCCCCCCCCCCCCCFFFFFFFFFFFFFFFCCCCCCCCCCCCCCCCCFFFFF
  31.     FFFFFFFFFFFCCCCCCCCCCCCCCCFFFFFFFFFFFFFFFFFFFCCCCCCCCCCCCCFFFFFF
  32.     FFFFFFFFFFFFFFFCCCCCCCCCCFFFFFFFFFFFFFFFFFFFFFFFFFCCCCCCFFFFFFFF
  33.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
  34.     0000000000000000000000000000000000000000000000000000000000000000
  35.     0000000000000000000000000000000000000000000000000000000000000000
  36.     0000000000000000000000000000000000000000000000000000000000000000
  37.     000000000000000000000000000000000000000000000000000000000000}
  38.   OldCreateOrder = False
  39.   PixelsPerInch = 96
  40.   TextHeight = 16
  41.   object Label1: TLabel
  42.     Left = 8
  43.     Top = 16
  44.     Width = 42
  45.     Height = 16
  46.     Caption = ' 文件夹'
  47.   end
  48.   object Label2: TLabel
  49.     Left = 8
  50.     Top = 48
  51.     Width = 52
  52.     Height = 16
  53.     Caption = '包含文字'
  54.   end
  55.   object Label3: TLabel
  56.     Left = 8
  57.     Top = 144
  58.     Width = 52
  59.     Height = 16
  60.     Caption = '匹配文件'
  61.   end
  62.   object Label4: TLabel
  63.     Left = 8
  64.     Top = 280
  65.     Width = 3
  66.     Height = 16
  67.   end
  68.   object Memo1: TMemo
  69.     Left = 64
  70.     Top = 40
  71.     Width = 449
  72.     Height = 89
  73.     Lines.Strings = (
  74.       '<!-- Spidersoft WebZIP Banner Ad Insert -->'
  75.       
  76.         '<!-- For removal instructions see:  http://www.spidersoft.com/we' +
  77.         'bzip/help/noads.asp  -->'
  78.       ''
  79.       '<SCRIPT FOR=window EVENT=onload LANGUAGE="JScript">'
  80.       '  initAd();'
  81.       '</SCRIPT>'
  82.       ''
  83.       '<script language="JScript">'
  84.       '<!--'
  85.       ''
  86.       'function initAd() {'
  87.       '  document.all.AdLayer.style.posTop = -200;'
  88.       '  document.all.AdLayer.style.visibility = '#39'visible'#39
  89.       '  MoveLayer('#39'AdLayer'#39');'
  90.       '}'
  91.       ''
  92.       'function MoveLayer(layerName) {'
  93.       '  var x = 10;'
  94.       '  var y = 10;'
  95.       
  96.         '  var diff = (document.body.scrollTop + y - document.all.AdLayer' +
  97.         '.style.posTop)*.40;'
  98.       '  var y = document.body.scrollTop + y - diff;'
  99.       '  eval("document.all." + layerName + ".style.posTop =  y");'
  100.       '  eval("document.all." + layerName + ".style.posLeft = x");'
  101.       '  setTimeout("MoveLayer('#39'AdLayer'#39');", 60);'
  102.       '}'
  103.       ''
  104.       'if (navigator.onLine){'
  105.       
  106.         '  document.write("<div bgcolor=#000000 style='#39'height=70px;'#39'></di' +
  107.         'v>");'
  108.       
  109.         '  document.write("<div id=AdLayer style='#39'position:absolute; widt' +
  110.         'h:100%; height:80px; z-index:20; visibility:hidden;'#39'>");'
  111.       
  112.         '  document.write("<IFRAME SRC='#39'http://www.spidersoft.com/ads/bwz' +
  113.         '468_60.htm'#39' width=100% height=60 marginwidth=0 marginheight=0 hs' +
  114.         'pace=0 vspace=0 frameborder=0 scrolling=no></IFRAME>");'
  115.       '  document.write("</div>");'
  116.       '}'
  117.       ' //-->'
  118.       '</script>'
  119.       ''
  120.       '<!-- /Spidersoft WebZIP Banner Ad Insert -->')
  121.     ScrollBars = ssVertical
  122.     TabOrder = 0
  123.     WordWrap = False
  124.   end
  125.   object Button1: TButton
  126.     Left = 8
  127.     Top = 312
  128.     Width = 177
  129.     Height = 33
  130.     Caption = '查找含有包含文字的文件'
  131.     TabOrder = 1
  132.     OnClick = Button1Click
  133.   end
  134.   object Edit1: TEdit
  135.     Left = 64
  136.     Top = 16
  137.     Width = 289
  138.     Height = 24
  139.     TabOrder = 2
  140.     Text = 'C:WindowsDesktop'
  141.   end
  142.   object Memo2: TMemo
  143.     Left = 64
  144.     Top = 144
  145.     Width = 449
  146.     Height = 161
  147.     ReadOnly = True
  148.     ScrollBars = ssVertical
  149.     TabOrder = 3
  150.     WordWrap = False
  151.   end
  152.   object Button2: TButton
  153.     Left = 208
  154.     Top = 312
  155.     Width = 169
  156.     Height = 33
  157.     Caption = '从文件删除包含文字'
  158.     TabOrder = 4
  159.     OnClick = Button2Click
  160.   end
  161.   object Button3: TButton
  162.     Left = 392
  163.     Top = 312
  164.     Width = 129
  165.     Height = 33
  166.     Caption = '退  出'
  167.     TabOrder = 5
  168.     OnClick = Button3Click
  169.   end
  170.   object Button4: TButton
  171.     Left = 376
  172.     Top = 8
  173.     Width = 57
  174.     Height = 25
  175.     Caption = '浏览'
  176.     TabOrder = 6
  177.     OnClick = Button4Click
  178.   end
  179.   object PBFolderDialog1: TPBFolderDialog
  180.     Flags = [ShowPath]
  181.     NewFolderVisible = True
  182.     NewFolderEnabled = True
  183.     LabelCaptions.Strings = (
  184.       'Default=Current folder:'
  185.       '0009=Current folder:'
  186.       '0406=Valgt mappe:'
  187.       '0407=Ausgew鋒lter Ordner:'
  188.       '0409=Current folder:'
  189.       '0410=Cartella selezionata:'
  190.       '0413=Huidige map'
  191.       '0807=Ausgew鋒lter Ordner:'
  192.       '0809=Current folder:'
  193.       '0810=Cartella selezionata:'
  194.       '0C07=Ausgew鋒lter Ordner:'
  195.       '0C09=Current folder:'
  196.       '1007=Ausgew鋒lter Ordner:'
  197.       '1009=Current folder:'
  198.       '1407=Ausgew鋒lter Ordner:'
  199.       '1409=Current folder:'
  200.       '1809=Current folder:'
  201.       '1C09=Current folder:'
  202.       '2009=Current folder:'
  203.       '2809=Current folder:'
  204.       '2C09=Current folder:')
  205.     NewFolderCaptions.Strings = (
  206.       'Default=New folder'
  207.       '0009=New folder'
  208.       '0406=Ny mappe'
  209.       '0407=Neuer Ordner'
  210.       '0409=New folder'
  211.       '0410=Nuova Cartella'
  212.       '0413=Nieuwe map'
  213.       '0807=Neuer Ordner'
  214.       '0809=New folder'
  215.       '0810=Nuova Cartella'
  216.       '0C07=Neuer Ordner'
  217.       '0C09=New folder'
  218.       '1007=Neuer Ordner'
  219.       '1009=New folder'
  220.       '1407=Neuer Ordner'
  221.       '1409=New folder'
  222.       '1809=New folder'
  223.       '1C09=New folder'
  224.       '2009=New folder'
  225.       '2809=New folder'
  226.       '2C09=New folder')
  227.     Version = '1.40.00.00'
  228.     Left = 496
  229.     Top = 8
  230.   end
  231. end