Q&A

  • [긴급질문]TStringGrid.... + Query...
공룡 님이 올리신 글-----------------------

> xxx 님이 올리신 글-----------------------

> > Query의 내용을 TStringGrid에 뿌려주려고 하는데 잘모르겠습니다.

> > 또,DataGrid와는 어떤 차이점이 있는지 빨리 좀 알려주십시요.

> > 긴급합니다.Please....!

> >

>

> with StringGrid1, Query1 do

> begin

> Close;

> SQL.Clear;

> SQL.Add(' SELECT Field1, Field2, ... FROM TABLE ');

> Open;

> if RecordCount = 0 then ...

> rowCount := RecordCount + 1;

> for i:=1 to RecordCount do

> begin

> Cells[0,i] := FIeldByName('Field1').asString;

> Cells[1,i] := FieldByName('Field2').asString;

> ...

> ...

> Next;

> end;

> end;



현재 위 소스 같은 경우는 결과가 아래와 같이 나옵니다

---------------------------------------------------------

연-단 연-단 연-단 연-단 연-단

---------------------------------------------------------

01 03

01 04

01 05

01 06

.. ..

.. ..

---------------------------------------------------------



정작 제가 원하는 값은...?

---------------------------------------------------------

연-단 연-단 연-단 연-단 연-단

---------------------------------------------------------

01-03 01-04 01-05 01-06 01-07

02-03 02-04 " " "

" " " " "

---------------------------------------------------------

이런 결과값을 얻고 싶은데 다시 한번 알려주시면 감사하겠습니다.

글구, 현재 Rowcount = 5 로 지정해줘서 5칸으로 되어있습니다.

TString 데이타 값이 Query의 값만큼 자동으로 생성되는 방법도 알려주시면 감사하겠습니다.



4  COMMENTS
  • Profile
    바람개비 2001.07.05 21:57
    **
  • Profile
    xxx 2001.07.05 20:55
    제대로 설명을 못드려 죄송합니다...

    다시 한번 질문을 올립니다. 소스는 이렇습니다.



    with StringGrid1, Query1 do

    begin

    Close;

    SQL.Clear;

    SQL.Add(' select lstk_by, lstk_lv from milstk where lstk_flag=0 and lstk_item is null ');

    Open;

    if RecordCount = 0 then

    RowCount := RecordCount + 1;

    for i:=0 to RecordCount do

    begin

    Cells[i,1] := FIeldByName('lstk_by').AsString+'-'+FieldByName('lstk_lv').AsString;



    Next;

    end;



    현재 쿼리는 lstk_bk(열):01~08,lstk_by(연):01~16,lstk_lv(단)01~06....이런식으로 되어 있습니다.(참고: 여기서 창고열의 에디트 박스는 lstk_bk(열):01~08)

    제가 원하는 것은 그림에서와 보는거와 같이 원래 결과문은

    ------------------------------------

    연-단 연-단 연-단 연-단 연-단 연-단

    ------------------------------------

    01-01 01-02 01-03 01-04 01-05 01-06

    02-01 02-02 02-03 02-04 02-05 02-06

    " " " " " "

    16-01 16-02 16-03 16-04 16-05 16-06

    ------------------------------------

    이런 결과를 원합니다.

    한마디로 01(열)-01(연)-01(단)이런식으로 보여지는데 화면상에선

    열을 에디트박스로 move시키고 나머지 연-단은 TStringGrid로 보여지길 원하는

    겁니다.단,창고열의 에디트 박스는 "01"부터 나타나야합니다.









  • Profile
    바람개비 2001.07.05 21:54
    움... 제가 중요하게 생각하는것은 테이블에 어떤형식으로 저장이 되어 있느냐는 것이거든요. 그래야 쿼리문의 형식도 나오고 할테니까요.

    님의 설명대로 제가 이해한것은

    bk,by,lv 순으로

    01,01,03

    01,01,04

    01,02,01

    ...

    08,16,03 이런형식입니다.

    맞나요?



    바라미~



    xxx wrote:

    > 제대로 설명을 못드려 죄송합니다...

    > 다시 한번 질문을 올립니다. 소스는 이렇습니다.

    >

    > with StringGrid1, Query1 do

    > begin

    > Close;

    > SQL.Clear;

    > SQL.Add(' select lstk_by, lstk_lv from milstk where lstk_flag=0 and lstk_item is null ');

    > Open;

    > if RecordCount = 0 then

    > RowCount := RecordCount + 1;

    > for i:=0 to RecordCount do

    > begin

    > Cells[i,1] := FIeldByName('lstk_by').AsString+'-'+FieldByName('lstk_lv').AsString;

    >

    > Next;

    > end;

    >

    > 현재 쿼리는 lstk_bk(열):01~08,lstk_by(연):01~16,lstk_lv(단)01~06....이런식으로 되어 있습니다.(참고: 여기서 창고열의 에디트 박스는 lstk_bk(열):01~08)

    > 제가 원하는 것은 그림에서와 보는거와 같이 원래 결과문은

    > ------------------------------------

    > 연-단 연-단 연-단 연-단 연-단 연-단

    > ------------------------------------

    > 01-01 01-02 01-03 01-04 01-05 01-06

    > 02-01 02-02 02-03 02-04 02-05 02-06

    > " " " " " "

    > 16-01 16-02 16-03 16-04 16-05 16-06

    > ------------------------------------

    > 이런 결과를 원합니다.

    > 한마디로 01(열)-01(연)-01(단)이런식으로 보여지는데 화면상에선

    > 열을 에디트박스로 move시키고 나머지 연-단은 TStringGrid로 보여지길 원하는

    > 겁니다.단,창고열의 에디트 박스는 "01"부터 나타나야합니다.

    >

    >

    >

    >

  • Profile
    xxx 2001.07.05 22:08
    이런형식입니다...

    bk - by - lv

    01 - 01 - 01

    02 - 02 - 02

    03 - 03 - 03

    04 - 04 - 04

    05 - 05 - 05

    06 - 06 - 06

    07 - 07

    08 - 08

    - 09

    - 10

    - 11

    - 12

    - 13

    - 14

    - 15

    - 16

    그러니까 각 필드가 하나씩 연결된 데이타입니다.

    (01-01-01) (01-01-02) (01-01-03) (01-01-04) (01-01-05) (01-01-06)

    (01-02-01) (01-02-02) (01-02-03) (01-02-04) (01-02-05) (01-02-06)

    " " " " " "

    " " " " " "

    " " " " " "

    " " " " " (08-16-06)여기까지..입니다.

    근데 여기서 (01-01-01) (01-01-02) 이 두필트는 제가 쿼리문 자체에서 빠지게 되도록 했습니다.



    • 꼴등
    • 2001.07.05 23:29
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 구창민
      2001.07.06 01:28
      음. ^_^ Sorted 속성을 False로 바꾸면 정렬이 되지 않습니다. 무슨 오해가 있으신듯.. 속성을 Fa...
    • 꼴등
      2001.07.06 03:59
      답변 감사드립니다. 코딩으로 False로 지정해주니까 되네요. 오브젝트 인스펙터에는 분명 False로 되어 ...
    • 구창민
      2001.07.06 01:30
      초보 wrote: > 이거 에러좀 잡아주세요................... DLL의 엑스포트와 임포트 되는 부분과 프로...
    • xxx
    • 2001.07.05 23:20
    • 4 COMMENTS
    • /
    • 0 LIKES
    • Lee
      2001.07.05 23:36
      만약 StringGrid에 타이틀을 갖고있다면 if Query1.RecordCount = 0 then StringGrid1.RowCount := ...
    • 초보
      2001.07.05 23:29
      xxx wrote: > StringGrid는 Query수만큼 count가 자동으로 생성되게 하는 방법을 아시나요? Stringgrid...
    • xxx
      2001.07.05 23:40
      초보 wrote: > xxx wrote: > > StringGrid는 Query수만큼 count가 자동으로 생성되게 하는 방법을 아시나...
    • Lee
      2001.07.06 00:37
      위치 문제일 것 같은데요... RecordCount는 Query가 Open된 후 에 적용됩니다. Query1.Close; Query1....
    • 델초보
    • 2001.07.05 22:11
    • 4 COMMENTS
    • /
    • 0 LIKES
    • Lee
      2001.07.05 23:24
      오류메세지중 "vaild integer value" 메세지는 타입이 틀리므로 나오는 오류입니다. 파라미터 타입이 전...
    • 지나가다.
      2001.07.05 22:23
      필드 타입과 파라미터 타입이 안맞아서 그런것 같네여.... 파라미터를 사용할경우 파라미터 타입을 설정...
    • 델초보
      2001.07.06 00:33
      답변 감사합니다... 그런데... BD의 테이블을 필드타입을 확인햇는데... 자동으로 순번을 부여하는 id(SE...
    • Lee
      2001.07.06 00:47
      insert문장은 모든 필드에 대한 개별적인 data를 주어야하는걸로 알고 있습니다. Update문장은 필요한 필...
    • mallove
    • 2001.07.05 22:02
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 하기
      2001.07.05 22:17
      알리아스를 설정하여 작업을 하시면 아무 폴더나라는 말을 쓰신다면 그때마다 아무 폴더를 알리아스의 Pat...
    • 홍성락
      2001.07.05 22:17
      왕초보 wrote: > 버튼을 눌렀 을때 그리드의 더블클릭 이벤트를 주고 싶은데요.. > 어떻게 해야 하는지 ...
    • 홍성락
      2001.07.05 22:31
      인어공주 wrote: > project - option 에서 auto create form1 만 생성이 되게 하고 > form1에 있는 버튼...
    • 델초보
    • 2001.07.05 20:11
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 바람개비
      2001.07.05 20:22
      아래에 같은 질문을 올린것 같은데, 원하는 명령들을 하나의 배치파일에 넣어서 실행하면 되지 않을까요? ...
    • 하기
      2001.07.05 21:23
      일반적으로 C:Program FilesBorlandDelphi5HelpToolshcw.exe 이 화일을 이용하시면 제작하실수 있답니다....
    • 나이스
      2001.07.05 21:41
      제가 이책을 보면서 하고 있었는데 안나오는것 같아요...^^;; 님의 성실한 답변에도 불구하고 제가 컴파일...
    • 하기
      2001.07.05 22:13
      분명히 제가 그책에서 봤거든요.. delphi 5X(4X인가) Bible에서 Help만드는 방법해서 나왔거든요... MSWo...
    • 나이스
      2001.07.05 23:06
      정말 님의 도움에 감사드립니다.... 이제 형식을 알았으니 다시 작업(???)에 들어갈수 있을것 같네요... ...
    • 아폴론
      2001.07.05 20:01
      인어공주 wrote: > 글을 찾아봐도 제 질문은 너무 쉬운것인지.. > > 글이 올라와 있는게 없어서 이렇게...
    • 무스리
    • 2001.07.05 19:37
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 방문현
      2001.07.06 02:40
      무스리 wrote: > Oracle의 데이타를 ODBC를 이용해 AS400에 insert 하는 데 다음과 같은 에러가 나오는군...
    • 무스리
      2001.07.06 03:33
      답변 잘 보았습니다. 인덱스키에 중복된 값이 들어가면 duplication 에러가 나지요. 지금의 에러는 ...
    • xxx
    • 2001.07.05 19:17
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 바람개비
      2001.07.05 21:57
      **
    • xxx
      2001.07.05 20:55
      제대로 설명을 못드려 죄송합니다... 다시 한번 질문을 올립니다. 소스는 이렇습니다. with StringGrid...
    • 바람개비
      2001.07.05 21:54
      움... 제가 중요하게 생각하는것은 테이블에 어떤형식으로 저장이 되어 있느냐는 것이거든요. 그래야 쿼리...
    • xxx
      2001.07.05 22:08
      이런형식입니다... bk - by - lv 01 - 01 - 01 02 - 02 - 02 03 - 03 - 03 04 - 04 - 04 05 - 05 - 0...