为什么老是出现read语句类型不匹配的错误呢?
procedure TForm1.Button1Click(Sender: TObject);
var c:char;
begin
  if opendialog1.Execute then
  assignfile(temfile,opendialog1.FileName);
  reset(temfile);  while not eof(temfile) do 
  read(temfile,temstr);
  closeFile(temfile);
end;