Q&A
- keypress이벤트에서....이벤트가 안먹어여...
procedure Tfrm_itemall.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then
begin
q_custord.Locate('Cust_no',Edit2.Text,[loPartialKey]);
key := #0;
end;
end;
위와 같이 코딩을 해줬는데....브레이크 포인트 설정하고 실행하면...if (3라인)까지는 오는데 그 밑에 begin에 있는거는 그냥 건너 뛰거든여....? 원인을 모르겠어여...
참고로 q_custord는 쿼리 콤포넌트구여...에디트박스에서 엔터치면 locate함수를 실행하게 되는건데....이상하게 안되여....혹시 원인을 아시는분.....꾸벅..
begin
if key = #13 then
begin
q_custord.Locate('Cust_no',Edit2.Text,[loPartialKey]);
key := #0;
end;
end;
위와 같이 코딩을 해줬는데....브레이크 포인트 설정하고 실행하면...if (3라인)까지는 오는데 그 밑에 begin에 있는거는 그냥 건너 뛰거든여....? 원인을 모르겠어여...
참고로 q_custord는 쿼리 콤포넌트구여...에디트박스에서 엔터치면 locate함수를 실행하게 되는건데....이상하게 안되여....혹시 원인을 아시는분.....꾸벅..
2
COMMENTS
-
keypreview를 true로 주고 해보세요. -
잘 되는데요... -_-;
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then
begin
showmessage('Key Values : Enter');
end;
end;
(NOTICE) You must be logged in to comment on this post.
-
- finale
- •
- 2001.06.13 01:29
- 1 COMMENTS
- /
- 0 LIKES
-
명탁•2001.06.28 08:33Select Distinct OJ_Sang from OutJepum Where OJ_OutDate = :JDate OJ_OutDate 타입 아마도 timestamp...
-
- 어린왕자
- 2001.06.13 01:10
- 0 COMMENTS
- /
- 0 LIKES
-
- 3107
- •
- 2001.06.13 00:52
- 1 COMMENTS
- /
- 0 LIKES
-
마으미•2001.06.13 09:45테이블 스페이스에 할당된 공간을 전부 사용해서 뜨는 말입니다. 테이블 스페이스 영역(공간 확보)을 늘려...
-
- 속터져~
- 2001.06.13 00:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 난 초보
- 2001.06.13 00:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 김민경
- •
- 2001.06.13 00:31
- 1 COMMENTS
- /
- 0 LIKES
-
김하늘•2001.06.13 10:50아래 답변은 텍스트파일형태가 이런 형태여야 합니다. 무조건 탭문자를 구분자로 했을때... 123 탭문...
-
- 초보맨
- •
- 2001.06.13 00:01
- 1 COMMENTS
- /
- 0 LIKES
-
장순석•2001.06.13 03:48초보맨 wrote: > 디비에 있는 자료를 트리뷰로 보이기 위한 코드입니다... > 근데 second code부분의 코...
-
- 이용범
- 2001.06.12 23:45
- 0 COMMENTS
- /
- 0 LIKES
-
- vilot
- 2001.06.12 23:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보델피언
- 2001.06.12 23:28
- 0 COMMENTS
- /
- 0 LIKES
-
- 김동수
- •
- 2001.06.12 23:18
- 2 COMMENTS
- /
- 0 LIKES
procedure Tfrm_itemall.Edit2KeyPress(Sender: TObject; var Key: Char); begin if key = #13 then begin q_custord.Locate('Cust_no',Edit2.Text,[loPartialKey]); key := #0; end; end; 위와 같이 코딩을 해줬는데....브레이크 포인트 ...-
써니•2001.06.13 20:17keypreview를 true로 주고 해보세요.
-
neps•2001.06.13 00:24잘 되는데요... -_-; procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if...
-
- 이선경
- •
- 2001.06.12 22:46
- 1 COMMENTS
- /
- 0 LIKES
-
마으미•2001.06.13 10:07CommandText는 애플 서버쪽에서 CommandText옵션을 True로 하고 클라이언트에서는 Sql.Command...
-
- 구이
- •
- 2001.06.12 23:18
- 1 COMMENTS
- /
- 0 LIKES
-
neps•2001.06.13 00:24StringList 를 이용하세요. 랜덤값 결과를 StringList.IndexOf 를 이용해서 값이 들어있는지 확인하세요....
-
- 찬이
- •
- 2001.06.12 21:45
- 5 COMMENTS
- /
- 0 LIKES
-
델사랑•2001.06.12 22:40INSERT INTO table명 ( 필드명 ) Select 필드명 from 테이블명 이렇게사용하면 되지요.. 예를 들어...
-
파도랑•2001.12.11 00:47오라클을 사용하신다면... -_-;; (MS SQL 같은 DB두 될거구요... 파라독스같이 서브쿼리 안되는 DB에선 안...
-
서철기•2001.06.13 00:38파라 독스도 서브쿼리 먹습니다. 당근 위의 님이 말슴하신대로 되구요.. 단 필드 타입이 정확히 일치...
-
찬이•2001.06.12 22:41훔...지금 파라독스 쓰고 있습니다. 정말 이렇게 하면 간단할건데..파라독스에서 통하는 방법... 꼭 이러...
-
하기•2001.06.12 23:36그냥 처음부터 읽어서 옮겨 버리면 되죠... DBGrid를 잠시 죽이고... While not Table.Eof do begin ...
-
-
델사랑•2001.06.12 22:44프로그램 삭제 코딩은 하셨나요 Query1.Close; Query1.Sql.Clear; Query1.Sql.Add('DELETE FROM u...
-
왕초보•2001.06.13 01:47문제는 제생각에... 그런것 갔다야.. 그리드에다.. Query컴포넌트를 올려 놨는데.. sql문장을 쓰니가......
-
하기•2001.06.12 23:40아마도 Query에 UpdateSQL을 사용하지 않으셨나 궁금하군요... 삭제부분은 Query.Delete / Navigater Butt...
-
-
- 김상면
- 2001.06.12 20:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 한반도
- 2001.06.12 20:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 김광재
- •
- 2001.06.12 20:24
- 2 COMMENTS
- /
- 0 LIKES
-
마으미•2001.06.13 09:53긁적.. 긁적.. 말 그대로 인거 같네염.. 키 값이 중복 되여서 나는 메세지인데염.. coding시 SQL문이 혹...
-
김광재•2001.06.13 20:06먼저 답변감사합니다. 지금 이 문제 가지고 3일을 헤매고 있습니다. 꼭 코딩을 해서 나는 오류는 아니구...
-
- 김정우
- 2001.06.12 20:19
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보
- •
- 2001.06.12 20:15
- 2 COMMENTS
- /
- 0 LIKES
-
Lynian•2001.06.12 20:44초보 wrote: > 버튼이벤트가 실행중에서 조건이 맞으면 폼종료이벤트를 부르려고 하는데 > 어떻게 해야 ...
-
김상면•2001.06.12 20:43procedure TForm1.Button1Click(Sender: TObject); begin if 조건 then begin Close; // 이렇...
