delphi + oracle µÝ¹éµÄÎÊÌâ
´ó¼ÒºÃ£º
ÎÒĿǰҪ¿ª·¢Ò»¸öERPÖеÄBOM¹¤Ê±»ã×ܳÌÐò£¬ÔÚORACLEÖУ¬BOM±íµÄ½á¹¹ÊÇ´«Í³µÄ ¸¸¼þ ×Ó¼þ ʽµÄ£¬¹¤Ê±ÔÚÁíÒ»¸ö±íÖУ¬¿ÉÒÔÓÃleft outer joinÀ´¹ØÁª£¬¿ÉÒÔÈÏΪ£¬¹ØÁªºóµÄ±í½á¹¹Îª [¸¸¼þ] [×Ó¼þ] [¹¤Ê±] [»ã×ܽá¹û]¡£
ÎÒĿǰÓÃDELPHI¿ª·¢£¬ÎÒÏëÓõݹéµÄ·½Ê½À´»ã×Ü×Ó¼þµÄ¹¤Ê±£¬ÌîÈë»ã×ܽá¹û¡£Õâ¸öµÝ¹éÓ¦¸ÃÔõôд°¡£¿
û¿´Ã÷°×
¡°»ã×ܽá¹û¡±ÊÇÒª¼ÆËãµÄÄÚÈÝ£¿
ÊÇÒª¼ÆËã×Ó¼þµÄ¹¤Ê±£¿»¹Êǽ«×Ó¼þµÄ¹¤Ê±ÀÛ¼Óµ½¸¸¼þÖУ¿
Êǽ«×Ó¼þµÄ¹¤Ê±ÀÛ¼Óµ½¸¸¼þÖУ¿
Äã¿ÉÒÔÔÚÍøÉÏÕÒһϣ¬oracleÊÇ¿ÉÒԵݹéµÄ£º
iID := 100;
start with id = iID
connect by prior parentid = iID;
ÕâÖÖ¸ñʽ£»
BOM±íÓ빤ʱ¿ÉÒÔ¹ØÁª³ÉÒ»¸ö±í£¬È»ºó×öµÝ¹é
¸øÄãÒ»¸öÀàËÆµÄ
create table tt(autoid int,cname varchar2(20),fartherid int);
insert into tt values(13,'ÐÇÐǹ«Ë¾', 0);
insert into tt values(14,'×ܹ«Ë¾', 13);
insert into tt values(15,'ÐÐÕþ²¿', 14);
insert into tt values(16,'·Ö¹«Ë¾', 13);
insert into tt values(17,'ÏúÊÛ´¦', 16);
procedure TForm1.RefreshTreeView;
procedure getStructrueInfo(vKeyID: string;tnode: TTreeNode);
var
oraQuery1: TOraQuery;
Tnode1: TTreeNode;
begin
oraQuery1 := TOraQuery.Create(nil);
try
with oraQuery1 do
begin
close;
Ïà¹ØÎÊ´ð£º
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
¸÷λoracle¸ßÊÖ£¬Çë½ÌÒ»ÏÂΪʲôoracle 10gÔÚ°²×°µ½°Ù·ÖÖ®°ËÊ®ÎåµÄʱºò¾Í±¨´í²»ÄܼÌÐø°²×°£¿
ÄÚ´æ¶à´ó£¿¡¡ÖØÐÂϸöÊý¾Ý¿â°²×°ÊÔÊÔ..
ÒýÓÃ
¸÷λoracle¸ßÊÖ£¬Çë½ÌÒ»ÏÂΪʲôoracle 10gÔÚ°²×°µ½°Ù·ÖÖ®°ËÊ®ÎåµÄʱ ......
hongqi162¡¢windindance
´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ³£ÉÏÀ´×ª×ªµÄ
ÒýÓÃ
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔÒò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É
¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......
ÎÒÓÐÒ»¸öserver 2000ÀïµÄÊý¾Ý,ÏÖÔÚÏëתµ½oracleÊý¾Ý¿âÉÏÓÃ,²»ÖªµÀÓÐûÓиßÊÖÓмòµ¥ÓÖ¿ì½ÝµÄ·½·¨,ǰÌáÊDz»ÄܸÄÔÀ´oracleÀïµÄÔÓеÄÊý¾Ý¿â,Ö»ÄÜн¨
ÒýÓÃ
°²×°£Ï£Ò£Á£Ã£Ì£ÅµÄ£Ï£Ä£Â£Ã£¬È»ºóÓãӣѣ̡¡£Ó£Å£Ò£Ö£Å£ ......