Delphi/끄적이기
Thread로 Timer 만들기
uses .., System.Classes, System.SyncObjs, Winapi.Windows; type TDevelopistThreadTimer = class(TThread) private FStop: TEvent; FEnabled: TEvent; FInterval: Cardinal; FStartImmediately: Boolean; //타이머 Enabled 시 즉시 시작여부 FOnTimer: TNotifyEvent; FFinishTick: Integer; function GetEnabled: Boolean; procedure SetEnabled(const Value: Boolean); procedure SetInterval(const Value: Cardinal); protected proce..