Q&A

  • 디비그리드에서...

안녕하십니까??

디비그리드의 Row를 선택해서 그 값을 에디트에다

뿌려줄려고 하는데...

프로그램을 실행시키면 선택도 하지 않았는데 그리드에 리스트된 값중

제일 밑에 있는 값이 자동으로 나오더라구요

소스는 이렇습니다.

procedure TForm2.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
If gdFocused in State Then
  form1.Edit1.Text := DM.Query4.fieldbyname('item_code').ASstring;
  form1.combobox1.Text := DM.Query4.fieldbyname('item_name').ASstring;
end;

알아보시겠죠..

처음에 실행시키면 item_code값은 나오지 않는데 item_name값을 자동으로 나오고요

그리고 item_code값은 선택된값이 나오는데 item_name값은 한단계 늦어여

그러니깐 다른 Row가 선택되었는데도 item_name값은 이전 값을 가지고 있고

한번더 클릭하면 다시 돌아오더라구요

답변 부탁드립니다...

그럼 이만...
3  COMMENTS
  • Profile
    성더기 2002.09.17 19:45
    OnDrawColumnCell 이벤트보다는 쿼리나 테이블 컴포넌트의 AfterScroll에 코딩을 하시는게 더 낳을듯합니다

    OnClick이나 OnKeyPress에 코딩해두 되지만 이경우 스크롤이 되어두
    값이 안바뀌니까요..

  • Profile
    김상수 2002.09.17 20:11

    procedure TDM.Query5AfterScroll(DataSet: TDataSet  );
    begin
      If gdFocused in State Then
      form1.Edit1.Text := DM.Query4.fieldbyname('item_code').ASstring;
      form1.combobox1.Text := DM.Query4.fieldbyname('item_name').ASstring;
    end;

    님이 하라는 데로 했거든요...Query에 AfterScroll 이벤트에 코딩했는데..

    에러가 나더라구요

    프로시져 부분에 선언하는것 좀 갈쳐주세요

    무식이 죄랍니다..

    그럼 이만...

  • Profile
    김상수 2002.09.18 18:42
    • 김상수
    • 2002.09.17 18:31
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 성더기
      2002.09.17 19:45
      OnDrawColumnCell 이벤트보다는 쿼리나 테이블 컴포넌트의 AfterScroll에 코딩을 하시는게 더 낳을듯합니다...
    • 김상수
      2002.09.17 20:11
      procedure TDM.Query5AfterScroll(DataSet: TDataSet  ); begin   If gdFocused i...
    • 김상수
      2002.09.18 18:42
    • 델사랑
    • 2002.09.17 18:29
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 레인
    • 2002.09.17 14:28
    • 2 COMMENTS
    • /
    • 0 LIKES
    • 박상윤
      2002.09.21 19:31
      초보시라면 설명하기 힘듭니다... 특히 장치설정부분은 show중에서도 어려운 부분에 속합니다. 다만 말...
    • 레인
      2002.10.02 11:38
      님의 답변 우선 감사드립니다.. 저 또한 Sound부분이 어려워 글을 올렸었는데.. 님 말대로 API에서 함 찾...
    • 미소나눔
      2002.09.17 07:35
      palette 에 Dialog 버면은 컴포넌트 있어용.. OpenDialog1.Execute; SaveDialog1.Execute; ^^;
    • 최용일
      2002.09.17 05:53
      안녕하세요. 최용일입니다. 흠~ 텍스트파일이라면.... TStringList를 쓰는것두 나쁘지 않겠네요... v...
    • 스말(^___^)
      2002.09.17 06:49
      안녕하세요? 아래말고 StrList에 미리 데이터를 넣는 작업이 필요한건지여? 제가 초짜라..TStringList를 ...
    • 미소나눔
      2002.09.17 06:58
      파일을 만드셔야죠.. ^^; c:MyData.txt 쩝 ^^;
    • 스말(^___^)
      2002.09.17 07:05
    • 미소나눔
      2002.09.17 07:29
    • 최용일
      2002.09.17 05:56
      안녕하세요. 최용일입니다. 그냥 1분만 셋팅하면 되지 않나요? Interval = 1000 * 60 으로... 타이머...
    • 이종원
    • 2002.09.17 04:17
    • 3 COMMENTS
    • /
    • 0 LIKES
    • KDDG_ZZOM
      2002.09.17 04:23
      query1.open; 위에 Query1.ParamByName('Name').AsString := Name; 이케 해야되는거 아닌가요? 즐프...
    • 이종원
      2002.09.17 04:30
      감사합니다... 잘되는군요... 다른 질문 하나더 할께요... 일치하지 않는 값을 넣고 검색버튼을 클...
    • KDDG_ZZOM
      2002.09.17 05:10
      그거는 업무에 맞게 처리를 하면 될것같네요... 제일쉬은게 쿼리 오픈했을때 Query1.RecordCount가 0보...
    • goodlsw
    • 2002.09.17 04:08
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2002.09.17 06:01
      안녕하세요. 최용일입니다. HTML헬프라면 별달리 설치할게 없습니다. 걍 헬프파일 클릭하면 될테니까요....
    • 최용일
      2002.09.17 06:09
      안녕하세요. 최용일입니다. 쩝~ 폼생성하는 API함수는 CreateWindow인데요... 그런데, 굳이 API로 해...
    • 김영재
    • 2002.09.17 03:12
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2002.09.17 06:12
      안녕하세요. 최용일입니다. 메모(TMemo)컴포넌트는 WordWrap속성이 기본으로 True고 라벨(TLabel)컴포넌...
    • 김형환
      2002.09.17 17:49
    • ji
    • 2002.09.17 03:21
    • 0 COMMENTS
    • /
    • 0 LIKES
    • jslove
    • 2002.09.17 03:15
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 김수경
      2002.09.17 03:41
      Full로 설치한 후 ...ExamplesAppsThreads에 (C:Program FilesBorlandCBuilder5ExamplesAppsThreads) ...
    • 신강섭
      2002.09.17 03:11
      에디트컴포넌트의 이벤트에서 onkeypress()라는 이벤트를 더블클릭해서 함수를 생성하세요 그런담에 그안...
    • 이성찬
      2002.09.17 03:13
      ex) 0.5   1) #.###  =====> .5      2) 0.### &nb...
    • 박현식
    • 2002.09.17 02:55
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 신강섭
      2002.09.17 03:05
      var      x : _SYSTEMTIME; begin      GetLocalTime(x); &n...
    • 송병석
    • 2002.09.17 02:54
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 조덕진
      2002.09.24 03:57
      API에 대해서는 잘 모르는 허접입니다만, 델파이에 포함된 ShellAPI.pas와 Windows.pas를 보시면 각종 Wi...
    • 신강섭
      2002.09.17 02:44
      WSAGetLastError 를 이용하시면 됩니다. 아래는 설명입니다. WSAGetLastError 함수는 가장 최근에 일...
    • 박승균
    • 2002.09.17 02:21
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 신강섭
      2002.09.17 02:54
      이런말이 도움이 될런지는 모르게씀다 예를 들어 쿼리를 날린다. count := 0; while Not Eof do b...
    • 신강섭
      2002.09.17 02:33
      일단 설치가 완료되셨다면 설치한 컴포넌트의 위치를 델파이한테 등록을 해주어야 합니다. 메뉴->To...
    • 스말(^___^)
      2002.09.17 02:43
      ^________^