sqlserver查询顺序如下:
var ADOConnection: TADOConnection; ADOQuery: TADOQuery; DataSource: TDataSource; DBGrid: TDBGrid; begin // 创建数据库连接 ADOConnection := TADOConnection.Create(nil); ADOConnection.ConnectionString := 'Provider=SQLOLEDB.1;Password=your_password;Persist Security Info=True;User ID=your_username;Initial Catalog=your_database;Data Source=your_server'; ADOConnection.LoginPrompt := False; ADOConnection.Open; // 创建查询组件 ADOQuery := TADOQuery.Create(nil); ADOQuery.Connection := ADOConnection; ADOQuery.SQL.Text := 'SELECT * FROM your_table'; // 替换为你的查询 ADOQuery.Open; // 创建数据源组件 DataSource := TDataSource.Create(nil); DataSource.DataSet := ADOQuery; // 创建DBGrid组件 DBGrid := TDBGrid.Create(nil); DBGrid.Parent := Self; // 设置DBGrid的父容器 DBGrid.DataSource := DataSource; DBGrid.Align := alClient; // 使DBGrid填满容器 // 布局DBGrid DBGrid.Columns[0].Title.Caption := '列标题1'; // 自定义列标题 // ... 可以添加更多列标题 // 显示窗体 Self.Show; end;
14 评论