Q&A
- for문 기초적인 질문입니다.
수고하십니다.
그냥 label에 1부터 10까지의 합을 버튼을 클릭했을때 나오게 하는건데
머가 잘못된것인지..
만든 소스는 다음과 같습니다.
------------소스--------------
procedure TForm1.Button1Click(Sender: TObject);
var
tot, inc : integer;
begin
for inc :=1 to 10 do
begin
tot := tot + 1
end;
label1.caption := inttostr(tot);
end;
------------------------------
결과값이 12268230 으로 나옵니다.
10 대신 100,55 등등 아무숫자를 넣어도 위값만 나옵니다.
넘 기초적인 질문을 해서 지송합니다.
그냥 label에 1부터 10까지의 합을 버튼을 클릭했을때 나오게 하는건데
머가 잘못된것인지..
만든 소스는 다음과 같습니다.
------------소스--------------
procedure TForm1.Button1Click(Sender: TObject);
var
tot, inc : integer;
begin
for inc :=1 to 10 do
begin
tot := tot + 1
end;
label1.caption := inttostr(tot);
end;
------------------------------
결과값이 12268230 으로 나옵니다.
10 대신 100,55 등등 아무숫자를 넣어도 위값만 나옵니다.
넘 기초적인 질문을 해서 지송합니다.
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 김상호
- 2002.03.16 02:42
- 0 COMMENTS
- /
- 0 LIKES
-
- 초보자
- •
- 2002.03.16 02:16
- 1 COMMENTS
- /
- 0 LIKES
-
장지용•2002.03.16 02:41http://www.undu.com/Articles/980916a.html 여기에 한번 가 보시죠.
-
- 성낙현
- 2002.03.16 02:14
- 0 COMMENTS
- /
- 0 LIKES
-
- 최성민
- •
- 2002.03.16 02:14
- 2 COMMENTS
- /
- 0 LIKES
-
진성열•2002.03.16 03:42꼼포넌트가 있죠. 꼼포넌트 폼위에 척 올려놓고 Rx 이벤트일때 처리해주고 필요할 때 TX 쓰면 끝입니다. ...
-
장지용•2002.03.16 02:21"EscapeCommFunction" 는 Win32 API 니까 그대로 사용해도 될텐데요.
-
- 배경
- •
- 2002.03.16 02:12
- 5 COMMENTS
- /
- 0 LIKES
-
장지용•2002.03.16 02:15
-
배경•2002.03.16 02:26
-
장지용•2002.03.16 02:30
-
배경•2002.03.16 02:38
-
장지용•2002.03.16 03:10
-
- 김현
- •
- 2002.03.16 02:11
- 2 COMMENTS
- /
- 0 LIKES
-
임병태•2002.03.18 23:17팁란을 하번 보세요
-
김현•2002.03.16 03:34질문을 올려놓고 자문자답을 쓰려니까 쑥스럽군요. 혹 이런경우가 있으신 분들에게 도움이 되었으면 좋겠...
-
- 신주호
- •
- 2002.03.16 01:43
- 1 COMMENTS
- /
- 0 LIKES
-
신주호•2002.03.16 01:45
-
- 남영민
- •
- 2002.03.16 01:04
- 1 COMMENTS
- /
- 0 LIKES
수고하십니다. 그냥 label에 1부터 10까지의 합을 버튼을 클릭했을때 나오게 하는건데 머가 잘못된것인지.. 만든 소스는 다음과 같습니다. ------------소스-------------- procedure TForm1.Button1Click(Sender: TObject); var tot, inc...-
김두영•2002.03.16 01:15tot 변수를 0으로 초기화를 안하신것 같은데요... for문을 돌리기 전에 tot := 0; 을 해보세요
-
- 유지현
- •
- 2002.03.16 00:35
- 1 COMMENTS
- /
- 0 LIKES
-
염상철•2002.03.16 00:46제일 쉬운 방법은 Data Access에 있는 Data source하거..Table을 쓰는겁니다. 솔직히 퀴리더 안들어가거....
-
- 프로초보
- •
- 2002.03.16 00:35
- 1 COMMENTS
- /
- 0 LIKES
-
김경록•2002.03.16 01:50이거참.. 고생스러운걸 질문하셨군여.. 음.. 결론적으로는 ODBC문제입니다.. BDE엔진에서 MS...
-
- 노계섭
- •
- 2002.03.16 00:11
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•2002.03.16 01:18예전에 어디선가 받아뒀던게 있네요.. 참고하세요.. &n...
-
- 정성훈
- •
- 2002.03.16 00:09
- 1 COMMENTS
- /
- 0 LIKES
-
배경•2002.03.16 02:14델파이에서 VARIANT라는 형변환 자료이 존재합니다. 사용해본지 오래된어 같단한 자료형변환은 가능합니...
-
- 정성훈
- •
- 2002.03.15 23:35
- 4 COMMENTS
- /
- 0 LIKES
-
최석기•2002.03.15 23:45DB를 몰 사용하시는지 모르겠지만 각 DB별로 테이블 필드 자료 얻어오는 SQL문이 있을텐데.. 아래 부분...
-
정성훈•2002.03.15 23:54감사합니다. array[ftUnknown..ftTypedBinary] 전 이부분 대신 그냥 TFieldType 이라고 했는데..흠 ...
-
김규한•2002.03.15 23:41음.. 쿼리를 쓰셨다면요. var str : string; begin Query1.sql,add('select...
-
김용덕•2002.03.15 23:40안녕하세요. TField의 Property를 보면 DataType이 있거든요. 그 값을 받아서 값에 해당하는 타입을 스트...
-
- 남영민
- •
- 2002.03.15 23:02
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2002.03.15 23:19//////////////////////////////////////////////////////// 혹 어떤건지? 위코딩 x := 'edit1.text';...
-
- 이광균
- •
- 2002.03.15 21:40
- 2 COMMENTS
- /
- 0 LIKES
-
최석기•2002.03.15 22:14DDE를 이용한 방법 procedure GotoWebPage; var DDE ...
-
이광균•2002.03.15 23:26답변 감사드립니다. 그렇게 하니까되는 군요.. 모르는거 하나 알았다.. ㅋㅋ 복 많이 받으세요.....
-
- 황은주
- •
- 2002.03.15 21:30
- 1 COMMENTS
- /
- 0 LIKES
-
정성훈•2002.03.15 23:45안녕하세요. 어떤방법으로 하셧는지 잘 모르겠지만 전 아래같이 햇는데 잘 되거든요? 혹시나 해서 ...
-
- 김주경
- •
- 2002.03.15 21:07
- 1 COMMENTS
- /
- 0 LIKES
-
홍성락•2002.03.15 21:26////////////////////// Free로해보세요 Form1.Free;
-
- 김영철
- •
- 2002.03.15 21:00
- 3 COMMENTS
- /
- 0 LIKES
-
최석기•2002.03.15 22:16EditMask를 !99/99/99;0; 젤 뒷부분에 1을 0으로 수정하세요. 그 부분은 마스크 문자의...
-
김영철•2002.03.15 22:44감사합니다. 님께서 알려주신대로 하니깐 넘 잘 대네여.. ^^ 좋은 하루 되세여.. 다시한번 감사드...
-
나두초보!!•2002.03.15 22:07MaskEdit_Input.Text = '020318' 를 MaskEdit_Input.Text = '02-03-18' 이렇게 해 보시구여 필요하다...
-
- 궁금이
- •
- 2002.03.15 20:37
- 2 COMMENTS
- /
- 0 LIKES
-
장명선•2002.03.15 20:42oracle에 보시면 Client에만 설치는 것이 있을겁니다...(예전에는 있었는데 ) 암튼 전체디비를 설치하는...
-
공성환•2002.03.15 20:41오라클버젼이 서버인가요? 서버라면 client CD가 있을거예요... 거기서 선택해서 인스톨하시면되거든요......
-
- 이상협
- •
- 2002.03.15 19:52
- 1 COMMENTS
- /
- 0 LIKES
-
술친구•2002.03.15 20:26Power 함수의 Return 값이 Extended 군여.. function Power(const Base, Exponent: Extended): Extended...
for문을 돌리기 전에 tot := 0; 을 해보세요