またまた出費です（；；）

まだ5年しか使ってない冷蔵庫が壊れたようです（泣）
冷凍庫は冷え冷えなんだけど、冷蔵の方が冷えてないような　冷えてるような。もう！どうしよう（大泣き）次は洗濯機あたりかな（＾＾；


//リアル

initCtrls

procedure TFrmMain.initCtrls; //rmt
var
sLog: WideString;
begin
tmrSplit.Enabled := cbIsAuto.Checked;
gsCurr_VPN_ENTRYNAME := DEF_VPN_ENTRYNAME;
RasList := TStringList.Create;

sLog := LOG_INFO_CREATEVPN + DEF_VPN_ENTRYNAME;
if FileExists(PATH_RASPHONE) then
begin
if not isHaveDefRasCon then
begin
try
if not createDefRasConn then
begin
showLog( LOG_ERROR_AUTOCREATEVPN + sLog);
end;
except
showLog(LOG_ERROR_AUTOCREATEVPN + sLog);
end;
end;
end
else
begin
showLog(LOG_NOTFOUNDFILE + sLog);
end;
tmrClose.Enabled := True;
end;