说明: 一个小程序,var OldFilename: string; begin OldFilename := ChangeFileExt(dlgOpen.FileName, '.nc'); if dlgOpen.Execute then begin edtDXF_Filename.Text := dlgOpen.FileName; if (Trim(edtGNC_Filename.Text) = '') or (edtGNC_Filename.Text = OldFilename) then edt
<hzcisco> 上传 | 大小:23kb