请教文件拷贝
<div style="FONT-SIZE: 14px;">请教各位大侠:请将这段VB代码改编成Delphi的<br/>Private Sub Command1_Click()<br/> Dim a As String, b As String<br/> Dim f As FileSystemObject<br/> Set f = CreateObject("Scripting.FileSystemObject")<br/> a = "c:\wmz\*.*": b = "c:\wmz1"<br/> f.CopyFile a, b, False<br/>End Sub</div>
页:
[1]