1. °³¹ß/½ÇÇà Ç÷§Æû (1) OS : (2) °³¹ßÅø : (3) »ç¿ë Database :
2. °³¹ß ÁßÀÎ ÇÁ·Î±×·¥
3. Áú¹® ³»¿ë
procedure TForm1.Button1Click(Sender: TObject); begin with Query1 do begin Close; with SQL do begin Clear; Add('SELECT MI.*, MSG.*, MS.*, MH.*, MG.*, ME.*, MEX.*'); Add('FROM FMAS_OO1 MI, FMAS_OO2 MSG, FMAS_OO3 MS, FMAS_OO4 MH, FMAS_OO5 MG, FMAS_¤·¤·6 ME, FMAS_EXTEND MEX'); Add('WHERE M_GU=MSG_GU(+) AND M_KEY=MSG_KEY(+)'); Add(' AND M_GU=MS_GU(+) AND M_KEY=MS_KEY(+)'); Add(' AND M_GU=MH_GU(+) AND M_KEY=MH_KEY(+)'); Add(' AND M_GU=MG_GU(+) AND M_KEY=MG_KEY(+)'); Add(' AND M_GU=ME_GU(+) AND M_KEY=ME_KEY(+)'); Add(' AND M_GU=MEX_GU(+) AND M_KEY=MEX_KEY(+)'); Add(' AND M_NAME LIKE :M_NAME'); Add('ORDER BY M_GU, M_KEY'); end; ParamByName('M_NAME').AsString := '%' + Edname.Text + '%'; Open; Screen.Cursor := crDefault; end;
end;
ÇöÀç ÀÌ·¸°Ô µÇ¾îÀÖ°í ¹öÆ°À» ´©¸£¸é À̸§¸¸ ³ª¿À´Âµ¥ ÄÞº¸¹Ú½º¸¦ Ãß°¡Çؼ Ç׸ñº°(À̸§,ÁÖ¼Ò,ÀüȹøÈ£ µî)·Î °Ë»öÀ» ÇÏ°í½ÍÀºµ¥ ¾î¶²½ÄÀ¸·Î Ãß°¡¸¦ ÇؾßÇÒÁö µµÀúÈ÷ °¨ÀÌ ¾È ÀâÈü´Ï´Ù...
|