如何将数据库中的数据在PANEL上显示出来？

Question

unit B03;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, Menus, ExtCtrls, Grids, DBGrids, DB, ADODB;type
  Tcustmer = class(TForm)
    btnappend: TSpeedButton;
    btnmodify: TSpeedButton;
    btndelete: TSpeedButton;
    btnfirst: TSpeedButton;
    btnlast: TSpeedButton;
    SpeedButton9: TSpeedButton;
    btnlastest: TSpeedButton;
    btnnext: TSpeedButton;
    btnsave: TSpeedButton;
    btncancel: TSpeedButton;
    btnselect1: TSpeedButton;
    Panel1: TPanel;
    Label1: TLabel;
    custmerno: TEdit;
    Label2: TLabel;
    Edit2: TEdit;
    Label3: TLabel;
    Edit3: TEdit;
    Label4: TLabel;
    Edit4: TEdit;
    Label5: TLabel;
    Edit5: TEdit;
    Label6: TLabel;
    Edit6: TEdit;
    CheckBox1: TCheckBox;
    GroupBox1: TGroupBox;
    DBGrid1: TDBGrid;
    DataSource1: TDataSource;
    ADOQuery1: TADOQuery;
    procedure Formshow(Sender:TObject);
        
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  custmer: Tcustmer;
              
implementationuses
    Unit2,B031;{$R *.dfm}procedure Tcustmer.Formshow(Sender:TObject);
begin
  with ADOQuery1 do
  begin
    close;
    SQL.Clear;
    SQL.Text:='select * from TPADFA';
    Open;
    btnfirst.Visible:=false;
    btnlast.Visible:=false;
    btncancel.Visible:=false;
    btnsave.Visible:=false;
  end;
end;end.这是我所编写的代码，我想请问我应该怎么做才可以把数据库中某张表的信息传递到PANEL控件上并显示出来？

Answer 1

Panel有个Caption属性，可以设置文本信息；
Panel上还可以放其他的控件...；
Panel上还可以TextOut输出文本...

Answer 2

panel是不是有很多Edit/Label??
LZ的意思应该是显示在Edit上;procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text:=ADOQuery1.FieldByName('Field1').AsString ;
  Edit2.Text:=ADOQuery1.FieldByName('Field2').AsString ;
  ...
end;

Answer 3

ADODATESET获得结果集，然后取出数据，panel.caption ：= 

Answer 4

我想要表达的意思就是三楼的那位朋友说的那样
不过三楼朋友的那种方法不行
ADOQuery1.后面没有FieldByName这个东西出现还有一点我想请教 就是
当我在Panel上的Edit中写入内容后，该如何做才可以让下面的客户信息列表（DBGrid）中相应的位置也写入该内容。

Answer 5

可以Panel上放一些控件如Edit　Label，然后把数据集中的数据取出来然后放在这些控件里

Answer 6

楼主：DBGrid、DBEdit、DBText等数据感知控件，都有一个DataSource属性，标识数据源；而DataSource控件又有一个DataSet属性，标识数据集这些，常见的书上都有介绍的

Answer 7

ADO?    ——〉Event——〉OnNewRecord——〉
  begin
     DataSet.FieldByName('**').AsString:=''+ADOQuery1.FieldValues('**')+'';
  end;
———————

Answer 8

数据库里的数据干嘛不放到DBGrid里面去啊？ 纳闷了 o(∩_∩)o...哈哈 

Answer 9

我已经解决这个问题了，但是还是要谢谢大家的帮忙。
其实只要用DBEdit控件,再通过DataSource将其与数据库连接，再把FieldName改为与数据库里一样的名字就可以解决了。