|
µ¨¸¶´ç °ø½Ä ÀºÇà°èÁ |
ÇϳªÀºÇà 227-910235-83607 |
¿¹±ÝÁÖ ÀÌ»ó±¹(¿î¿µÁø) |
|
|
|
|
|
|
|
|
|
|
°ÁÂ, ÆÁ, Á¤º¸ |
°ÁÂ, ÆÁ, Á¤º¸ ÀÔ´Ï´Ù. |
|
|
|
·Î±×(log) ±â·Ï ÇÁ·Î½ÃÁ® |
𸮺ê¶ó¿î
(±Ç±¤ÀÏ)
2017-03-10 ¿ÀÀü 12:30:16
Ä«Å×°í¸®:
ÆÁ
4168ȸ Á¶È¸
µî·ÏµÈ ÆÄÀÏÀÌ ¾ø½À´Ï´Ù.
|
|
|
°£´ÜÇÏÁö¸¸ »ó´çÈ÷ À¯¿ëÇÑ ·Î±×±â·Ï ÇÁ·Î½ÃÁ® ÀÔ´Ï´Ù.
¾²±â½ÇÆнà Çѹø´õ Àç½Ãµµ Çϵµ·Ï ÇÏ¿© ·Î±×±â·ÏÀÇ ¾ÈÁ¤¼ºÀ» °ÈÇÏ¿´½À´Ï´Ù.
procedure Log(s: string); var tf:text; LogFileName : string; begin LogFileName := 'c:\Temp\Application.log'; AssignFile(tf,LogFileName); {$i-} Append(tf); {$i+}
if IOResult <> 0 then begin {$i-} Rewrite(tf); {$i+} if IOResult <> 0 then Exit; end;
Writeln(tf,FormatDateTime('hh:nn dd/mm/yyyy : ',Now),s); CloseFile(tf); end;
|
|
|
|
|
|
|
|