会编程的请进～～ 谁会编程？请进
\u4f1a\u7f16\u7a0b\u8bf7\u8fdb\u5efa\u8bae\u4eceC\u8bed\u8a00\u5b66\uff0cC\u8bed\u8a00\u638c\u63e1\u4e86\u4e4b\u540e\uff0c\u5176\u4ed6\u50cfC++,C#\uff0cJAVA\u5c31\u5f88\u7b80\u5355\u4e86\u3002
\u7528\u8001\u8c2d\u7684\u4e66\u8fdb\u884c\u5b66\u4e60\uff0c\u81ea\u5b66\u4e5f\u6210\uff0c\u7ecf\u5e38\u4e0a\u673a\u81ea\u5df1\u7f16\u5c0f\u7a0b\u5e8f\u3002
\u4e13\u4e1a\u672f\u8bed\u770b\u4e0d\u61c2\u7684\u8bdd\u53ef\u4ee5\u767e\u5ea6\u4e4b\uff0c\u6216\u8005\u5728\u8bba\u575b\u91cc\u8bf7\u6559\u5927\u867e\u4eec\u3002
\u521a\u63a5\u89e6C\u80af\u5b9a\u5f88\u75db\u82e6\uff0c\u4f46\u5c31\u50cf\u90a3\u5973\u4eba\u751f\u5b69\u5b50\u4e00\u6837\uff0c\u4e4b\u540e\u4f1a\u5f88\u6709\u6210\u5c31\u611f\uff0c\u6162\u6162\u6765\uff0c\u7ecf\u5e38\u4e0e\u4eba\u591a\u4ea4\u6d41\uff0c\u53d8\u6210\u662f\u56e2\u961f\u6d3b\u52a8\uff0c\u4f46\u662f\u8981\u81ea\u5df1\u6709\u5b9e\u529b\u522b\u4eba\u624d\u4f1a\u4e0e\u81ea\u5df1\u5408\u4f5c\u3002
\u52a0\u6cb9\uff01
\u521a\u5f00\u59cb\u5c31\u7528\u5fae\u8f6f\u7684VC6.0\u5427\uff0c\u7528VISUAL STDIO 2005,\u6216\u8005vs2008\u5c31\u66f4\u597d\u4e86\u3002DEV-C++\u4e5f\u884c\uff0c\u7b49\u5230\u81ea\u5df1\u7fbd\u7ffc\u591f\u4e30\u7684\u8bdd\uff0c\u81ea\u5df1\u505a\u7f16\u8bd1\u5668\uff0c\u563f\u563f\uff0c\u52a0\u6cb9\u54e6~
\u5efa\u7acb\u4e00\u4e2a\u6279\u5904\u7406
\u8f93\u5165 start 1.ts
\u4f9d\u6b64\u7c7b\u63a8\u628a\u5168\u5199\u597d
\u6267\u884c\u4e00\u4e0b\u5c31\u884c
附上超级猛料上摘来的原代码,呵呵,大致意思看看就明白了,DELPHI写的,改成C/C++很方便的,动手做做看吧
至于原作者嘛...对不起了,上面没写...
unit mgr;
interface
uses
Windows, Messages, SysUtils, Classes, Forms,
StdCtrls,shlobj, Controls, Dialogs,shellapi;
type
TForm1 = class(TForm)
GroupBox1: TGroupBox;
Button1: TButton;
OpenDialog1: TOpenDialog;
SaveDialog1: TSaveDialog;
Button3: TButton;
GroupBox2: TGroupBox;
ListBox1: TListBox;
procedure Button1Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure SaveDialog1CanClose(Sender: TObject; var CanClose: Boolean);
procedure ListBox1DblClick(Sender: TObject);
procedure FormDestroy(Sender: TObject);
private
{ Private declarations }
fstream1:tfilestream;
fstream2:tfilestream;
list:tstrings;
len:tstrings;
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
const
flen=136192; //请注意修改这儿的长度
type
FILE_INFO=record
filename:array[0..MAX_PATH] of char;
len:integer;
end;
function SelectDirectory(handle:hwnd;const Caption: string; const Root: WideString;out Directory: string): Boolean;
var
lpbi:_browseinfo;
buf:array [0..MAX_PATH] of char;
id:ishellfolder;
eaten,att:cardinal;
rt:pitemidlist;
initdir:pwidechar;
begin
result:=false;
lpbi.hwndOwner:=handle;
lpbi.lpfn:=nil;
lpbi.lpszTitle:=pchar(caption);
lpbi.ulFlags:=BIF_RETURNONLYFSDIRS+BIF_EDITBOX;
SHGetDesktopFolder(id);
initdir:=pwchar(root);
id.ParseDisplayName(0,nil,initdir,eaten,rt,att);
lpbi.pidlRoot:=rt;
getmem(lpbi.pszDisplayName,MAX_PATH);
try
result:=shgetpathfromidlist(shbrowseforfolder(lpbi),buf);
except
freemem(lpbi.pszDisplayName);
end;
if result then
begin
directory:=buf;
if length(directory)<>3 then directory:=directory+';
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
info:FILE_INFO;
i:integer;
buf:array[0..4096] of byte;
s:integer;
begin
if savedialog1.Execute then
if opendialog1.Execute then
begin
try
copyfile(pchar(paramstr(0)),pchar(savedialog1.FileName),false);
fstream1:=tfilestream.Create(pchar(savedialog1.FileName),fmopenreadwrite);
fstream1.Seek(flen,soFromBeginning);
for i:=0 to opendialog1.Files.Count-1 do
begin
strpcopy(info.filename,extractfilename(opendialog1.files.strings[i]));
fstream2:=tfilestream.Create(opendialog1.Files.Strings[i],fmopenread);
info.len:=fstream2.Size;
fstream1.Write(info,sizeof(info));
while fstream2.Position<>fstream2.Size do
begin
s:=fstream2.Read(buf,sizeof(buf));
fstream1.Write(buf,s);
end;
fstream2.Free;
end;
finally
fstream1.Free;
end;
end;
end;
procedure TForm1.Button3Click(Sender: TObject);
var
f:textfile;
info:FILE_INFO;
i:integer;
buf:array[0..4096] of byte;
s:integer;
count,b:integer;
dir:string;
begin
if selectdirectory(handle,'选择输出文件夹','',dir) then
try
fstream1:=tfilestream.Create(paramstr(0),fmShareDenyWrite);
fstream1.Seek(flen,soFromBeginning);
while fstream1.Position<>fstream1.Size do
begin
fstream1.Read(info,sizeof(info));
count:=0;
assignfile(f,dir+info.filename);
rewrite(f);
closefile(f);
fstream2:=tfilestream.Create(dir+info.filename,fmopenwrite);
fstream2.Size:=0;
i:=info.len div sizeof(buf);
for b:=1 to i do
begin
s:=fstream1.Read(buf,sizeof(buf));
fstream2.Write(buf,s);
inc(count,s);
end;
s:=fstream1.Read(buf,info.len-count);
fstream2.Write(buf,s);
fstream2.Free;
end;
finally
fstream1.Free;
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
var
info:FILE_INFO;
begin
list:=tstringlist.Create;
len:=tstringlist.Create;
try
fstream1:=tfilestream.Create(paramstr(0),fmShareDenyWrite);
fstream1.Seek(flen,soFromBeginning);
while fstream1.Position<>fstream1.Size do
begin
fstream1.Read(info,sizeof(info));
list.Add(inttostr(fstream1.position));
len.Add(inttostr(info.len));
listbox1.Items.Add(info.filename);
fstream1.Seek(info.len,soFromCurrent);
end;
finally
fstream1.Free;
end;
if listbox1.Items.Count>0 then button3.Enabled:=true else button3.Enabled:=false;
end;
procedure TForm1.SaveDialog1CanClose(Sender: TObject;
var CanClose: Boolean);
var
f:integer;
begin
f:=filecreate(savedialog1.FileName);
if f<=0 then
begin
MessageBox(handle,'不能选择输出到该文件！',pchar(application.Title),MB_OK+MB_ICONerror);
canclose:=false;
end;
fileclose(f);
end;
procedure TForm1.ListBox1DblClick(Sender: TObject);
var
path:array[0..max_path] of char;
filename:string;
f,b,s,count:integer;
buf:array[0..4096] of char;
begin
if button3.Enabled=false then exit;
gettemppath(Max_path,path);
filename:=path+listbox1.Items.Strings[listbox1.itemindex];
fstream1:=tfilestream.Create(paramstr(0),fmShareDenyWrite);
f:=filecreate(filename);
fileclose(f);
count:=0;
fstream2:=tfilestream.Create(filename,fmopenwrite);
fstream1.Seek(strtoint(list.Strings[listbox1.ItemIndex]),sofrombeginning);
f:=strtoint(len.Strings[listbox1.itemindex]) div sizeof(buf);
for b:=1 to f do
begin
s:=fstream1.Read(buf,sizeof(buf));
fstream2.Write(buf,s);
inc(count,s);
end;
s:=fstream1.Read(buf,strtoint(len.Strings[listbox1.itemindex])-count);
fstream2.Write(buf,s);
fstream2.Free;
shellexecute(handle,'open',pchar(filename),'','',sw_show);
fstream1.Free;
end;
procedure TForm1.FormDestroy(Sender: TObject);
var
i:integer;
path:array[0..max_path] of char;
filename:string;
begin
list.Free;
len.Free;
gettemppath(Max_path,path);
for i:=0 to listbox1.Items.Count-1 do
begin
filename:=path+listbox1.Items.Strings[i];
deletefile(filename);
end;
end;
end.
太难了
我的能力有限
不是已经有"文件分割器之类"的软件吗??
10分不够哦,以前在学校时用Delphi做过类似的东东
这难度太高了，我试试，你把联系方法补充在里面
这么难的问题,在这里问.又给那点分
绛旓細浼欽AVA缂栫▼璇疯繘!!!鍐欎竴涓繍琛岀▼搴,灏嗙敤鎴蜂粠閿洏涓婅緭鍏ョ殑鍗佽鏂囧瓧瀛樺叆鏂囦欢銆 probab | 娴忚1199 娆 |涓炬姤 鎴戞湁鏇村ソ鐨勭瓟妗堟帹鑽愪簬2017-12-16 13:37:57 鏈浣崇瓟妗 Java婧愮▼搴:import java.io.*;import java.util.*;public class yurenjie { public static void main(String args[]){ try{ Scanner scan ...
绛旓細R鏄渾寮х殑鍗婂緞锛孖鍜孠 涓鑸笉甯哥敤鐨勩傚渾寮缂栫▼鐨涓ょ鏍煎紡锛欸02/G03 X Z I K F 锛涙垨鑰匞02/G03 X Z R F 锛涳紝濡傛灉鑳界敤R鏍煎紡缂栫▼灏介噺涓嶈鐢↖銆並鏍煎紡锛屽洜涓篒銆並鐨勪綅缃渶瑕佽绠椼侷銆並鐨勭‘瀹氭槸杩欐牱鐨勶細鏄渾蹇冪浉瀵逛簬鍦嗗姬璧风偣鐨勫潗鏍囧硷紝鍋囪浣犲湪鍦嗗姬璧风偣寤虹珛涓涓潗鏍囩郴锛孖銆並灏辨槸鍦嗗績鐐瑰湪杩欎釜鍧愭爣...
绛旓細F 锛涳紝濡傛灉鑳界敤R鏍煎紡缂栫▼灏介噺涓嶈鐢↖銆並鏍煎紡锛屽洜涓篒銆並鐨勪綅缃渶瑕佽绠椼侷銆並鐨勭‘瀹氭槸杩欐牱鐨勶細鏄渾蹇冪浉瀵逛簬鍦嗗姬璧风偣鐨勫潗鏍囧硷紝鍋囪浣犲湪鍦嗗姬璧风偣寤虹珛涓涓潗鏍囩郴锛孖銆並灏辨槸鍦嗗績鐐瑰湪杩欎釜鍧愭爣绯讳腑鐨勪綅缃紝I瀵瑰簲鐨勬槸X鏂瑰悜锛孠瀵瑰簲鐨勬槸Z鏂瑰悜锛岃繖涓窛绂绘槸瑕佽绠楃殑銆
绛旓細Java婧愮▼搴忥細import java.io.*;import java.util.*;public class yurenjie { public static void main(String args[]){ try{ Scanner scan = new Scanner(System.in);StringBuffer buffer = new StringBuffer();//瀛楃涓茬紦鍐插尯 String temp;System.out.println("璇疯緭鍏10琛屽瓧绗︼細");for(int i...
绛旓細鎴戣涓哄彲浠ュ厛瀛︿範涓涓媝ascal锛岃繖涓瑷姣旇緝涓ヨ皑锛岄傚悎鍒濆鑰呫俻ascal瀹冭绉颁负鏁欏璇█锛岀粨鏋勪弗璋紝涓嶅儚C璇█閭ｄ箞鐏垫椿锛屾槗浜庣悊瑙ｅ拰瀛︿範銆 鐒跺悗鍙互缁х画瀛︿範C璇█锛岃繖涓瑷姣旇緝鐏垫椿銆傛湁浜唒ascal鐨勫熀纭锛屽湪杩涜C璇█缂栫▼灏变笉浼氬洜涓篊璇█鐨勭伒娲昏屾湁闂 銆傚悗闈㈢殑灏卞彲浠ュ涔燰C浠涔堢殑浜嗐侰璇█鐨勪功鎺ㄨ崘璋旦寮虹殑锛...
绛旓細1.缂栫▼璇█鍒嗗绉.灏辨槸鏍规嵁浠栦滑鐨勭壒鐐规潵鍒嗙殑锛岀幇鍦ㄧ紪绋嬭瑷涓嶄粎浠呮槸瀹氫箟涓绉嶈瑷锛岃繕瑕佹湁濂界殑 寮鍙戠幆澧冦傚vb鍜宒elphi閮芥湁寰堝ソ鐨勭晫闈紝鑰寁c鏇撮傚悎绯荤粺杞欢鐨勫紑鍙戯紝鑰宩ava閫備簬缃戠粶鍜岃法骞冲彴 鐨勮蒋浠剁殑寮鍙戯紝鑰宩avascript鍜寁bscript绛夐備簬缃戦〉鍜岀畝鍗曠殑缂栫▼锛岀悊瑙ｄ粬浠幓鍒殑鏂规硶灏辨槸瀛︿範 浠栦滑.鍦ㄥ涔犱腑鍙戠幇鍖哄埆...
绛旓細y=-4*x*x*x+3.6*x*x+1.7*x-2.8;scanf("%d",&x);杩欎袱鍙ュ啓棰犲掍簡锛屽嚱鏁颁笉鍙兘鎸変綘鎯崇殑锛岀煡閬搚鐨勬柟绋嬶紝浣犵粰鍑簒瀹冨氨鍥炲ご甯綘璁＄畻y銆傚嚱鏁版槸鎸変功鍐欓『搴忔墽琛岀殑锛岄櫎闈炴湁璺宠浆璇彞锛屽惁鍒欏畠鏄笉浼氬洖澶寸殑銆
绛旓細for (int i=; i<arrary.length(); ++i){ if (array[i] > max) max = array[i];if (array[i] < min) min = array[i];} 鑷充簬杈撳叆杈撳嚭閭ｄ簺浠ｇ爜灏辫嚜宸卞啓鍚р︹︾浜岄亾棰 public class Student { private int classNo; //鐝彿 private int stuNo; //瀛﹀彿 private String name;priv...
绛旓細鍥犱负x--鏄厛璋冪敤鍚庤嚜鍑.璋冪敤鐨勬椂鍊檟鍙笉鍙,涔熷氨鏄x--<5涓哄亣,鎵浠ヤ笉鎵цprintf("%d", x); 鑰屾槸鎵цelse printf("%d", x++);浣嗘槸鍓嶄竴娆¤皟鐢ㄥ悗x鑷噺涓娆″彉涓4,鍦ㄧ浜屾璋冪敤鐨勬椂鍊檟鍊间粛涓4,鎵浠ヨ緭鍑虹殑x鍊间负4,浣嗘槸鎵ц浜唀lse printf("%d", x++);涔嬪悗x 鐨勫煎氨鍙樹负5浜 ...
绛旓細,1,fp);sizeof(int)琛ㄧず浣犲啓鍏ョ殑涓鍧楃殑澶у皬锛屼綘鐢ㄧ殑鏄竴涓猧nt澶у皬銆1琛ㄧず浣犺鍐欏叆鐨勫潡鐨勬暟鐩傛樉鐒跺湪浣犳満鍣ㄤ笂涓涓猧nt鏄4涓瓧鑺傦紝鑰宎rr鐨勭被鍨嬫槸char *锛屼竴涓猚har鏄1涓瓧鑺傦紝鎵浠ヤ綘鍐欏叆4涓瓧鑺傚ぇ灏忕殑鏁版嵁鏃跺氨浼氬啓鍏ュ洓涓瓧绗︺傚鏋滀綘瑕佸啓鍏ュ叏閮ㄥ瓧绗︼紝鏀规垚 fwrite(&arr,sizeof(char),10,fp);...
