Q&A

  • 배열에서염...제발 도와주세요...벌써 이틀째...
스트링그리드에서 열은 10열, 행은 최대 20행까지 될수 있구요...

행은 유동적입니다...

그리드에서 입력한 값을 1차원배열에 넣었다가 디비로 다시 저장시키는 부분을

하고 있는데요...제가 배열은 이번에 처음으로 해보고 있습니다...

이틀동안 머리 쥐어짜면서 했는데, 잘안되네요...이젠 배열이 무서워지려고 합니다...

더 두려워지기전에 이렇게나마 고수님들께 도움을 얻고 싶어서 글을 올립니다.

자료실을 찾아봐도 제가 원하는 답이 없더군요...

제발 부탁합니다...엉엉...지금은 회사가 아니라서 아래 자료는 제대로 적었는지 모르겠

지만, 제가 하다가 막힌 부분을 생각나는 대로 적었습니다...

그럼, 즐거운 하루되세요...



var

ipsu : array[0..200] of string;

i, j, k : Integer;

begin

for i :=0 to 행.RowCount -1 do

begin

for j :=0 to 열.ColCount -1 do

begin

//이부분에서 배열에 값을 넣어야합니다...

배열 := 그리드.Cells[j,i];

end;

end;



//여기에서는 배열에 들어간 값을 어떤 변수에 넣은후 디비로 저장합니다...

for k := 0 to 배열의 크기 do

begin

변수 := ipsu[k];

end;



end;

3  COMMENTS
  • Profile
    자유지역 2001.12.04 06:46
    지나가는 나구넹...ㅜ,ㅜ wrote:

    > 스트링그리드에서 열은 10열, 행은 최대 20행까지 될수 있구요...

    > 행은 유동적입니다...

    > 그리드에서 입력한 값을 1차원배열에 넣었다가 디비로 다시 저장시키는 부분을

    > 하고 있는데요...제가 배열은 이번에 처음으로 해보고 있습니다...

    > 이틀동안 머리 쥐어짜면서 했는데, 잘안되네요...이젠 배열이 무서워지려고 합니다...

    > 더 두려워지기전에 이렇게나마 고수님들께 도움을 얻고 싶어서 글을 올립니다.

    > 자료실을 찾아봐도 제가 원하는 답이 없더군요...

    > 제발 부탁합니다...엉엉...지금은 회사가 아니라서 아래 자료는 제대로 적었는지 모르겠

    > 지만, 제가 하다가 막힌 부분을 생각나는 대로 적었습니다...

    > 그럼, 즐거운 하루되세요...

    >

    > var

    > ipsu : array[0..200] of string;

    > i, j, k : Integer;

    > begin

    > for i :=0 to 행.RowCount -1 do

    > begin

    > for j :=0 to 열.ColCount -1 do

    > begin

    > //이부분에서 배열에 값을 넣어야합니다...

    > 배열 := 그리드.Cells[j,i]; <--------------- 이부분



    에서 배열 첨자는 어떻게 변경하셨는지 알아 할 것 같아염.. 보통 이런 식으론 사용 안하는데.. 배열 첨자를 변경시키는 변수는 어디에도 보이지 않는 군여..



    > end;

    > end;

    >

    > //여기에서는 배열에 들어간 값을 어떤 변수에 넣은후 디비로 저장합니다...

    > for k := 0 to 배열의 크기 do

    > begin

    > 변수 := ipsu[k];

    > end;

    >

    > end;



    제가보기엔 2차원 배열을 써야 할것 같은데.... 자세하게 적어야 답변을 할 수 있을것 같네염...

  • Profile
    지나가는 나구넹...ㅜ 2001.12.04 06:57
    우선 답변해주셔서 감사하구용...

    저도 아래와 같이 했다가 영~~~ 아닌것 같아서...

    배열을 char로 바꾸고...



    var

    ipsu : array[0..200] of char;

    s : String;

    begin

    for i :=0 to 행.RowCount -1 do

    begin

    for j :=0 to 열.ColCount -1 do

    begin

    s := 그리드.Cells[j,i];

    strPCopy(ipsu, s);

    end;

    end;

    end;

    이렇게 했더니, 몬가가 들어가는것 같더라구요...

    근데, 배열에 있는 값을 불러오려는데 Access Violation error가 나더라구용...

    배열을 첨부터 공부해야겠다는 생각은 들지만, 시간이 넘 촉박하거든요...

    이번주 안으로 배열과 관련된 화면만 10본이 나와야하거든요...

    배열에 관한 책이나 참고서라도 있음 답글 달아주세요...감사함돠...

  • Profile
    자유지역 2001.12.04 07:07
    지나가는 나구넹...ㅜ,ㅜ wrote:

    > 우선 답변해주셔서 감사하구용...

    > 저도 아래와 같이 했다가 영~~~ 아닌것 같아서...

    > 배열을 char로 바꾸고...

    >

    > var

    > ipsu : array[0..200] of char;

    > s : String;

    > begin

    > for i :=0 to 행.RowCount -1 do

    > begin

    > for j :=0 to 열.ColCount -1 do

    > begin

    > s := 그리드.Cells[j,i];

    > strPCopy(ipsu, s); <------- 이부분에서 에러가 나는 것 같은데...

    필요 없는 부분입니다.

    > end;

    > end;

    > end;

    > 이렇게 했더니, 몬가가 들어가는것 같더라구요...

    > 근데, 배열에 있는 값을 불러오려는데 Access Violation error가 나더라구용...

    > 배열을 첨부터 공부해야겠다는 생각은 들지만, 시간이 넘 촉박하거든요...

    > 이번주 안으로 배열과 관련된 화면만 10본이 나와야하거든요...

    > 배열에 관한 책이나 참고서라도 있음 답글 달아주세요...감사함돠...



    먼저 배열에 관한 책은 따로 나와 있는 것은 없구여.. 보통 프로그램 기본서나 입문서에는 배열부분이 자세히 설명 되어 있습니다.



    그리드에는 어떤값이 드러가나염?

    그리구 위와 같이 하려면, s[1], s[2] 해도 해당 값을 확인 할 수 가 있습니다...