用OpenDialog1
if opendialog1.Execute then
path:=opendialog1.FileName;
AssignFile(f, path);
Reset(f);
readln(f, str);
这样些,读数据
现在不用OpenDialog1,换用DriveComboBox1,DirectoryListBox1,FileListBox1组合
该怎么写呢?
if opendialog1.Execute then
path:=opendialog1.FileName;
AssignFile(f, path);
Reset(f);
readln(f, str);
这样些,读数据
现在不用OpenDialog1,换用DriveComboBox1,DirectoryListBox1,FileListBox1组合
该怎么写呢?
begin
AssignFile(f, filelistbox1.FileName);
Reset(f);
readln(f, str);
CloseFile(f);
end;