Q&A
- 조금만더~~~
음,,,
에디트 1 에는 이번년도와 달을 출력하고 2에는 지난달과 지지난달(yyyy.mm ~ yyyy.mm)
3에는 에디트달의 지난달과 지지난달 (yyyy.mm ~ yyyy.mm) 을 출력할려고 합니다.
도와주세여...
책봐두 모르겠군여...
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := FormatDateTime( 'yyyy-mm-dd', now );
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Edit2.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-2,now,-3));
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
Edit3.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-4,now,-5));
end;
end.
에디트 1 에는 이번년도와 달을 출력하고 2에는 지난달과 지지난달(yyyy.mm ~ yyyy.mm)
3에는 에디트달의 지난달과 지지난달 (yyyy.mm ~ yyyy.mm) 을 출력할려고 합니다.
도와주세여...
책봐두 모르겠군여...
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := FormatDateTime( 'yyyy-mm-dd', now );
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Edit2.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-2,now,-3));
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
Edit3.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-4,now,-5));
end;
end.
2
COMMENTS
-
-
제 생각에는 델파이 문법을 책보구 더 배우셔야겠네여~
밑에 고수님들이 여러번 답변을 해준것을 봤는데 전혀 이해를 못하시네여~~
책보구 문법을 공부하세여~
mickyblue wrote:
> 음,,,
> 에디트 1 에는 이번년도와 달을 출력하고 2에는 지난달과 지지난달(yyyy.mm ~ yyyy.mm)
> 3에는 에디트달의 지난달과 지지난달 (yyyy.mm ~ yyyy.mm) 을 출력할려고 합니다.
> 도와주세여...
> 책봐두 모르겠군여...
>
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> Edit1.Text := FormatDateTime( 'yyyy-mm-dd', now );
> end;
>
> procedure TForm1.Button2Click(Sender: TObject);
> begin
> Edit2.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-2,now,-3));
> end;
>
> procedure TForm1.Button3Click(Sender: TObject);
> begin
> Edit3.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-4,now,-5));
> end;
>
> end.
>
(NOTICE) You must be logged in to comment on this post.
-
- 바다
- •
- 2000.09.27 15:28
- 1 COMMENTS
- /
- 0 LIKES
-
임형호•2000.09.27 19:26모달폼은 그 폼을 닫기전에는 다음처리들이 실행이 되지 않습니다. 그러므로 폼을 닫으면서 free가 되지만...
-
- 델피초보
- •
- 2000.09.27 10:34
- 1 COMMENTS
- /
- 0 LIKES
-
임형호•2000.09.27 12:02혹시 코딩중에 DB의 자료를 조회하는 부분이 있을것 같네요. 음...가령 해당 필드가 integer라든지 float...
-
- parkisu
- 2000.09.27 09:57
- 0 COMMENTS
- /
- 0 LIKES
-
- 엄청 초보
- 2000.09.27 09:31
- 0 COMMENTS
- /
- 0 LIKES
-
- 김준연
- •
- 2000.09.27 09:28
- 1 COMMENTS
- /
- 0 LIKES
-
초보자•2000.09.27 20:31김준연 wrote: > DECLARE @ins_error int > > begin tran > insert ExampleDB(exid, a) values('d', ...
-
- 진땀
- 2000.09.27 09:26
- 0 COMMENTS
- /
- 0 LIKES
-
- kissme
- 2000.09.27 09:06
- 0 COMMENTS
- /
- 0 LIKES
-
- mickyblue
- •
- 2000.09.27 08:38
- 2 COMMENTS
- /
- 0 LIKES
음,,, 에디트 1 에는 이번년도와 달을 출력하고 2에는 지난달과 지지난달(yyyy.mm ~ yyyy.mm) 3에는 에디트달의 지난달과 지지난달 (yyyy.mm ~ yyyy.mm) 을 출력할려고 합니다. 도와주세여... 책봐두 모르겠군여... procedure TForm1.Butt...-
남기석•2000.09.27 10:32안녕하세요.... 지난번에 IncMonth 함수를 알려 드렸던 청개구리 남기석입니다. 아직도 해결 못하시고 해...
-
kylix•2000.09.27 09:44제 생각에는 델파이 문법을 책보구 더 배우셔야겠네여~ 밑에 고수님들이 여러번 답변을 해준것을 봤는데...
-
- 서하늘
- 2000.09.27 08:06
- 0 COMMENTS
- /
- 0 LIKES
-
- 왕초보
- 2000.09.27 07:59
- 0 COMMENTS
- /
- 0 LIKES
-
- 고민남
- •
- 2000.09.27 07:02
- 1 COMMENTS
- /
- 0 LIKES
-
남기석•2000.09.27 10:17안녕하세요... 청개구리 남기석입니다. SQL 서버에 연결할 수 없다는 에러메세지네요... 연결이 안되...
-
-
- 윤종열
- •
- 2000.09.27 06:25
- 3 COMMENTS
- /
- 0 LIKES
-
허춘•2000.09.27 13:47윤종열 wrote: > 저의 컴퓨터 구성은 이렇습니다. > > 1번 컴퓨터) 1-Internet에서 에서 InterBase6....
-
허춘•2000.09.27 13:58허춘 wrote: > 윤종열 wrote: > > 저의 컴퓨터 구성은 이렇습니다. > > > > 1번 컴퓨터) 1-Internet...
-
임형호•2000.09.27 08:39도움이 될지는 모르겠지만 몇자 적어봅니다. 얼마전에 저두 서버에 인터베이스 6.0을 설치하고, 인터베이...
-
- genis_me
- •
- 2000.09.27 04:32
- 1 COMMENTS
- /
- 0 LIKES
-
김경태•2000.09.27 05:16^^ 저두 델파이 시작한지 두달되는 왕촙입니다.. 델파이 바이블 괜찬턴데..영진꺼..거의 델파이로 할 수 ...
-
- 서영진
- •
- 2000.09.27 03:24
- 1 COMMENTS
- /
- 0 LIKES
-
강인규•2000.09.27 04:52제가 어젠가 답변을 올렸는데.... 검색은 해보셨나여? var i, j : integer; f : real; begin i ...
-
- 성더기
- 2000.09.27 03:19
- 0 COMMENTS
- /
- 0 LIKES
-
- 김기태
- •
- 2000.09.27 02:39
- 1 COMMENTS
- /
- 0 LIKES
-
타락천사•2000.09.27 02:41안녕하세여.. 타락임다..^^ 각 어플마다 독립적인 메모리가 할당됩니다.. 그래서 한 어플에서 다른 ...
-
- 황하성
- •
- 2000.09.27 02:38
- 1 COMMENTS
- /
- 0 LIKES
-
타락천사•2000.09.27 02:43안녕하세여.. 타락임다..^^ 흠.. FTP 를 사용하심이 어떨까여? 즐푸하세여.. 타락천사...^^ 황...
-
- 안젤726
- •
- 2000.09.27 02:04
- 1 COMMENTS
- /
- 0 LIKES
-
이경문•2000.09.27 05:49Delphi4부터인가 TJpegImage라는 클래스를 제공하게 되었습니다. 자료실에 보면 Jpeg관련 컴포넌트가 많이...
-
- 김경태
- •
- 2000.09.27 02:02
- 1 COMMENTS
- /
- 0 LIKES
-
david•2000.09.28 02:07김경태 wrote: > 아래처럼 복잡한 클래스의 변수들을 전부다 파일로 저장했다가..그대로 다시 불러올수있...
지난번에 IncMonth 함수를 알려 드렸던 청개구리 남기석입니다.
아직도 해결 못하시고 해메구 계시는군요....쯔쯔..
Edit1.Text := FormatDateTime( 'YYYY.MM', Now );
Edit2.Text := FormatDateTime( 'YYYY.MM', IncMonth(Now,-1) )
+ ' ~ ' + FormatDateTime( 'YYYY.MM', IncMonth(Now,-2) );
Edit3.Text := FormatDateTime( 'YYYY.MM', IncMonth(Now,-3) )
+ ' ~ ' + FormatDateTime( 'YYYY.MM', IncMonth(Now,-4) );
이렇게 하면 다음과 같은 결과가 나옵니다...
Edit1 : 2000.09
Edit2 : 2000.08 ~ 2000.07
Edit3 : 2000.06 ~ 2000.05
행복하세요..
================================================================================
mickyblue wrote:
> 음,,,
> 에디트 1 에는 이번년도와 달을 출력하고 2에는 지난달과 지지난달(yyyy.mm ~ yyyy.mm)
> 3에는 에디트달의 지난달과 지지난달 (yyyy.mm ~ yyyy.mm) 을 출력할려고 합니다.
> 도와주세여...
> 책봐두 모르겠군여...
>
> procedure TForm1.Button1Click(Sender: TObject);
> begin
> Edit1.Text := FormatDateTime( 'yyyy-mm-dd', now );
> end;
>
> procedure TForm1.Button2Click(Sender: TObject);
> begin
> Edit2.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-2,now,-3));
> end;
>
> procedure TForm1.Button3Click(Sender: TObject);
> begin
> Edit3.Text := FormatDateTime('yyyy-mm ~ yyyy-mm', IncMonth(now,-4,now,-5));
> end;
>
> end.
>