귀하는 손님 이십니다
로그인
회원가입
  
  델마당 공식 은행계좌
  하나은행 227-910235-83607
  예금주 이상국(운영진)
프로젝트 게시판
투표게시판
델마당소개
기초부터 활용까지! 델파이 교육 - 데브기어
 광고문의 :
吏덈Ц怨 떟蹂 吏덈Ц怨 떟蹂 입니다.
글내용 - 吏덈Ц怨 떟蹂
 [떟蹂] 씠 옱誘몃궃 떎뿕뿉 빐 떟쓣 븘떆뒗 遺?
coding
(沅뚯닚샇)
2019-05-03 삤썑 7:13:44
660회 조회


등록된 파일이 없습니다.

>> 궓쓽 냼뒪 遺꾩꽍븯떎媛 옱誘몃궃 肄붾뱶媛 蹂댁뿬꽌 뿬윭遺꾨뱾猿섎룄 蹂댁뿬뱶由쎈땲떎.

>> 븘二 媛꾨떒븯硫댁꽌 옱誘몃궃 肄붾뱶씠땲 븳踰 遊 二쇱떆湲 諛붾엻땲떎.

>>  

>> 븘옒 泥섎읆 뼱뼡 硫붿꽌뱶媛 엳뒿땲떎.

>>  procedure Check (  AValue : boolean );

>> 씠 硫붿꽌뱶쓽 留ㅺ컻蹂닔쓽 뜲씠꽣 엯 boolean 엯땲떎.

>>  

>>  洹몃윴뜲 洹 留ㅺ컻蹂닔뿉떎媛 븘옒 媛숈 吏볦쓣 븯硫 boolean 엯씠 븘땲뜑씪룄

>> 而댄뙆씪씠 맗땲떎.

>> 1. Check( nil = nil );  而댄뙆씪 맖.

>> 2. Check(  TObj = nil  );  而댄뙆씪맖.

>> 3. Check(  TObj.Create = nil  );  而댄뙆씪맖.

>>  

>> TObj 뒗 엫쓽濡 留뚮뱺 겢옒뒪엯땲떎.

>> TObj = class

>> end;

>>  

>> 4. Check( nil );  떦뿰엳 씠嫄 而댄뙆씪 븞맗땲떎.

>>  

>> 솢 1, 2, 3, 踰덉씠 而댄뙆씪씠 릺硫 윴떇쑝濡 留ㅺ컻蹂닔瑜

>> 꽆湲곌쾶 릺硫 뼱뼡 쓽誘몃 媛吏뒗吏 紐낇솗븯寃 븘떆뒗遺 엳쑝떊媛슂?

>> nil 뜲씠꽣 엯뿉 빐 븳踰덈뜑 깮媛곹븯寃 留뚮뱶뒗 肄붾뱶씪

>> 뿬윭遺꾨뱾猿 뿬彛덉뼱 遊낅땲떎.

>>  

>> [ 젣媛 뀒뒪듃븳 肄붾뱶 엯땲떎. ]

>>  

>> unit Unit1;

>> interface

>> uses
  Forms, Controls, StdCtrls, Classes;

>> type
  TObj = class
  end;

>>   TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
    procedure Check( AValue : boolean);
  public
    { Public declarations }
  end;

>> var
  Form1: TForm1;

>> implementation

>> var
  obj : TObj;

>> {$R *.dfm}

>> { TForm1 }

>> procedure TForm1.Check(AValue: boolean);
begin
{ TODO : TODO }
end;

>> procedure TForm1.Button1Click(Sender: TObject);
begin
  Check( True);      // 而댄뙆씪 ok
  Check(TObj = nil); // 而댄뙆씪 ok
  Check( nil = nil );// 而댄뙆씪 ok
  Check( TObj.Create = nil );//而댄뙆씪 ok

>>   //Check( nil ); // 而댄뙆씪 ng
end;

>>
end.

>>  

>>  

>>  

 

옱誘 뾾뒗 六뷀븳 궡슜씤뜲슂. 뀑뀑

Check()쓽 뙆씪誘명꽣媛 Boolean 엯쑝濡 젙쓽릺뼱 엳湲 븣臾몄뿉

(TObj = nil)

(nil = nil)

(TObj.Create = nil)

쐞쓽 꽭媛吏 寃쎌슦 떎 '=' 삤띁젅씠꽣瑜 궗슜븯怨 엳쑝誘濡 紐⑤몢 뙆꽌뿉 쓽빐꽌 Boolean 떇쑝濡

룊媛릺뼱 AST 뙆떛 끂뱶媛 깮꽦릺寃 릺誘濡 씠긽븷 寃 뾾뒗 寃껋엫. 뀑뀑

(nil = nil) 쓽 寃쎌슦뿏 뙆꽌뿉 쓽빐꽌 True 媛믪쑝濡 긽닔 痍④툒 릺뒗 嫄곌퀬.