파일처리에는 방법이 여러가지 많지만
간단한 처리에는 TStringList를 이용하는것이
편리하죠.
그리고 String 처리에 대한 몇가지 함수를 이용해보았는데...
도움이 되시길 바랍니다.


var sStringList : TStrings;
    i : Integer;
    sText, sRow, sValue : String;
begin

    sStringList := TStringList.Create;
    try
        sStringList.LoadFromFile(FileName); // 처리하고자 하는 파일의 이름

        for i := 0 to sStringList.Count - 1 do
        begin
            sText := sStringList.Strings[i];
            if sText[1] = '#' then
            begin
                ShowMessage('Section Number : ' +
                                       Copy(sText,2,Length(sText));
            end
            else
            begin
                if Pos(' ', sText) < 2 then continue;
                sRow   := Copy(sText, 1, Pos(' ', sText) - 1);
                sValue := Copy(sText, Pos(' ', sText) + 1, Length(sText));
                ShowMessage('Row : '   + sRow + #13 +
                                       'Value : ' + sValue  );
            end;
        end;
    finally
        sStringList.Free;
    end;

end;

안녕하세요.
위와 같은 일정한 형식의 자료는 레코드를 이용해서 구현할 수 있는 것으로 압니다. 저두 허접한지라 책보다가 알게 됬져. 델파이4의 모든 것(정보문화사)인가 하는 책보면 예제가 나오던데. 올려드리긴 점 머하구. 일단 함 찾아보세요.