Q&A
- Edit에서 입력되는값이 숫자만 입력되게 할려면?
안녕하세요
이제 막 델파이를 시작하는 초보입니다.
혼자서 공부하는데여..
막혀서 질문을 드립니다.
Edit에서 입력되는값이 숫자만 입력되게 할려면
어떻게 해야 하죠..
델파일 기본구문들은 C,JAVA와 많이 틀려서
좀 보기 힘드네여..!
코딩할때 많이 짜증도 나구여
암턴 답변 부탁드립니다.
이제 막 델파이를 시작하는 초보입니다.
혼자서 공부하는데여..
막혀서 질문을 드립니다.
Edit에서 입력되는값이 숫자만 입력되게 할려면
어떻게 해야 하죠..
델파일 기본구문들은 C,JAVA와 많이 틀려서
좀 보기 힘드네여..!
코딩할때 많이 짜증도 나구여
암턴 답변 부탁드립니다.
4
COMMENTS
-
-
폼 Create 설정하는 방법입니다..^^
procedure TForm1.FormCreate(Sender TObject);
begin
Edit1.Text = '0';
SetWindowLong(Edit1.Handle, GWL_STYLE,
GetWindowLong(Edit1.Handle, GWL_STYLE)
or ES_NUMBER);
end;
-
내용 없어요..
-
procedure Tfrom1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
If Not (Key In ['0'..'9']) Then
Key := #0;
end;
라고 하시면 될껍니다.
즐프~~~~
(NOTICE) You must be logged in to comment on this post.
-
- 정경주
- •
- 2004.09.10 02:51
- 4 COMMENTS
- /
- 0 LIKES
안녕하세요 이제 막 델파이를 시작하는 초보입니다. 혼자서 공부하는데여.. 막혀서 질문을 드립니다. Edit에서 입력되는값이 숫자만 입력되게 할려면 어떻게 해야 하죠.. 델파일 기본구문들은 C,JAVA와 많이 틀려서 좀 보기 힘드네여..! ...-
박준철•2004.09.11 01:53function FilterNumber(sNum:string):string; var i : integer; begin Resu...
-
오병주•2004.09.10 03:36폼 Create 설정하는 방법입니다..^^ procedure TForm1.FormCreate(Sender TObject); begin &n...
-
석주현•2004.09.10 07:35내용 없어요..
-
이승민•2004.09.10 03:10procedure Tfrom1.Edit1KeyPress(Sender: TObject; var Key: Char); begin If Not (Key In [...
-
- 김형균
- •
- 2004.09.09 22:36
- 7 COMMENTS
- /
- 0 LIKES
-
김형균•2004.09.10 00:59
-
김형균•2004.09.09 23:48저가 잘못 써서 의미 전달이 잘 되지 않은것 같습니다..소스를 올려 보겠습니다. 저의 의도는 루프를 돌면...
-
김춘경•2004.09.09 23:40쿼리문으로 조건에 해당하는 레코드를 추출해서 하면 됩니다. _SQL := 'select * from T1, T2 where T...
-
이중철•2004.09.09 23:44'select * from T1, T2 where (T1.field1 <> T2.field1 OR T1.field...
-
김춘경•2004.09.09 23:52^^ 온라인상에서 쓰다 보니... 제 의도는 여러 필드중 어느 하나라도 틀리면 셀렉트 하도록 했습니다. ...
-
파멸의슬픔•2004.09.09 23:25소스만 보고 판단했습니다... 이렇게 한번 바꿔 보세요... q1.sql.add('select * from test...
-
이중철•2004.09.09 23:23소스를 봐서는 목적하는것이 무엇인지 잘 모르겠네요 ^^ 먼저 SQL로 해결이 가능하다면 SQL로 하는것이 합...
-
- 문의득
- 2004.09.09 20:58
- 0 COMMENTS
- /
- 0 LIKES
-
- 문의득
- •
- 2004.09.09 20:52
- 1 COMMENTS
- /
- 0 LIKES
-
일그니•2004.09.09 22:02dbnmpntw.dll와 ntwdblib.dll을 path가 걸린 폴더 system같은 곳에 복사해 넣어주십시요. 중복되있을...
-
- 달님
- •
- 2004.09.09 19:40
- 3 COMMENTS
- /
- 0 LIKES
-
이중철•2004.09.09 21:07소나기 님이 답변하신 내용이 맞습니다. 그러나 좀 보완해서 Edit1KeyPress 이벤트에서 아래와 같이 처...
-
석주현•2004.09.09 20:07Edit1KeyPress 이벤트에서 아래와 같이 처리 하는 방법이 있고요. if not (Key in ['0'..'9...
-
모영철•2004.09.09 19:43
-
- 김형균
- •
- 2004.09.09 19:39
- 1 COMMENTS
- /
- 0 LIKES
-
김춘경•2004.09.10 03:26아마도 DB가 작업하는 임시파일이 아닐까요? 님이 의도적으로 만든 파일이 아니라면 지우셔도 무방할 겁...
-
- 김용렬
- •
- 2004.09.09 19:03
- 1 COMMENTS
- /
- 0 LIKES
-
일그니•2004.09.09 22:34StartTransaction은. 현재 작업중인 테이블을 딴넘들이 쓰지 못하게 하는의미로 알고 잇습니다. 작업이...
-
- 온진욱
- •
- 2004.09.09 11:38
- 2 COMMENTS
- /
- 0 LIKES
-
석주현•2004.09.09 14:50"MSComm"으로 검색 해 보시면 아래와 같이 나옵니다. 검색을 해보시고 질문을 해주시는게 좋을 것 같네요....
-
온진욱•2004.09.09 20:16님께서 알려주신 방법을 한번 찾아서 해본적이 있었는데 그때 안되길래 잘못 안건가 하고 지워버렸었는데 ...
-
- Galaxy
- •
- 2004.09.09 04:00
- 3 COMMENTS
- /
- 0 LIKES
-
Galaxy•2004.09.09 18:50안녕하세요 수고 많습니다. 다른 방법은 없을까요? 답변 주신 대로 하니까 . 별 문제는 없는데... 그...
-
오재열•2004.09.09 04:47짧은 생각인데.. 해당 KeyPress가 끝나면 Key값이 반영 되지 않나요? Apple이 먼저 적용되고 Key값 'A'가 ...
-
Galaxy•2004.09.09 05:12
-
- 메니아
- •
- 2004.09.08 23:23
- 1 COMMENTS
- /
- 0 LIKES
-
석주현•2004.09.09 00:15"Process32First" 로 검색해 보세요. Process32First 와 Process32Next 가 같이 쓰이고요. 용...
-
- 김형균
- •
- 2004.09.08 23:00
- 5 COMMENTS
- /
- 0 LIKES
-
김형균•2004.09.09 19:58
-
착한천사•2004.09.09 03:22착한천사 김경록입니다.. 저도 크고 작은 프로젝트를 해 본 적이 있어서.. recordcount의 부정확함을 ...
-
누렁이•2004.09.09 01:21아래 요부분을 for j := 0 to qry.RecordCount -1 do begin 요렇게 한번 바...
-
nilriri™•2004.09.09 00:36레코드 카운터에 대한 답변은 아니구요.. 잠깐 소스를
-
구창민•2004.09.08 23:15안녕하세요.. Query.FetchAll ; 한번 해보시구요.. 그래도 안된다면 COUN...
-
- 여한구
- 2004.09.08 20:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 우용우
- •
- 2004.09.08 19:19
- 1 COMMENTS
- /
- 0 LIKES
-
㉳㉥ㅗ㉣ㅐ㉧ㅛ•2004.09.08 21:05근디요 왜 그렇게 쓰실려구... 혹시 아나요 그 이유를 알면 다른 방법이 생각날지
-
- 허상무
- •
- 2004.09.08 05:35
- 3 COMMENTS
- /
- 0 LIKES
-
석주현•2004.09.08 05:52onMouseMove 에서 Shift 값을 읽어 보면 알 수 있습니다. if ssLeft in Shift then &n...
-
허상무•2004.09.08 20:51답변 감사합니다. 사실 제가 원하는 것은 마우스 상태를 알 수 있는 명령어(System 명령어 포함)를 ...
-
석주현•2004.09.08 21:24음 보통 드래그엔 드롭을 할때 오토메틱으로 하지 않는것으로 알고 있습니다. 왜냐면 제가 말씀드린 ...
-
- 고락춘
- •
- 2004.09.08 03:30
- 3 COMMENTS
- /
- 0 LIKES
-
고락춘•2004.09.08 22:28제목처럼 소나기님, 닐리리님 답변감사합니다. 두분께서 알려주신 방법대로 하니 처리가 되네요 원인...
-
석주현•2004.09.08 08:00복잡하게 하지 마시고 if FindComponent('frm_Delivery') = nil then &...
-
nilriri™•2004.09.08 04:53Action := caFree; 를 써주신다고 해서 메모리에서 해제가 안됩니다. 해서 If ActiveMDI...
-
- 고진중
- 2004.09.08 03:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 바부팅
- •
- 2004.09.08 00:24
- 2 COMMENTS
- /
- 0 LIKES
-
이중철•2004.09.08 03:09음 제가보기에는 윈속스레드가 계속 생성되었거나 S/W내의 유사 스레드가 계속 생성되어 결국 L4계층이나 ...
-
파멸의슬픔•2004.09.08 01:28우선 하신 말씀중에 10중 8,9번은 정상적인 재부팅조차 제대로 되지 않는다고 하셨습니다... 정상적으로 ...
-
- 김현철
- •
- 2004.09.08 00:14
- 1 COMMENTS
- /
- 0 LIKES
-
nilriri™•2004.09.08 01:57http://www.qusoft.com/delphilegacy.html http://www.qusoft.com/ordering.html 참고하세요... ...
-
- ㉳㉥ㅗ㉣ㅐ㉧ㅛ
- •
- 2004.09.07 21:23
- 2 COMMENTS
- /
- 0 LIKES
-
꿈의대화•2004.09.08 02:36.
-
㉳㉥ㅗ㉣ㅐ㉧ㅛ•2004.09.08 18:19그럼 ODBC 말구 BDE의 정보는요... 오라클로 alias를 잡은 DB의 IP를 알수는 없을까요?
-
- 최동석
- •
- 2004.09.07 20:34
- 4 COMMENTS
- /
- 0 LIKES
-
정찬희•2004.09.08 00:32직접 만드셔야 할듯... function getHostFilePath: string; var buf: array[1..1024] of ...
-
이상국•2004.11.04 16:44wind98 에서는 c:\windows 에 위치하므로.. 약간의 추가 라인이 필요할 듯 합니다.
-
최동석•2004.09.08 00:50답변 감사드립니다. 그런데 아래의 function을 사용하면 windows98에서는 안될것 같습니다. 보통 OS에 ...
-
정찬희•2004.09.08 06:38답글쓰면서도 좀 찜찜하긴 했어요...^^
var
i : integer;
begin
Result := '';
if Length(sNum) > 0 then
begin
for i := 1 to Length(sNum) do begin
case sNum[i] of
'0'..'9','.','-' : Result := Result + sNum[i];
end;
end;
end;
if Result = '' then Result := '0';
end;
전 이렇게 함수를 만들어 쓰고 있어요
괜히 다른 컴포넌트 가져놓으면 다른 컴에서 환경잡기 힘드니까
현재것에서 만들어 쓰는거죠