꿀항아리

현직 치과 원장의 전달 사항입니다

이런걸 다 얘기해 주네요.

지인들에게 알려주시면

두고두고 고맙다는 말을 들을 것입니다.

"옥수수가 치통 치료제" (백만불짜리 정보)

치아가 아프거나 잇몸에 피가 날때...

치통(충치)가 아무리 심해도...

잇몸이나 치아가 아파도...

"옥수수 하나면 평생 치아 걱정

안해도 된다고 합니다"

옥수수을 사다가 알맹이는 맛있게 드시고

옥수수 알이 채워져 있던 옥수수 속대는

칼로 여러토막을 내서

주전자 같은데 넣고 물을 부은 다음

사골을 우려내듯 푹 삶습니다.

(삶는 동안 물이 부족하면

중간중간에 물을 보충해 가면서...)

그렇게 우려낸 물을 적당히 식혀서

마시지는 말고 입안에 머금고 있다가

뱉어버리기를 15회~20회 반복하면

(통증이 심할때는 며칠간 반복)

평생동안 두번 다시

치통으로 고생하는 일이 없고

치과에 갈 일도 없다고 합니다.

옥수수 수염차를 끓여 먹으면

몸에 좋다는 이야기는

누구나 아는 상식입니다.

그런데 옥수수알만 먹고

그냥 버려지는 옥수수의 속대에

이가탄이나 인사돌 같은

치통, 치아염증약의 원료로 쓰이는 성분이

다량 함유되어 있다는 사실이

놀랍기만 합니다.

이토록 신효한 약효가 있다는 것을

치과의사는 물론.. 한의사들도 모르는

비법이라고 하는군요.

이 민간요법이 널리 알려져서

국민 모두가 오복중에 제일 큰

건강한 치아를 가지길

바라는 마음입니다.^^*

자연의 섭리가 대단하네요....

옥수수가 이와 같고,

옥수수 속이 이를 잡고 있는 잇몸과 같네요...

- Delphi 5 + indy 9

with IdMessage1 do

begin

        Clear;

From.Address := 'test@test.co.kr';

From.Name := 'test';

Sender.Address:= 'test123@test.co.kr';

Sender.Name:= 'test';

Subject := '테스트 메일입니다.';

ContentType := 'TEXT/HTML';

CharSet := 'KS_C_5601-1987';

Recipients.EMailAddresses :=a_cAddress;

IdMessage1.MessageParts.clear;

 for aiI := 0 to Listbox1.Items.Count-1 do

TIdAttachment.Create(IdMessage1.MessageParts, Listbox1.Items[aiI]);

end;

IdSMTP1.Send(IdMessage1);

- Delphi Xe3 + indy 10

uese IdAttachmentFile 추가

TIdAttachmentFile.Create(IdMessage1.MessageParts, Listbox1.Items[aiI]);

비씨 글로벌 카드때문에 카드값이 후덜덜 하네요 ㅜㅜ

(직배에 배송비 무료라서 별의별걸 다 주문하고 있어요 ㅎㅎㅎ)

근데 주문하다보니까

DHL에서 배송해주는 아이는 통관시 연락오고 바로 통관되는데..

i-parcel에서 배송해주는 연락도 없고 아무런 반응이 없네요

i-parcel에서 배송해줄때 번거롭지만 

개별적인 요청을 해야 처리를 해주더라구요.. 

i-parcel에서 배송해줄때 어떻게 해야할지 모르는 분들

따라 해보실까요?? ㅎㅎ

TRACKING ID : 복사합니다.

https://tracking.i-parcel.com/secure/track.aspx

경로에 가서  Tracking numer에 복사한 TRACKING ID를 붙여넣기 한후 Track 버튼을 누릅니다.

2013.12.22일 전후오 아이파슬에서 메일이 와야 하는데 오질 않아

위에.. contact us 메일주소를 클릭하여

주민번호와 TRACKING ID를 적어 메일로 보냈네요 ㅡㅡ;;

그로부터 몇일이 지났는지 포기하고 있었는데

2014.01.08인 엊그제 도착했네요.

(주문한지 무려 한달이 넘었어요 ㅡㅡ^)

아이파슬은 정말 인내심이 필요할듯 싶네요 ㅎㅎㅎ

PS. 국내 송장이 필요할경우 

TRACKING ID를 적고 로컬트래킹번호 알고싶다고  

메일보내면  알려준다고 하네요

좀 번거롭네요 ㅡㅡ;

     * 작업관리자에 뜬 프로세스 찾아 죽이기 

       (출처 http://www.delphi3000.com/articles/article_4324.asp?SK=)

     function KillTask(ExeFileName: string): Integer;

     const

          PROCESS_TERMINATE = $0001;

     var

          ContinueLoop: BOOL;

          FSnapshotHandle: THandle;

          FProcessEntry32: TProcessEntry32;

     begin

          Result := 0;

          FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);

          FProcessEntry32.dwSize := SizeOf(FProcessEntry32);

          ContinueLoop := Process32First(FSnapshotHandle, FProcessEntry32);

          while Integer(ContinueLoop) <> 0 do

          begin

               if ((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) = UpperCase(ExeFileName)) or

                   (UpperCase(FProcessEntry32.szExeFile) =UpperCase(ExeFileName))) then

               Result := Integer(TerminateProcess(OpenProcess(PROCESS_TERMINATE,BOOL(0),

                                                                 FProcessEntry32.th32ProcessID),0));

               ContinueLoop := Process32Next(FSnapshotHandle, FProcessEntry32);

          end;

          CloseHandle(FSnapshotHandle);

     end;

-----------------------------------------------------------------------------------------------------------------

 * 실행파일이 떠있는지 찾아보기

    uses TLHelp32, Windows;

     function Process32List : Boolean ;

     var

          Process32   : TProcessEntry32 ; // Uses TLHelp32

          SHandle     : THandle ; // the handle of the Windows object

          _ProcessA,

          _ProcessB   : Boolean ;

     begin

          _ProcessB   := FALSE ;

          Process32.dwSize := SizeOf(TProcessEntry32) ;

          SHandle := CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS, 0) ;

          try

             _ProcessA := Process32First(SHandle, Process32) ;

             while _ProcessA do

             begin

                   if UpperCase(Process32.szExeFile) = 'TEST.EXE' then

                   begin

                      _ProcessB := TRUE ;

                      break ;

                   end ;

                if _ProcessB then break ;

                _ProcessA := Process32Next(SHandle, Process32) ;

             end ;

          except

          end;

      end;

애증의 코치팩토리 ㅜㅜ

가입하고 몇번을 구입하려 했지만  돌아오는건 거절이네요 ㅠㅠ

이후 코치팩토리는 배대지와 카드 엄청 가린다고 하고 

몇몇분 성공후기를 보니 미국에 사시는분 아님 무적 변팔밖에 없더라구요.

직구의 끝판왕은 tv와 무적변팔이라던데...ㅎㅎㅎ 

오기로라도 구입해야지라는 생각에

 변팔을 만들고 한 2주정도 지나서 도전해 보았습니다.

 혹시 리밋걸릴까봐  테스트로 키링을 구입하였답니다.

이후 코치팩토리는 별탈없이 잘 구매 되네요 ^^

http://www.coachfactory.com/

가입한 이메일과 비빌번호를 입력하고 enter를 클릭합니다.

테스트이기도 하고 남편 선물겸~~

키링을  장바구니에 넣었습니다.

우측상단  shopping bag에 추가된걸 보실수 있습니다.

Shopping bag를 클릭하시면 우측하단처럼 장바구에 담긴 내용을 확인하실수 있어요.

쉽비가 5$ 붙네요 그래도 도전!!

결제 하기위해서 check out with paypal을 클릭하여 줍니다.

(check out 해서 결제 하셔도 되는데 코치팩토리는 카드며 배대지를 무지 가리기 때문에 결제될 확률이 없습니다.)

결제할 페이지가 페이팔로 로그인하라는 화면이 보입니다.

페이팔 이메일과 비밀번호를 입력하고 login을 클릭합니다.

페이팔에 가입된 상세내역이 보입니다.

Contiune를 누르면 결제 완료 입니다.

첨 주문하고 나서 My Account에 가서  Status를 확인하면 

 Order Received. In Process 이렇게 나타요.

한 일주일 동안 저 상태여서 취소 될줄 알았는데 아래처럼 Order Shipped가 떴습니다.

메일로  주문내용이 먼저 옵니다. ^^

주문후 일주일뒤 쉽되면서 트래킹 번호를 메일로 보내주네요 ^^

이후 200$가 넘는 제가방 남편꺼

양가 어머님꺼 다 아무 탈없이 구입했습니다. ^^ 

계속 아무탈 없이 쓸수 있길 바랄뿐입니다 -0-

울 아이 5살~~ 

아직 한글을 잘몰라요 

몇개월전 "아"와 "야"를 알려줬더니 

아주자랑스럽게  "아"와 "야"만 쓰네요

유치원에서도 꾸준히 한글을 배우고 있지만 습득이 더디네요

유치원만 믿을수 없어서 

제가 가르쳐보려고 자료를 만들다가 포기 ㅜㅜ

그래서 이리저리 검색해봤는데.. 완전 대박 사이트를 찾았어요

유료사이트는 아닌거 같고 출력해서 사용하면 될듯 싶어요

좋은 자료라 공유 해봅니다.

http://www.ilovejoyschool.com/hannnum/han.asp

한글 관련 자료구요 pdf로 되어 있어요 

선긋기, 자음, 모음익히기 ,글자의 구성원리 등

한글뿐만 아니라 수도 있네요 ^^

나이대별루  정말 좋은 자료가가 다양해요~

한글의 경우  A,B,C,D 단계별루 나눠져 있네요 

[A단계]

[B단계]                                      [C단계]                                       [D단계]

울 아이도 금방 한글을 배울수 있겠죠???

오늘부터 도전해봐야 겠어요 ^^

중산층의 기준이 몰까??

생각해보니... 자산얼마?? 금전적인 부분만 생각나네요.

아래의 내용을 보니....

* 한국의 중산층 기준 (직장인 대상 설문결과 )

1. 부채없는 아파트 30평 이상 소유

2. 월급여 500만원 이상

3. 자동차는 2,000 CC급 중형차 소유

4. 예금액 잔고 1 억원 이상 보유

5. 해외여행 1년에 한차례 이상 다닐 것.

* 프랑스의 중산층 기준 (퐁피두 대통령이 Qualite de vie ‘삶의 질’에서 정한 프랑스 중산층의 기준 )

1. 외국어를 하나 정도는 할 수 있어야 하고

2. 직접 즐기는 스포츠가 있어야 하고

3. 다룰 줄 아는 악기가 있어야 하며

4. 남들과는 다른 맛을 낼 수 있는 요리를

만들 수 있어야 하고

5. '공분' 에 의연히 참여할 것

6. 약자를 도우며 봉사활동을 꾸준히 할 것

* 영국의 중산층 기준 (옥스포드 대에서 제시한 중산층 기준 )

1. 페어플레이를 할 것

2. 자신의 주장과 신념을 가질 것

3. 독선적으로 행동하지 말 것

4. 약자를 두둔하고 강자에 대응할 것

5. 불의, 불평, 불법에 의연히 대처할 것

* 미국의 중산층 기준 (공립학교에서 가르치는 중산층의 기준 )

1. 자신의 주장에 떳떳하고

2. 사회적인 약자를 도와야 하며

3. 부정과 불법에 저항하는 것

4. 그 외, 테이블 위에 정기적으로 받아보는 비평지가 놓여있을 것

저또한 전형적인 한국인인가봅니다.  ㅡㅡa

  * 마스터 카드일경우 이중환전을 설정

      페이팔에 등록된 마스터 카드는 왜 달러로 결제하면 달러로 청구해야하는데... 

      페이팔 자체내에서 달러를 환율로 적용하여 원으로 바꾼뒤 원화로 카드사로 청구한다는 점을 알게 됬었습니다.

      이중환전이 안되게 설정하는 방법을 알려드릴게요 ^^

 - My Account -> Profile 클릭 합니다.

    My Money -> 우측 update를 클릭합니다.

-  Set Available Funding sources 클릭합니다.

- Conversion Options 클릭합니다.

- Bill me in the currency~~~~ 체크박스를 클릭합니다.

  submit를 클릭하면 완료