Q&A
- 왕초보의 왕허접 질문 version 2
^^;
초보는 저뿐인가보네요.
질문이 없네요.
아이고, 민망해라...
제가 또다시 문제에 봉착했습니다.
이번에는 책에 나와있는 문법 그대로 적용을 하는데 책처럼 작동이
안되서 여기저기 Q/A를 뒤저보고 해도 답을 모르겠어서 다시금
빵가루를 얻어 먹을 수 있는 행운이 있을까하여 글을 올립니다.
procedure TForm1.Winamp1Click(Sender: TObject);
begin
if FileExists('c:windows바탕 화면winamp.exe') then begin
ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')
end Else
HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
HTTPGetwa.GetFile;
end;
보턴 하나를 클릭하면 위와 같은 작동을 하게 됩니다.
그런데 이상하게 바탕화면에 그 화일이 있으면 다운로드를 받지 않아야
하는데 메세지가 뜬 뒤 else 구문 이하로 작동을 합니다.
무엇이 잘못되었는지 고수님께서 꼬집어 주세요.
if 조건 then begin
실행 1
end else
실행 2
에서 조건에 맞으면 실행 1을 하고 종료하고
조건에 맞지 않으면 실행 2를 하고 종료하는 내용이 아닌지 궁굼합니다.
한수 지도 부탁드립니다.
초보는 저뿐인가보네요.
질문이 없네요.
아이고, 민망해라...
제가 또다시 문제에 봉착했습니다.
이번에는 책에 나와있는 문법 그대로 적용을 하는데 책처럼 작동이
안되서 여기저기 Q/A를 뒤저보고 해도 답을 모르겠어서 다시금
빵가루를 얻어 먹을 수 있는 행운이 있을까하여 글을 올립니다.
procedure TForm1.Winamp1Click(Sender: TObject);
begin
if FileExists('c:windows바탕 화면winamp.exe') then begin
ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')
end Else
HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
HTTPGetwa.GetFile;
end;
보턴 하나를 클릭하면 위와 같은 작동을 하게 됩니다.
그런데 이상하게 바탕화면에 그 화일이 있으면 다운로드를 받지 않아야
하는데 메세지가 뜬 뒤 else 구문 이하로 작동을 합니다.
무엇이 잘못되었는지 고수님께서 꼬집어 주세요.
if 조건 then begin
실행 1
end else
실행 2
에서 조건에 맞으면 실행 1을 하고 종료하고
조건에 맞지 않으면 실행 2를 하고 종료하는 내용이 아닌지 궁굼합니다.
한수 지도 부탁드립니다.
3
COMMENTS
-
-
> procedure TForm1.Winamp1Click(Sender: TObject);
> begin
> if FileExists('c:windows바탕 화면winamp.exe') then begin
> ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')
> end Else
--------------------------------- (1)
> HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
> HTTPGetwa.GetFile;
> end;
(1) 번 부분에 Begin 문이 빠졌네요...^^;
김영진 wrote:
> ^^;
> 초보는 저뿐인가보네요.
> 질문이 없네요.
> 아이고, 민망해라...
> 제가 또다시 문제에 봉착했습니다.
> 이번에는 책에 나와있는 문법 그대로 적용을 하는데 책처럼 작동이
> 안되서 여기저기 Q/A를 뒤저보고 해도 답을 모르겠어서 다시금
> 빵가루를 얻어 먹을 수 있는 행운이 있을까하여 글을 올립니다.
>
> procedure TForm1.Winamp1Click(Sender: TObject);
> begin
> if FileExists('c:windows바탕 화면winamp.exe') then begin
> ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')
> end Else
> HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
> HTTPGetwa.GetFile;
> end;
>
> 보턴 하나를 클릭하면 위와 같은 작동을 하게 됩니다.
> 그런데 이상하게 바탕화면에 그 화일이 있으면 다운로드를 받지 않아야
> 하는데 메세지가 뜬 뒤 else 구문 이하로 작동을 합니다.
> 무엇이 잘못되었는지 고수님께서 꼬집어 주세요.
>
> if 조건 then begin
> 실행 1
> end else
> 실행 2
>
> 에서 조건에 맞으면 실행 1을 하고 종료하고
> 조건에 맞지 않으면 실행 2를 하고 종료하는 내용이 아닌지 궁굼합니다.
>
> 한수 지도 부탁드립니다.
-
웁쑤!
감사합니다.
질문 올리자마자 답변이 올라와서 어찌해야 할 지를 모르겠습니다.
정말 감사합니다.
덕분에 그동안 공부하면서 생겼던 고정관념(?)이 하나 있었는데
그것 마저 깨우치게 됐습니다.
^^;
감사합니다. 델피언님.
델피언 wrote:
> > procedure TForm1.Winamp1Click(Sender: TObject);
> > begin
> > if FileExists('c:windows바탕 화면winamp.exe') then begin
> > ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')
> > end Else
> --------------------------------- (1)
> > HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
> > HTTPGetwa.GetFile;
> > end;
>
> (1) 번 부분에 Begin 문이 빠졌네요...^^;
>
>
>
> 김영진 wrote:
> > ^^;
> > 초보는 저뿐인가보네요.
> > 질문이 없네요.
> > 아이고, 민망해라...
> > 제가 또다시 문제에 봉착했습니다.
> > 이번에는 책에 나와있는 문법 그대로 적용을 하는데 책처럼 작동이
> > 안되서 여기저기 Q/A를 뒤저보고 해도 답을 모르겠어서 다시금
> > 빵가루를 얻어 먹을 수 있는 행운이 있을까하여 글을 올립니다.
> >
> > procedure TForm1.Winamp1Click(Sender: TObject);
> > begin
> > if FileExists('c:windows바탕 화면winamp.exe') then begin
> > ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')
> > end Else
> > HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
> > HTTPGetwa.GetFile;
> > end;
> >
> > 보턴 하나를 클릭하면 위와 같은 작동을 하게 됩니다.
> > 그런데 이상하게 바탕화면에 그 화일이 있으면 다운로드를 받지 않아야
> > 하는데 메세지가 뜬 뒤 else 구문 이하로 작동을 합니다.
> > 무엇이 잘못되었는지 고수님께서 꼬집어 주세요.
> >
> > if 조건 then begin
> > 실행 1
> > end else
> > 실행 2
> >
> > 에서 조건에 맞으면 실행 1을 하고 종료하고
> > 조건에 맞지 않으면 실행 2를 하고 종료하는 내용이 아닌지 궁굼합니다.
> >
> > 한수 지도 부탁드립니다.
(NOTICE) You must be logged in to comment on this post.
-
- 강동길
- 2001.07.03 18:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보요
- •
- 2001.07.03 18:11
- 1 COMMENTS
- /
- 0 LIKES
-
Lee•2001.07.03 19:56시간 maskEdit 콤포 => stime이라면 Try TimeToStr(stime.Text); Except ShowMessage('올바른 시...
-
- kimminsu
- •
- 2001.07.03 14:11
- 2 COMMENTS
- /
- 0 LIKES
-
Lee•2001.07.03 19:41procedure는 리턴값을 가질 수가 없습니다. 참고로 리턴값을 받을려면 function을 사용하여야 합니다. 다...
-
명탁•2001.07.04 10:41그냥 퀴리 컴포넌트 sql 문장에다가 즉 add(' select 아웃파람1,... 프로시저내임(인파람1, 인파람2...
-
- 델초
- 2001.07.03 14:00
- 0 COMMENTS
- /
- 0 LIKES
-
- 최한상
- •
- 2001.07.03 11:49
- 1 COMMENTS
- /
- 0 LIKES
-
하기•2001.07.03 19:00저장용량이라기보다는 아마도 중복된 자료를 입력하신게 아닐까하는 생각이 드는군요.. 한번 확인해 보시...
-
- 델초짜..
- 2001.07.03 11:09
- 0 COMMENTS
- /
- 0 LIKES
-
- 미래
- •
- 2001.07.03 11:01
- 1 COMMENTS
- /
- 0 LIKES
-
정재필•2001.07.03 11:26WriteBuffer, ReadBuffer 함수를 사용해 보세여...^^; 미래 wrote: > > 인디 서버에서 readln 은...
-
- 최진석
- 2001.07.03 07:42
- 0 COMMENTS
- /
- 0 LIKES
-
- 오늘도
- •
- 2001.07.03 07:31
- 2 COMMENTS
- /
- 0 LIKES
-
Ziker•2001.07.05 00:32안녕하세요! 지커(김성규)입니다. 일반적으로 ISAPI를 작성 하신다음 IIS를 통해서 동작이 될때, 메모리...
-
오늘도•2001.07.09 20:25답글 감사 드립니다. 제 질문이 좀 엉뚱해서인지 이곳 저곳 게시판 중에서 유일하게 지커님만 대답을 ...
-
- 정동일
- 2001.07.03 06:45
- 0 COMMENTS
- /
- 0 LIKES
-
- MAXIST
- •
- 2001.07.03 06:39
- 1 COMMENTS
- /
- 0 LIKES
-
Ziker•2001.07.04 22:37안녕하세요 지커 입니다. 제가 고민한 부분인데.. 님께서도 상당히 고민한 흔적이 옅보이는군요.. ^^ ...
-
- 한현숙
- •
- 2001.07.03 07:18
- 4 COMMENTS
- /
- 0 LIKES
-
방문현•2001.07.04 02:35> > try > begin > > query1.close; > query1.sql.clear; > qu...
-
한현숙•2001.07.04 20:21님께서 말씀하신대로 했더니 이런 에러가 나네요 query1 : dataset not in edit or insert mode 델파이의...
-
행인4•2001.07.03 22:47autocommit 이란거 프로그램 종료시에 commit을 하는거 같던데요 저도 이런 경험 했습니다. tdatabase 컴...
-
한현숙•2001.07.03 23:32행인4 wrote: > autocommit 이란거 프로그램 종료시에 commit을 하는거 같던데요 > 저도 이런 경험 했습...
-
- 김영진
- •
- 2001.07.03 04:39
- 3 COMMENTS
- /
- 0 LIKES
^^; 초보는 저뿐인가보네요. 질문이 없네요. 아이고, 민망해라... 제가 또다시 문제에 봉착했습니다. 이번에는 책에 나와있는 문법 그대로 적용을 하는데 책처럼 작동이 안되서 여기저기 Q/A를 뒤저보고 해도 답을 모르겠어서 다시금 빵가...-
aparadin•2001.07.03 18:37김영진 wrote: > ^^; > 초보는 저뿐인가보네요. > 질문이 없네요. > 아이고, 민망해라... > 제가 또다...
-
델피언•2001.07.03 05:07> procedure TForm1.Winamp1Click(Sender: TObject); > begin > if FileExists('c:windows바탕 화면win...
-
김영진•2001.07.03 05:24웁쑤! 감사합니다. 질문 올리자마자 답변이 올라와서 어찌해야 할 지를 모르겠습니다. 정말 감사합니다....
-
- 정성학
- •
- 2001.07.03 04:34
- 1 COMMENTS
- /
- 0 LIKES
-
Ziker•2001.07.04 22:45안녕하세요 지커입니다. iis설정을 다시 한번 확인 해 보셔야 할것 같습니다. script 안에 두시 마시...
-
- 김대훈
- •
- 2001.07.03 03:42
- 1 COMMENTS
- /
- 0 LIKES
-
참이슬•2001.07.03 04:15label컴포넌트를 사용하셔서 Click이벤트에서 작성합니다. ShellExecute(Handle, 'Open', 'MailTo:E-Mai...
-
- xxx
- •
- 2001.07.03 03:37
- 1 COMMENTS
- /
- 0 LIKES
-
하기•2001.07.03 19:02먼저 QReport에서 DataSet을 Query와 연결시켜 주시고 QRDBText에서도 DataSet을 Query 와 연결시켜 주시...
-
- 초보
- •
- 2001.07.03 03:28
- 3 COMMENTS
- /
- 0 LIKES
-
윤광희•2001.07.21 03:15제 경험에 의하면 100% 메모리 누수 현상입니다. 제가 겪은건 두가지였는데요. 하나는 ICS 컴퍼넌트를 ...
-
Ziker•2001.07.04 22:24안녕하세요 지커 입니다.. 혹시 메모리 누수가 있는건 아닌지요... 소스코드르 다시금 잘 검토 해 보셔...
-
초보•2001.07.05 01:26그런데 실제적으로 ocx가 종료가 안된것 같은데요 실제 똑같은것
-
- 미디어
- •
- 2001.07.03 03:28
- 3 COMMENTS
- /
- 0 LIKES
-
주삼식•2001.07.18 19:03안녕하세요. 제가 만든 다바라는 프로그램을 보시면 화면을 그냥 깨끗하게 캡쳐해 옵니다. 이 부분은 ...
-
주삼식•2001.07.25 00:46맞네요. AVI는 깨끗하게 캡쳐가 되지만 mpeg같은 것은 검게 되네요. 이것은 다이렉트X를 사용하기 때문에...
-
제이텍코리아•2001.07.30 19:03안녕하세요. 안영기님이 자료실에 올리신 동영상 플레이어를 응용하면 캡쳐할 수 있네요. 그럼... ...
-
-
이성훈•2001.07.03 03:57초보 wrote: > 예) 1996.03.01 - 1998.12.05 사이 일수 계산 > 2000.01.04 - 2001.05.04 사이 일수 계...
-
-
- delcho
- •
- 2001.07.03 01:46
- 3 COMMENTS
- /
- 0 LIKES
-
심재복•2001.07.03 01:56그래요. mail.hanmail.net을 HOST에 넣어 주면 한메일의 SMTP로 릴레이식으로 던져 줍니다. 그래서 한메일...
-
delcho•2001.07.03 02:03심재복 wrote: > 그래요. mail.hanmail.net을 HOST에 넣어 주면 한메일의 SMTP로 릴레이식으로 던져 줍니...
-
심재복•2001.07.03 02:12님께서 가지고 잇는 메일서버에 릴레이 방식으로 mail.hanmail.net이나 mail.shinbiro.com을 던졌을때 님께...
> ^^;
> 초보는 저뿐인가보네요.
> 질문이 없네요.
> 아이고, 민망해라...
> 제가 또다시 문제에 봉착했습니다.
> 이번에는 책에 나와있는 문법 그대로 적용을 하는데 책처럼 작동이
> 안되서 여기저기 Q/A를 뒤저보고 해도 답을 모르겠어서 다시금
> 빵가루를 얻어 먹을 수 있는 행운이 있을까하여 글을 올립니다.
>
> procedure TForm1.Winamp1Click(Sender: TObject);
> begin
> if FileExists('c:windows바탕 화면winamp.exe') then begin
> ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')
> end Else
> HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
> HTTPGetwa.GetFile;
> end;
>
> 보턴 하나를 클릭하면 위와 같은 작동을 하게 됩니다.
> 그런데 이상하게 바탕화면에 그 화일이 있으면 다운로드를 받지 않아야
> 하는데 메세지가 뜬 뒤 else 구문 이하로 작동을 합니다.
> 무엇이 잘못되었는지 고수님께서 꼬집어 주세요.
>
> if 조건 then begin
> 실행 1
> end else
> 실행 2
>
> 에서 조건에 맞으면 실행 1을 하고 종료하고
> 조건에 맞지 않으면 실행 2를 하고 종료하는 내용이 아닌지 궁굼합니다.
>
> 한수 지도 부탁드립니다.
====================================================================
일단은 문장에서 틀린점이 몇가지 있어 고쳐봅니다.
>
> procedure TForm1.Winamp1Click(Sender: TObject);
>> if FileExists('c:windows바탕 화면winamp.exe') then
ShowMessage('바탕화면에 같은 이름의 파일이 이미 있습니다.')//복문아니므로
> else begin//복문이니까
HTTPGetwa.FileName := 'c:windows바탕 화면winamp.exe';
> HTTPGetwa.GetFile;
> end;