[教學]比較非文字檔內容是否相同 by aquarius

procedure TForm1.Button1Click(Sender: TObject);
var
fs1, fs2 : TFileStream ;
cBuf1, cBuf2 : array of char ;
iRead : integer ;
begin
fs1:=TFileStream.Create(Edit1.text,fmOpenRead) ;
fs2:=TFileStream.Create(Edit2.text, ..

訪客只能看到部份內容，免費 加入會員

x0