Q&A
- [문의] if 문의 조건식을 간단히 하는 법... 알려주심 감사...
질문 하나 할께요..
만일 조건식이 여러개일때 어떻게 간단히 할수 있어요?
예를 들면
if (a = 'aaa') or (a = 'bbb') or (a = 'ccc') or (a ='ddd') then
any_procedure()
else
another_procedure();
위와 같은 문장을 혹시 다음과 같이 하는 방법이 없나요?
if a = ('aaa' or 'bbb' or 'ccc' or 'ddd') then
any_procedure()
else
another_procedure();
반복적인 a 를 계속 쓸려니 무식한 것 같아서요....
도움 부탁 드립니다.
만일 조건식이 여러개일때 어떻게 간단히 할수 있어요?
예를 들면
if (a = 'aaa') or (a = 'bbb') or (a = 'ccc') or (a ='ddd') then
any_procedure()
else
another_procedure();
위와 같은 문장을 혹시 다음과 같이 하는 방법이 없나요?
if a = ('aaa' or 'bbb' or 'ccc' or 'ddd') then
any_procedure()
else
another_procedure();
반복적인 a 를 계속 쓸려니 무식한 것 같아서요....
도움 부탁 드립니다.
3
COMMENTS
-
-
StrPos 함수를 써보세요~
if StrPos('aaabbbcccddd', PChar(a) <> nil then
any_procedure()
else
another_procedure();
이것도 몰라요.. wrote:
> 질문 하나 할께요..
>
> 만일 조건식이 여러개일때 어떻게 간단히 할수 있어요?
>
> 예를 들면
>
> if (a = 'aaa') or (a = 'bbb') or (a = 'ccc') or (a ='ddd') then
> any_procedure()
> else
> another_procedure();
>
> 위와 같은 문장을 혹시 다음과 같이 하는 방법이 없나요?
> if a = ('aaa' or 'bbb' or 'ccc' or 'ddd') then
> any_procedure()
> else
> another_procedure();
>
> 반복적인 a 를 계속 쓸려니 무식한 것 같아서요....
> 도움 부탁 드립니다.
>
-
쩝... 델에선 안돼는 걸루 알구 있는뎅....
단순히 소스에 뽀다구가 안난다는 개념이라면
다음과 같이 배열을 함 이용해 보시졍... ㅡ.ㅡ;; 물론 별루 지만..
무지많은 조건식이라면.... ㅡ.ㅡ
var
tmp : Array[0..3] of string;
a : string;
i : integer;
begin
tmp[0] := 'aaa';
tmp[1] := 'bbb';
tmp[2] := 'ccc';
tmp[3] := 'ddd';
for i := 0 to 3 do begin
if a = tmp[i] then
요기
else
요기
end;
쩝 답변을 해놓구도.. 이렇게 할필요가 있을까라는 생각이 드네염... ㅡ.ㅡ;;
조건식에서 사용될 변수값이 무지많다면 혹시 모르지만... ㅡ.ㅡ;;
그럼 지나가다가..
이것도 몰라요.. wrote:
> 질문 하나 할께요..
>
> 만일 조건식이 여러개일때 어떻게 간단히 할수 있어요?
>
> 예를 들면
>
> if (a = 'aaa') or (a = 'bbb') or (a = 'ccc') or (a ='ddd') then
> any_procedure()
> else
> another_procedure();
>
> 위와 같은 문장을 혹시 다음과 같이 하는 방법이 없나요?
> if a = ('aaa' or 'bbb' or 'ccc' or 'ddd') then
> any_procedure()
> else
> another_procedure();
>
> 반복적인 a 를 계속 쓸려니 무식한 것 같아서요....
> 도움 부탁 드립니다.
>
(NOTICE) You must be logged in to comment on this post.
-
- 환장하겠네.
- 2001.11.29 20:48
- 0 COMMENTS
- /
- 0 LIKES
-
- 델초보
- •
- 2001.11.29 20:31
- 3 COMMENTS
- /
- 0 LIKES
-
^-_-^•2001.11.29 20:35yo' 음..혹시 libmysql.dll의 버전이??? MySQL의 하위버전의 libmysql.dll을 사용할시 그런 메세지를 ...
-
델초보•2001.11.29 21:27답변감사... ver 5.2.2 beta 인데요 ? - o.s:win2000 - dekphi5.0 winnt/system,windows/system 에 ...
-
^-_-^•2001.11.29 23:41yo` 음..그버전은 저도 사용해 본적이 있습니다만...지금 5.3.0 beta 5를 사용하고 있지요. libmysq...
-
- 델초보
- 2001.11.29 20:26
- 0 COMMENTS
- /
- 0 LIKES
-
- 답답이
- 2001.11.29 20:21
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보
- •
- 2001.11.29 19:39
- 1 COMMENTS
- /
- 0 LIKES
-
야수•2001.11.29 21:19일케하면 되지요. QRLabel1.Caption := Edit1.Text; 초보 wrote: > 입력 폼 Edit 에 값을 넣고 ...
-
- wj
- 2001.11.29 20:19
- 0 COMMENTS
- /
- 0 LIKES
-
- 이쁜이
- 2001.11.29 19:30
- 0 COMMENTS
- /
- 0 LIKES
-
- 흐음 초보
- •
- 2001.11.29 12:15
- 1 COMMENTS
- /
- 0 LIKES
-
Falco•2001.11.29 21:09tmssoft사의 홈페이지에서 그런 컴포넌트를 본것 같군요. 버튼과 래디오버튼들을 xp 스타일로 보여주는 컴...
-
- 델파이3.0
- 2001.11.29 11:30
- 0 COMMENTS
- /
- 0 LIKES
-
- 정광철
- 2001.11.29 09:58
- 0 COMMENTS
- /
- 0 LIKES
-
-
- 사고뭉치
- •
- 2001.11.29 07:38
- 1 COMMENTS
- /
- 0 LIKES
-
Falco•2001.11.29 20:31select user from user where passsword=password('7777'); 수고하세요. 사고뭉치 wrote: > mysql ...
-
- aparadin
- •
- 2001.11.29 06:49
- 1 COMMENTS
- /
- 0 LIKES
-
^-_-^•2001.11.29 20:32yo` M$-SQL 콤포를 사용하셨나보네요 ^^'' Zeos는 BDE나 ODBC, ADO를 통하지 않고 해당 디비서버랑 ...
-
- 없이 사는 놈
- 2001.11.29 06:19
- 0 COMMENTS
- /
- 0 LIKES
-
-
이대선•2001.11.29 21:22반상현 wrote: > 고수님 중에 일본어 입력하는 방법에 대해서 좀 알려주세요. > 일본어 입력 방법에는 ...
-
-
- 유진
- 2001.11.29 06:12
- 0 COMMENTS
- /
- 0 LIKES
-
- 이것도 몰라요..
- •
- 2001.11.29 06:08
- 3 COMMENTS
- /
- 0 LIKES
질문 하나 할께요.. 만일 조건식이 여러개일때 어떻게 간단히 할수 있어요? 예를 들면 if (a = 'aaa') or (a = 'bbb') or (a = 'ccc') or (a ='ddd') then any_procedure() else another_procedure(); 위와 같은 문장을 혹시 다음과 같이 ...-
없이 사는 놈•2001.11.30 23:18답변주신 모든 분들께 감사드립니다. 안된다는 것을 안다는 것이 중요하겠네요. 그럼 이것도 몰라...
-
이지인•2001.11.30 08:04StrPos 함수를 써보세요~ if StrPos('aaabbbcccddd', PChar(a) nil then any_procedure() el...
-
지나가다가..•2001.11.30 03:20쩝... 델에선 안돼는 걸루 알구 있는뎅.... 단순히 소스에 뽀다구가 안난다는 개념이라면 다음과 같...
-
- 조승식
- 2001.11.29 05:55
- 0 COMMENTS
- /
- 0 LIKES
-
- 푸른마법
- •
- 2001.11.29 05:22
- 1 COMMENTS
- /
- 0 LIKES
-
Falco•2001.11.29 21:04SQL.Add('Where 학년= :tempb'); 에서의 :tempb 의 값을 StrToInt(Edit1.Text) 로 대체시킨다는 뜻입니다....
-
- its
- •
- 2001.11.29 04:21
- 2 COMMENTS
- /
- 0 LIKES
-
이대선•2001.11.29 21:42its wrote: > 안녕하십니까..!!^^ > 제목이 이상했습니다...!! 무슨말인지..^^ > 다름이 아니오라...!! ...
-
its•2001.11.29 22:52..^^ 님께서 소스를 요청(?) 이상타..^^ 소스입니다..!! 지금 여기에는 Name 필드에 해당되는 내용이 없습...
안된다는 것을 안다는 것이 중요하겠네요.
그럼
이것도 몰라요.. wrote:
> 질문 하나 할께요..
>
> 만일 조건식이 여러개일때 어떻게 간단히 할수 있어요?
>
> 예를 들면
>
> if (a = 'aaa') or (a = 'bbb') or (a = 'ccc') or (a ='ddd') then
> any_procedure()
> else
> another_procedure();
>
> 위와 같은 문장을 혹시 다음과 같이 하는 방법이 없나요?
> if a = ('aaa' or 'bbb' or 'ccc' or 'ddd') then
> any_procedure()
> else
> another_procedure();
>
> 반복적인 a 를 계속 쓸려니 무식한 것 같아서요....
> 도움 부탁 드립니다.
>