반응형
procedure TForm1.Button1Click(Sender: TObject); var Age : Integer; begin Age := DateTimeToFileDate(IncMinute(Now, -30)); FileSetDate('파일명', Age); end;
반응형
'Programming > Delphi' 카테고리의 다른 글
<펌> Hook 에 대한 또 다는 설명 (0) | 2015.12.02 |
---|---|
[Delphi] WMI(Windows Management Instrumentation) 사용하기에 앞서 (0) | 2015.01.28 |
[다이나믹스킨] 자식폼을 최소화할 때 태스크바로 내리기 (0) | 2011.07.06 |
[다이나믹스킨] 메인창이 뒤로 갔을 경우 잔상이 남을 때 (0) | 2011.07.06 |
폼이 없는 unit 에서 초기화방법 (0) | 2011.07.05 |