数据库读取？

Question

请问有什么方法可以依次获取数据表中某个字段具体的值？

Answer 1

while not table1.eof do
begin
zz:=table1.fieldbyname('fieldname').asstring;(asinteger)
table1.next
end

Answer 2

while not table1.eof do
begin
zz:=table1.fieldbyname('fieldname').asstring;(asinteger)
table1.next;
end

Answer 3

with Table do
begin
  First;
  while not Eof do
  begin
    变量 := FieldByName('FieldName').AsString;(还有AsInteger等) 
  end;
end;

Answer 4

if edit2.Text=edit3.Text then
        begin
          DM1.TableZHZ.Active:=false;
          DM1.TableZHZ.Active:=true;
          with DM1.TableZHZ do
          begin
  if not locate('UserName',edit1.text,[Lopartialkey]) then
              begin
                append;
                Fieldbyname('code').asstring:=edit4.text;
                FieldByName('UserName').asstring:=edit1.Text;
                FieldByName('passWord').asstring:=Encrypt(trim(edit2.Text),21);
                post;