Q&A
- 간단하지만 헷갈리는 문제.--;
Edit 창의 속성은 string 입니다.
그런데 사용하다 보니 이곳엔 numeric 값만 들어와야 하거든요.
물론 첨부터 currency 타입으로 잡았으면 좋겠지만 그러자면 지금까지 한 모든 소스을
다시 잡아줘야 하는데 것이 너무 방대해서리.~~ -.-;
해서 if 문을 사용해서 그 입력값이 integer값인지 알고자 합니다.
제 경운 if (edit.text < #48)or (edit.text > #58 ) then
이런식으로 해결했습니다.--;;;
간단하고 멋있게 (?) 하는법 있음 알려주세요.^^;
그런데 사용하다 보니 이곳엔 numeric 값만 들어와야 하거든요.
물론 첨부터 currency 타입으로 잡았으면 좋겠지만 그러자면 지금까지 한 모든 소스을
다시 잡아줘야 하는데 것이 너무 방대해서리.~~ -.-;
해서 if 문을 사용해서 그 입력값이 integer값인지 알고자 합니다.
제 경운 if (edit.text < #48)or (edit.text > #58 ) then
이런식으로 해결했습니다.--;;;
간단하고 멋있게 (?) 하는법 있음 알려주세요.^^;
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 김광호
- •
- 2000.04.13 06:45
- 2 COMMENTS
- /
- 0 LIKES
-
좋은날•2000.04.15 01:54김광호 wrote: > 안녕하세요.... > 현재 문제가 급한 상황이 있어서.... > 에러인지 버그인지 구분이 안... -
김광호•2000.04.15 03:35감사합니다. 그럼 Foreign Key로 설정된 부분이 수정된다는 말씀인데 그러면 안되는데..... 수정이 ...
-
- 박성훈
- 2000.04.13 06:12
- 0 COMMENTS
- /
- 0 LIKES
-
- 대원
- •
- 2000.04.13 04:03
- 2 COMMENTS
- /
- 0 LIKES
-
seagod•2000.04.13 04:34대원 wrote: > 제가 델파이를 첨 시작하는데, 개념이 영 안 잡혀서요. > > TForm1.Create(Application)...
-
대원•2000.04.15 01:31답변해 주셔서 정말정말 무지무지 감사합니다. 아무도 알려주는 사람도 없이 혼자 공부하려니 정말 어렵네...
-
- 민은홍
- •
- 2000.04.13 03:16
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.04.13 05:38안녕하세요 하얀까마귀 입니다.. Create View 뷰이름 as 하시구요.. 지금부터는 뷰에 넣어줄 데...
-
- 초보1
- •
- 2000.04.13 03:15
- 3 COMMENTS
- /
- 0 LIKES
-
초보1•2000.04.14 18:33초보1 wrote: 초보자가 올립니다. substring(sojae from 1 for 1) chk, ')를 substring(sojae, 1, 1)...
-
이치형•2000.04.13 03:57초보1 wrote: > 초보자가 올립니다. > > begin > inherited; > with query1 do > begin > ...
-
하얀까마귀•2000.04.13 05:43안녕하세요 하얀까마귀 입니다.. subString의 문법을 보니까 아마 파라독스 같은데.. 맞는지요.. 저...
-
- 파이공주
- •
- 2000.04.13 02:56
- 4 COMMENTS
- /
- 0 LIKES
-
이치형•2000.04.13 04:08파이공주 wrote: > Query에서 자꾸 id하구 pwd를 물어봐요.. > 이거 안 물어보게는 안되나요.. 안녕하...
-
김•2000.04.13 03:02파이공주 wrote: > Query에서 자꾸 id하구 pwd를 물어봐요.. > 이거 안 물어보게는 안되나요.. TData...
-
김진화•2000.04.13 07:44김 wrote: > 파이공주 wrote: > > Query에서 자꾸 id하구 pwd를 물어봐요.. > > 이거 안 물어보게는 안...
-
한호•2000.04.14 01:23반드시 데이터 베이스 컴포넌트를 사용해야만 합니다 이것은 데이터베이스의 보안문제이기 때문입니다 데...
-
- 무드게
- •
- 2000.04.13 02:37
- 2 COMMENTS
- /
- 0 LIKES
-
이치형•2000.04.13 04:19무드게 wrote: > 등록이나.. 청구 같은 일괄적인 처리과정 중에 몇가지 입력내용을 받으려는데.. > > ...
-
하얀까마귀•2000.04.13 05:46안녕하세요 하얀까마귀 입니다.. 음.. 아마도 판넬을 모달폼처럼 사용하고 싶으신것 같은데.. 그건 안될...
-
- 유솔로몬
- •
- 2000.04.13 02:33
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.04.13 05:05안녕하세요. 최용일입니다. 비지니스 로직이란 말은 처음 들었는데요. 혹시나 이게 아닐까 해서 하는 ...
-
- 김진화
- 2000.04.13 02:32
- 0 COMMENTS
- /
- 0 LIKES
-
- 미키마우스
- 2000.04.13 02:31
- 0 COMMENTS
- /
- 0 LIKES
-
- 미키마우스
- 2000.04.13 02:31
- 0 COMMENTS
- /
- 0 LIKES
-
- 홍희석
- 2000.04.13 02:13
- 0 COMMENTS
- /
- 0 LIKES
-
- 강윤환
- •
- 2000.04.13 02:12
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.04.13 05:53안녕하세요 하얀까마귀 입니다... 해결하는 방법은 쿼리의 동작은 스레드로 하는 겁니다.. 이렇게 해야...
-
- yoonts
- •
- 2000.04.13 02:09
- 1 COMMENTS
- /
- 0 LIKES
-
이치형•2000.04.13 05:04yoonts wrote: > 안녕하세요. > > dbf 파일을 프로그램에서 읽어서 > 다시 text 파일로 변환하는 > ...
-
- 곽동엽
- •
- 2000.04.13 02:10
- 1 COMMENTS
- /
- 0 LIKES
Edit 창의 속성은 string 입니다. 그런데 사용하다 보니 이곳엔 numeric 값만 들어와야 하거든요. 물론 첨부터 currency 타입으로 잡았으면 좋겠지만 그러자면 지금까지 한 모든 소스을 다시 잡아줘야 하는데 것이 너무 방대해서리.~~ -.-...-
최용일•2000.04.13 02:18안녕하세요. 최용일입니다. 에디트박스(TEdit)의 OnKeyPress이벤트입니다. procedure TForm1.Edit1Ke...
-
- 민은홍
- 2000.04.13 01:55
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 이빈
- •
- 2000.04.13 01:07
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.04.13 06:22안녕하세요. 최용일입니다. 4/10일자 마이크로소프트 뉴스레더에서 소개한 내용인데요. 한번 방문해 ...
-
- 남궁연
- 2000.04.13 00:38
- 0 COMMENTS
- /
- 0 LIKES
-
- 김지현
- •
- 2000.04.13 00:28
- 1 COMMENTS
- /
- 0 LIKES
-
하얀까마귀•2000.04.13 00:56안녕하세요 하얀까마귀 입니다. 음... 폼 설정에 보시면 positon이 있습니다. 여기 설정에.. po...
에디트박스(TEdit)의 OnKeyPress이벤트입니다.
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in [ '0'..'9', Char(vk_Back) ]) then // vk_Back(#08) = Backspace key
Key := #0;
end;
^^ 항상 즐코하세요.
곽동엽 wrote:
> Edit 창의 속성은 string 입니다.
>
> 그런데 사용하다 보니 이곳엔 numeric 값만 들어와야 하거든요.
>
> 물론 첨부터 currency 타입으로 잡았으면 좋겠지만 그러자면 지금까지 한 모든 소스을
>
> 다시 잡아줘야 하는데 것이 너무 방대해서리.~~ -.-;
>
> 해서 if 문을 사용해서 그 입력값이 integer값인지 알고자 합니다.
>
> 제 경운 if (edit.text < #48)or (edit.text > #58 ) then
>
> 이런식으로 해결했습니다.--;;;
>
> 간단하고 멋있게 (?) 하는법 있음 알려주세요.^^;