£¨ÔÚÏߵȴý£©ListBoxÖÐÏÔʾAccessÖ¸¶¨×ֶεļǼ
±¾ÈËÊǸÕѧϰDelphi×Å£¬ÏÖÓöµ½ÈçÏÂÒ»¸öÎÊÌ⣺
ÎÒÏëÔÚListBoxÖÐÏÔʾAccessÊý¾Ý¿âTB±íµÄPeople×Ö¶ÎÀïÃæµÄ¼Ç¼¡£
ÀýÈ磺
TB±íÖеÄ×Ö¶ÎPeopleÀïÃæ¼Ç¼£ºA,B,C,D......
ÔÚListBoxÖÐÏÔʾ£¬ListBox.Item[0]:=A
ListBox.Item[1]:=B
ListBox.Item[2]:=C
ListBox.Item[3]:=D
Ò²¾ÍÊÇPeopleÖеÄÒ»¸ö¼Ç¼ÔÚListBoxÒ»¸öÐÐÖÐÏÔʾ¡£
·Ç³£¸Ðл£¬Ï£Íû¸÷λ¸ßÊÖ¼°Ê±°ïÖú¡£
ListBox1.Items.Strings[0] := ×Ö¶Î1µÄÖµ+':'+×Ö¶Î2µÄÖµ+':'+×Ö¶Î3µÄÖµ+':'+×Ö¶Î4µÄÖµ
ÓÃ':'ºÅ·Ö¸ô¿ª£¬¶ÁȡʱÔÙÒÔ':'ºÅ·ÖÀëÌáÈ¡
¿ÉÒÔÔÙÏêϸһµãÂð£¿ÈçºÎ´ÓPeopleÖжÁȡÿһ¸ö¼Ç¼°¡£¿Í¨¹ýʲô°ì·¨£¿
var
TempStr: string;
i, j: integer;
People.First;
for i:=0 to People.recordcount-1 do
begin
TempStr := '';
for j:=0 to People.Fields.count-1 do
begin
TempStr := TempStr + People.Fields[j].AsString;
if j <> People.Fields.count-1 then
TempStr := TempStr + ':';
end;
ListBox1.Items.Add(TempStr);
end;
PeopleÊÇÊý¾Ý±íÖеÄ×Ö¶ÎÃû£¬ÎÒÒªÔõô¶¨Òå²ÅÄÜÈÃÉÏÃæµÄ´úÂëʵÏÖ°¡£¿ÈçPeople.FirstÄÜÕý³£µÄÔËÐÐ
Ïà¹ØÎÊ´ð£º
ÎÒÓÃAccessÊý¾Ý¿â×öÁËÒ»¸öͼÊéÊý¾Ý¿â£¬ÀïÃæÓÐÒ»¸ö×Ö¶ÎÊÇISBN£¬¾ÍÊÇISBNºÅ£¬µ«ÊÇÖ»µÄÒ»×Ü·ÖͼÊéдµÄISBNºÅ£¬ÓеÄûд£¬Ð´µÄÄÇÒ»²¿·ÖÓеÄISBNÊÇÖØ¸´µÄ£¬ÄÜ·ñÓÃSQLÓïÑÔ°ÑÖØ¸´µÄ¹ýÂ˵ô£¬µ«Ã»Ð´ISBNºÅµÄͼÊé²»ÄܹýÂ˵ô£¬È ......
DbgridÁ¬½Óaccess ÏÔʾÊý¾ÝʱÍ϶¯¹ö¶¯ÌõËÀ»ú£¿Ôõô½â¾ö°¡£¿
»úÆ÷Ì«²îÁ˰ɣ¿
ÊDz»ÊÇÄãÊý¾ÝÁ¿Ì«´óÁ˰¡
ÄãÊý¾ÝÉÙһЩ¿´¿´»¹ËÀ»úÂð£¿
Êý¾ÝºÜÉÙ°¡ ¾ÍÒ»Ò³¡£
ÎÒÔÚBCB6ÏÂ×ö¹ý²»ÉÙ DBGRID+ACCESS £¬´ÓÀ´Ã»ÓÐÓöµ½ ......
ÎÒдÁËÒ»¸öÈí¼þ£¬ÒªÓõ½ACCESSÊý¾Ý¿â£¬ÎÒÔÙ·ÃÎÊACCESSµÄʱºò£¬ÎÒÐèÒª´Ó±íÀï¶Á³öÒ»ÐÐÊý¾Ý£¬ÎҵijÌÐòÊÇÕâÑùдµÄ£¬SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......
´ó¼Ò°ïÏÂæÁË
Çë½ÌÒ»¸öSQL²éѯµÄÎÊÌâ
±ÈÈçÎÒÏÖÔÚ²éѯ
SELECT * from XS WHERE רҵÃû='¼ÆËã»ú'
²éѯÍê³ÉÖ®ºóÎҿɲ»¿ÉÒÔÔÚÉϴβéѯµÄ»ù´¡Ö®ÉÏÔÚ½øÐÐÏà¹Ø²éÑ¯ÄØ£¿
±ÈÈçÎÒÔÚ²éÍê¼ÆËã»úרҵµÄËùÓÐѧÉúÖ®ºó£¬Ïë²é³ö¼ ......