Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[5594] [질문] Edit에 금액 표시하기
hy50814 [ ] 1666 읽음    1999-01-26 19:57
안녕들 하신지요!

제가 궁금한 것은..

Edit에 금액을 입력한 후에 콤마를 삽입하고 싶습니다.

예를 들어서

'90000'이라고 입력하면 '90,000'이라고 콤마를 삽입하고 싶습니다.

저는 Edit의 Exit이벤트를 사용해서

procedure TCustomerForm.EditGigupExit(Sender: TObject);
begin
If EditGigup.Text<>'' then
EditGigup.text:=FormatFloat('###,###,###,###,##0',strToint(EditGigup.text));
end;

문제는 처음에는 잘 되어지지만 수정을 위해서 2번째 사용을 하면 에러가 발생하지요

StrTOint부분에서 '콤마'가 에러로 발생합니다.

해결방법 좀 알려주십시요..

MaskEdit로 사용하는 방법은 없는지도..

전에 3.0용으로된 금액출력용 컴포넌트는 사용한 적이 있지만 4.0용으로
된것은 없는지요..




+ -

관련 글 리스트
5594 [질문] Edit에 금액 표시하기 hy50814 1666 1999/01/26
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.