Q&A

  • .txt 불러오기에서.......
.TXT 로 저장하는것은 어려운 점이 아니였는데 Load시에 문제가

있더라구여!! 문제인즉....

화면에서 Combobox1, Combobox2, Edit2, 세개의 입력을 화일하나에

입력을 넣었는데 불러올때는 각각에 입력한 내용을 각각불러서 넣어야합니다.

쉽게 풀어서 문자면...

Combobox1                         Combobox2                          Edit

  Stage_1                                  A001                        사용자 입력받음
  Stage_2                                  A002
                                               A003
                                                  .
                                                  .
                                                  .
                                                A010
이렇게 .txt에 저장을 하고 불러올때 각각에 넣은 값을 넣어야합니다.
예) Stage_1에 " 1 "일 저장하고 Combobox2에 " A001 "을 저장하고
     Edit에 입력받은 1000을 텍스트에 이어서 저장하면
     내용은 "    1A0011000   " 이렇게 저장이 될겁니다. 그렇다면 불러오기할때
     첫째자리인 1은 Combobox1 에서 Stage_1을 선택해야하며
   둘째자리 부터다섯번째인 A001은 Combobox2 에서 A001이 선택되어야하며
     여섯번째부터인아홉번째인 1000은 Edit박스에 나와야합니다.
-------------------------------------------------------------------
아니면 간단하게 자리수 잘라서 입력할수 있는 것도 좋을듯합니다...
글구 메모장에서 다음줄을 불러올수 있는 함수나 코딩도 알고 싶구여!

---적어보니 무쟈게 복잡하네..... 이해가 가실려나 모르겠네요!!  ^^;
                          
2  COMMENTS
  • Profile
    하기 2002.11.22 23:08
    Txt에 들어간 자료들이 규칙적이라면 다음을 따르면 될것 같군요

    procedure TForm1.Button1Click(Sender: TObject);
    var
        FH : textFile;
        Line : String;
    begin
        try
            AssignFile(FH, 저장된 Text경로와 Text명);  
    //(ex  AssignFile(FH, 'c:test.Txt');  
            Reset(FH);

            while not Eof(FH) do begin
                Readln(FH, Line);
                ComboBox1.Items.Add(copy(Line,1,1));
                ComboBox2.Items.Add(copy(Line,2,4));
                Edit.Text(copy(Line,6,4));
            end;
        finally
            CloseFile(FH);
        end;
    end;

    이런식으로 하면 될것 같은데... Edit는 저장할 수 있는 곳이 없으니..
    쩌비...
    임시적으로 StringGrid를 Create시키고 하심이 옳으실것 같기는 하군요
    그럼 즐코 하세요
  • Profile
    이추형 2002.11.22 21:05

    일단 .TXT 로 저장시 구분자를 하나 주시고요
    텍스트를 하나하나 읽어가면서 각각의 ITEM에 추가하는 방법이
    좋을듯합니다.