델파이에서 일반 텍스트파일은 어떻게 읽을까요?

Question

위 질문 그대로델파이에서 txt로 된 파일을 읽고싶습니다.텍스트파일은 그냥 일반 문자열로 되어있고단순히 읽어서 델파이에서 보여주고 싶은데 어떻게할까요?

anonymous · Accepted Answer

안녕하세요?제가 보여드릴 예제는 델파이에서 텍스트파일을읽어서 memo컴포넌트로 보여줬습니다.한번 해보시고 이해안되시면 댓글 달아주세요^^  Memo := TMemo.Create(Self);
  Memo.Parent := Self;
  Memo.Visible := false;
  Memo.WordWrap := false;

sList := TStringList.Create;
  OD := TOpenDialog.Create(Self);
  OD.Filter := 'Text Files(*.txt)|*.txt';

  try
    if OD.Execute then
    begin
      if ExtractFileName(OD.FileName) <> '다운로드.txt' then //다운로드 파일명이 아니면 실행안함
      begin
        Application.MessageBox('업로드할 파일이 정상적이지 않습니다.','알림',MB_OK);
        Exit;
      end;

      sList.LoadFromFile(OD.FileName);
      Memo.Text := sList.Text;
    end else
    begin  
      Application.MessageBox('업로드가 취소되었습니다.','알림',MB_OK);
      Exit;
    end;
  finally
    FreeAndNil(sList);
    FreeAndNil(OD);
  end;

생활꿀팁

생활꿀팁

델파이에서 일반 텍스트파일은 어떻게 읽을까요?