查詢並逐行顯示資料庫表中的所有欄位名

procedure tform1.fields_showbtnclick(sender: tobject);

vark: integer;
fieldsstr: string;
begin
if sqldataset1.commandtype <> ctquery  then
begin
sqldataset1.commandtype：=ctquery；
//設定命令型別為ctquery，即執行查詢
sqldataset1.commandtext := 'select *  from guyuan where age>26 ;
//設定命令文字，查詢guyuan表年齡》26 的記錄
sqldataset1.open；
fieldsstr := 'guyuan表共有'+inttostr(sqldataset1.fieldcount)+'個字段，其各欄位名如下：'+#13#10;
for k := 0 to sqldataset1.fieldcount - 1 do
//根據資料集的fieldcount屬性控制迴圈次數，每個欄位名顯示一行
fieldsstr := fieldsstr + sqldataset1.fields[i].fieldname + #10;
showmessage(fieldsstr);
end;
end;

查詢資料庫所有表以及表的所有列

select from tab select a.b.comments from select t.table name,t.column name,t.data type from user tab cols t where table name entp show a left join sel...

Oracle資料庫 查詢所有表

1.查詢當前資料庫下的所有表 select from all tables where owner test 注 all tables查出來是查得所有使用者下的表，當然也包括你登入的用下的表，然後加乙個where你要查的那個使用者名稱就可以了。記得使用者名稱要大寫 2.查詢當前資料庫下某個例項資料庫...

查詢所有資料庫中的所有表的所有欄位的資訊

查詢所有資料庫中的所有表的所有欄位的資訊 declare s varchar 8000 set s select s s select select name as dbname,a.name as tablename,b.name as colname,c.name as coltype,c.le...