Q&A

  • 시간 체크 하려고 하는데...
안녕하세요 델파이 초본데요....



TimeToStr(Now) 써서 현재 시스템 시간을 문자로 표현하는 건 알겠는데 시간, 분, 초



오후오전 등을 각 다른 Label에 표현하려면 어떻게 해야 되는지... 좀 알려 주세요 네~.

7  COMMENTS
  • Profile
    꼭 배우고 싶은 사람 2001.11.21 04:30
    다시한번 와~.



    그리 간단한걸 전 DecodTime(...); 로 했었는데. 여기서 제가 쓰려던건 분만 비교해서



    이벤트 발생시키려던 거였는데. 저 DecodTime은 시간,분,초,밀리초 모두 한다음 거기서



    분만 뽑아 써야 되더군요. 팁이나 자료실 글 보면서 항상 느끼는 거지만 정말 신기하고



    잼있고 놀라울 따름입니다.

  • Profile
    Bulduki 2001.11.20 22:49
    hh.text := FormatDateTime('hh', now()); // 시

    mm.text := FormatDateTime('mm', now()); // 분

    dd.text := FormatDateTime('dd', now()); // 초

    이렇게...



    초짜 올림 wrote:

    > 안녕하세요 델파이 초본데요....

    >

    > TimeToStr(Now) 써서 현재 시스템 시간을 문자로 표현하는 건 알겠는데 시간, 분, 초

    >

    > 오후오전 등을 각 다른 Label에 표현하려면 어떻게 해야 되는지... 좀 알려 주세요 네~.

  • Profile
    초짜 올림 2001.11.21 05:17
    님이 알려주신대로 아래와 같이 했더니 안되더군요.



    procedure TForm1.Timer1Timer(Sender: TObject);

    var rMinute, rSecond: string;

    begin

    rMinute := FormatDateTime('mm', Now());

    rSecond := FormatDateTime('ss', Now());

    if ( rMinute = '45') and (rSecond = '00') then

    begin

    Timer1.Enabled := False;

    ShowMessage('쉬어야 될 시간 입니다');

    Timer1.Enabled := True;

    end;

    end;



    음 label에 쓰면 제대로 나오는데 if 연산자에서 왜 안되는지 이유좀.

    DecodDateTime(...)으로 할때는 됐었거든요.

  • Profile
    signalworks 2001.11.24 04:45
    우연히 들려 답변드립니다.



    'mm'표현은 월을 의미하고

    분으로 표시하려면 'nn'을 쓰셔야 합니다.



    즐거운 하루 되세요



  • Profile
    초짜 올림 2001.11.24 10:21
    고맙습니다. 진짜루요. 아직은 초짜라 질문에 답변해준 적은 없지만 낭중에 실력 쌓이면 제가 아는 한에서 답변을 열심히 하도록 하겠습니다. 초짜를 위하여. 초짜 화팅~

  • Profile
    webking 2001.11.20 22:34
    초짜 올림 wrote:

    > 안녕하세요 델파이 초본데요....

    >

    > TimeToStr(Now) 써서 현재 시스템 시간을 문자로 표현하는 건 알겠는데 시간, 분, 초

    >

    > 오후오전 등을 각 다른 Label에 표현하려면 어떻게 해야 되는지... 좀 알려 주세요 네~.



    decode time과 encode time에 관련된 내용을 살펴보세요.

  • Profile
    조수석 2009.09.17 20:09
    아래와 같이 해보세요..
    showmessage(formatDateTime('HH:NN:SS AM/PM',now));