Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[12818] 완전 초보입니다. 소스코드 받은 것이 있는데 문의드립니다.
smag [smagia] 1396 읽음    2009-07-24 20:43
업무와 관련해서 40여페이지에 달하는 소스코드를 받아 공부하고 있습니다. 이곳에 있는 오브젝트파스칼관련 자료를 통해서 공부하며 해석하고 있습니다만, 아직 요원해 보입니다.

소스코드 중 문의 드릴 내용이 다음과 같습니다.

procedure TForm1.Button1Click(Sender: TObject);

var
  Liste: TStringList;
  Zeile,s: string;
begin
  Liste := TStringList.Create;
  try
    GetDir(0, s);
    Liste.LoadFromFile(s+'\'+Edit8.Text+'.txt');
    ShowMessage(Liste[0]);

    M:= StrToFloat(Liste[2]);
    C:= StrToFloat(Liste[3]);

      finally
    Liste.Free;

end;
end;

여기서 begin 내의 소스내용에 관해서 문의드립니다.
아직 제 수준에서는 집합을 만드는 것이라 예상이 되어지는데요,
Edit8.Text 에 입력된 이름의 파일을 불러와서 각각의 값을

    M:= StrToFloat(Liste[2]);

로 입력(배당?)하는 것으로 판단하고 있습니다.
우선 이것이 맞는지 문의드리고요,

    GetDir(0, s);
    Liste.LoadFromFile(s+'\'+Edit8.Text+'.txt');
    ShowMessage(Liste[0]);

요 세 문장의 뜻(?), 프로그램상의 목적에 관해 여쭙니다.

비슷한 코드가 저장부분에서도 나오던데
끝에서 Liste.Free; 로 소멸(?)시키는 것이 나오는데 왜 그런지요?

아직 시작한지 얼마 안되어 도움 받을 일이 많은데 부탁드립니다.
버전은 델파이 7이고, 혹시 정보가 부족하다고 일러주시면, 말씀하신 부분을 추가하여 올리겠습니다.

+ -

관련 글 리스트
12818 완전 초보입니다. 소스코드 받은 것이 있는데 문의드립니다. smag 1396 2009/07/24
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.