프링글이 하는 이야기

http://zxing.org/w/decode.jspx 인터넷으로 바코드 이미지 또는 싸이트링크를.입력하명 해당 바코드를 읽어 표시해줌 iPod 에서 작성된 글입니다.

Open Flash Chart http://teethgrinder.co.uk/open-flash-chart/index.php XML/SWF Charts http://www.maani.us/charts/index.php?menu=Gallery amCharts http://www.amcharts.com/ FusionChart Free http://www.fusioncharts.com/free/

호수공원 잔듸밭에서 아이들과 유빈양 - 2009년 9월 늦여름 어느날 -

이번에 토요타가 한국에 진출(토요타 코리아) 함으로써 대표적인 차량 캠리와 프리우스, RAV4 를 출시 하였습니다. 개인적으로 캠리와 프리우스가 마음에 듭니다. 프리우스는 하이브리드 차량으로써 호기심과 연비에 관심이 가는 차종이고 캠리는 어디서 부터 들리던 얘기로 해외 베스트 셀러 자동차로 알고 있었고 토요타 코리아가 공식으로 들어옴으로써 관심이 더욱 많이 가는 차량 중에 하나입니다. 솔직히 외관 스타일은 국내 현기차 (현대/기아 자동차) 도 뒤쳐지지 않습니다만 일제 차량을 몇대 타본 결과 마감이 상당히 차이가 많습니다. 개인적으로 차량의 완성도는 그럴싸한 외관과 인테리어 스타일이 아니라 그 내장의 완성도와 마감에서 차이가 난다 생각합니다. 그런 면에서 아직은 국내 현/기 차가 따라가지 못한다 여겨지며 ..

먼저 APC Back-UPS BE700 을 사용할 수 있는 기회를 주신 APC 이벤트 담당자 여러분께 감사를 드립니다. 또한.. 이번 이벤트에 당첨되고 사용기를 위해 APC Back-UPS BE700 이 제 손에 들어온 그 다음날 제게는 또 다른 기쁜일이 생겼습니다.. 다름 아닌 둘째의 탄생인데요... 출산 예정일인 9월 말일 보다 2주 앞당겨 태어나게 되어 본의 아니게 사용기에 많은 노력을 기울이지 못한 점을 양해 부탁드리며, 우선 개봉기를 올리고 구체적인 활용기는 후편으로 이어 올리겠습니다. 아참.. 어제서야 퇴원을 하고 글을 쓰는 지금 집 분위기는 둘째의 집 적응, 첫째의 시기심과 질투심의 발동, 출산 후 와이프의 산고 등.. 좀 산만하긴 합니다. UPS의 기본 기능에 관한, 또는 가정에서 적용 가..

UPS... UPS는 Uninterruptible power supply 의 약자로써 "무정전 전원 공급 장치" 를 뜻한다. 필자가 몸담고 있는 회사는 kiosk (키오스크 : 공공장소에 설치된 무인 정보단말기 - 이 단어는 터키 및 페르시아어에 근원을 두고 있으며, 그 뜻은 옥외에 설치된 대형천막이나 현관 등의 의미를 갖는다) 장비를 개발 / 제조 / 판매 / 운영 하는 업체로써 일찌기 UPS의 필요성에 대해 절실 하게 느끼고 있다. 몸소 느끼는 이유는 kiosk 장비가 설치되어 운영중에 불특정한 사유로 인해 전기가 단절 되었을때 장비는 연결된 UPS를 통해 약 30분간 시스템의 전원을 유지하다가 전원이 복구되면 배터리를 사용하지 않고 다시 정상적인 운영을 진행한다. 30분 이내에 전기가 복구 되지 않..

uses PsAPI, TlHelp32; // portions by Project Jedi www.delphi-jedi.org/ const RsSystemIdleProcess = 'System Idle Process'; RsSystemProcess = 'System Process'; function IsWinXP: Boolean; begin Result := (Win32Platform = VER_PLATFORM_WIN32_NT) and (Win32MajorVersion = 5) and (Win32MinorVersion = 1); end; function IsWin2k: Boolean; begin Result := (Win32MajorVersion >= 5) and (Win32Platform = VER_PL..

procedure UploadPerFTP; procedure GetDir(dir: string); var SearchRec: TSearchRec; details, nodetails: TStringList; k: Integer; begin //iterate through directory given //schleife über alle dateien im ordner if FindFirst(dir + '*.*', faAnyFile, SearchRec) = 0 then begin repeat //get rid of the both "dummy-directories" '.' and '..' //die ordner '.' und '..' brauchen man nicht if (SearchRec.Name '.'..

function IsWrongIP(ip: string): Boolean; var z, i: byte; st: array[1..3] of byte; const ziff = ['0'..'9']; begin st[1] := 0; st[2] := 0; st[3] := 0; z := 0; Result := False; for i := 1 to Length(ip) do if ip[i] in ziff then else begin if ip[i] = '.' then begin Inc(z); if z < 4 then st[z] := i else begin IsWrongIP := True; Exit; end; end else begin IsWrongIP := True; Exit; end; end; if (z 3) or (..

unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type Pat_info = ^at_info; at_info = record JobTime: DWORD; DaysOfMonth: DWORD; DaysOfWeek: UCHAR; Flags: UCHAR; Command: LPWSTR; end; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end..