Q&A
- 반복되는 문장을 간단히 처리하고 싶은데...
안녕하세요?
폼 안에 여러 개의 EDIT를 사용하고 있습니다.
이 EDIT의 TEXT가 DB에 삽입이 되도록 하고 있습니다.
DB 필드타입에 숫자가 있어 EDIT가 빈 칸으로 남겨지는 경우를
대비해서 zero를 삽입하고 있습니다.
그래서 초기 값으로 EDIT의 TEXT를 zero로 주려고 다음과 같이
사용하고 있습니다.
if Form1.Edit1.text = '' then
Form1.Edit1.text := '0';
if Form1.Edit2.text = '' then
Form1.Edit2.text := '0';
.
.
.
if Form1.Edit10.text = '' then
Form1.Edit10.text := '0';
이렇게 사용해야 될 곳이 한 두 곳, 한 두 폼이 아니라서
반복 작업하기가 힘드네요.
뭐 간단하게 하는 방법없나요?
고수님들의 많은 조언 부탁합니다. 꾸벅.
폼 안에 여러 개의 EDIT를 사용하고 있습니다.
이 EDIT의 TEXT가 DB에 삽입이 되도록 하고 있습니다.
DB 필드타입에 숫자가 있어 EDIT가 빈 칸으로 남겨지는 경우를
대비해서 zero를 삽입하고 있습니다.
그래서 초기 값으로 EDIT의 TEXT를 zero로 주려고 다음과 같이
사용하고 있습니다.
if Form1.Edit1.text = '' then
Form1.Edit1.text := '0';
if Form1.Edit2.text = '' then
Form1.Edit2.text := '0';
.
.
.
if Form1.Edit10.text = '' then
Form1.Edit10.text := '0';
이렇게 사용해야 될 곳이 한 두 곳, 한 두 폼이 아니라서
반복 작업하기가 힘드네요.
뭐 간단하게 하는 방법없나요?
고수님들의 많은 조언 부탁합니다. 꾸벅.
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 한재홍
- •
- 1999.07.16 20:42
- 1 COMMENTS
- /
- 0 LIKES
-
이상준•1999.07.17 02:43한재홍 께서 말씀하시기를... > groupfooter 내에 qrexpr을 사용하여 sum을 구하고 구한 sum을 가지고 > ...
-
- 뽈치
- 1999.07.16 19:15
- 0 COMMENTS
- /
- 0 LIKES
-
- 장일
- •
- 1999.07.16 19:14
- 4 COMMENTS
- /
- 0 LIKES
-
조복기•1999.07.16 19:20안녕하세요..조복기입니다. 델파이안에 포함된 인터베이스는 라이센스에 걸려있습니다.. 배포권이 ...
-
장일•1999.07.16 19:45감사합니다. 그럼 인터베이스는 델파이 프로그램이 깔려 있는 상태에서만 사용을 할수 있나요? 그리고 ...
-
조복기•1999.07.16 20:15안녕하세요..조복기입니다.. 제자리에 인터베이스를 설치하지않아서 설명화일을 볼수가없어 대답을 ...
-
장일•1999.07.16 20:22성실한 답변 정말 고맙습니다. 좋은 날 되세요.
-
- kbna
- 1999.07.16 18:40
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- 1999.07.16 17:45
- 0 COMMENTS
- /
- 0 LIKES
-
- 송재환
- •
- 1999.07.16 12:58
- 2 COMMENTS
- /
- 0 LIKES
-
노력하는이•1999.07.17 00:14송재환 께서 말씀하시기를... > 동일한 이미질 매번 화일에서 읽어 오고 있습니다. 25개 * 7 = 175 개 가...
-
안치봉•1999.07.16 19:18안녕하세요. 제가 알기로는 웬만한 콘트롤들은 다 LoadFromStream 이라는 메쏘드가 있습니다. 우선 ...
-
- 이태호
- •
- 1999.07.16 12:51
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.07.16 19:09안녕하세요. 제가 알기로는 불가능한걸로 알고 있습니다. 대신에 문자열의 처음부터 조사를 해들어가...
-
- 김종성
- •
- 1999.07.16 11:31
- 1 COMMENTS
- /
- 0 LIKES
-
손창근•1999.07.16 18:46안녕하세요.. 오공이 입니다... 김종성님께서 말씀하기는걸 쓰려면 ShellExecute함수을 써야 할거 같네요....
-
- HYUN
- •
- 1999.07.16 09:49
- 1 COMMENTS
- /
- 0 LIKES
-
글쎄요•1999.07.16 19:22HYUN 께서 말씀하시기를... > 이제 델파이 공부를 시작하는 학생입니다. > 그런데 당장 급하게 델파이를...
-
- 박홍석
- •
- 1999.07.16 07:57
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•1999.07.16 09:02박홍석 께서 말씀하시기를... > 안녕하세요. > > TImage컴포넌트에 그림이 있는지 없는지 여부를 체크...
-
-
손창근•1999.07.16 18:38안녕하세요,.. 오공이 입니다.. 소소을 전부 쓰신게 맞다면.... execSql이 빠진거 같네요... 그게 아니...
-
-
- 이용일
- •
- 1999.07.16 05:42
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•1999.07.16 09:24이용일 께서 말씀하시기를... > ListView에서...row가 Select되었는지 어떻게 알수 있나요?/ > 답변 부탁...
-
- 허정수
- •
- 1999.07.16 03:52
- 1 COMMENTS
- /
- 0 LIKES
-
한•1999.07.16 19:28허정수 께서 말씀하시기를... > MS-Sql을 사용하다 다른 사용자명으로 DataBase에 접속을 하려고 하는데 ...
-
- 최진숙
- 1999.07.16 02:54
- 0 COMMENTS
- /
- 0 LIKES
-
- 별이
- •
- 1999.07.16 02:41
- 1 COMMENTS
- /
- 0 LIKES
-
권경부•1999.07.16 10:30카드리더기에는 대표적으로 두가지 타잎이 있습니다. 하나는 많이쓰이는 키보드 입력방식(키보트 포트에 ...
-
- 한근수
- •
- 1999.07.16 02:12
- 1 COMMENTS
- /
- 0 LIKES
안녕하세요? 폼 안에 여러 개의 EDIT를 사용하고 있습니다. 이 EDIT의 TEXT가 DB에 삽입이 되도록 하고 있습니다. DB 필드타입에 숫자가 있어 EDIT가 빈 칸으로 남겨지는 경우를 대비해서 zero를 삽입하고 있습니다. 그래서 초기 값으로 E...-
손창근•1999.07.16 02:36안녕하세요... 오공이 입니다... 다음과 같이 하면 될거 같은데요... 도움이 되었나 모르겠네요... 그럼 ...
-
- 정유라
- •
- 1999.07.16 01:16
- 2 COMMENTS
- /
- 0 LIKES
-
권경부•1999.07.16 10:34천리안에서 이정욱님의 답변입니다. 우선 GetUserName함수가 델파이의 windows.pas에 보시면 정의 되어...
-
정유라•1999.07.16 20:11자세한 답변에 감사드립니다. 그런데 테스트를 해보니 GetUserName Fuction 자체가 윈도우 레지스트리 값...
-
- 정재홍
- •
- 1999.07.16 01:16
- 1 COMMENTS
- /
- 0 LIKES
-
손창근•1999.07.16 02:11안녕하세요... 오공이 입니다... listBox을 생성해서 listBox의 onMouseMove 이벤트가 일어날때 Edit의 값...
-
-
- 박성훈
- •
- 1999.07.16 01:00
- 1 COMMENTS
- /
- 0 LIKES
-
권경부•1999.07.16 10:38SickU.DFM 파일이 깨졌을 수 있습니다. 아니면 다른 델파이 버전에서 작성이 된것이라 맞지 않을 수 도 있...
다음과 같이 하면 될거 같은데요...
도움이 되었나 모르겠네요... 그럼 이만...
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
for i:= 0 to componentCount -1 do begin
if (components[i] is TEdit ) then
begin
if TEdit(Components[i]).text = '' then
TEdit(Components[i]).text := '0';
end;
end;
end;
한근수 께서 말씀하시기를...
> 안녕하세요?
>
> 폼 안에 여러 개의 EDIT를 사용하고 있습니다.
> 이 EDIT의 TEXT가 DB에 삽입이 되도록 하고 있습니다.
> DB 필드타입에 숫자가 있어 EDIT가 빈 칸으로 남겨지는 경우를
> 대비해서 zero를 삽입하고 있습니다.
> 그래서 초기 값으로 EDIT의 TEXT를 zero로 주려고 다음과 같이
> 사용하고 있습니다.
>
> if Form1.Edit1.text = '' then
> Form1.Edit1.text := '0';
> if Form1.Edit2.text = '' then
> Form1.Edit2.text := '0';
> .
> .
> .
> if Form1.Edit10.text = '' then
> Form1.Edit10.text := '0';
>
> 이렇게 사용해야 될 곳이 한 두 곳, 한 두 폼이 아니라서
> 반복 작업하기가 힘드네요.
> 뭐 간단하게 하는 방법없나요?
> 고수님들의 많은 조언 부탁합니다. 꾸벅.