DELPHI.NET中的資料處理不知該如呵做呢?? 小弟將資料載到DATASET中的DATATABLE裡,不知該如何使用裡面的資料?? (以前的用法是如此query.FieldByName('NAME').AsString) ======================== 我是DELPHI5的初學者

procedure TWebForm1.Button1_Click(sender: System.Object; e: System.EventArgs);
var
  ds  : DataSet;
  i,j,n: integer;
  s   : string;
  sSQL : string;
begin
  sSQL := 'SELECT * FROM acUser ; SELECT * FROM acDept';
  ds := GetDataSet( sSQL );
  s := s   '列出 DataSet 中所有 Table 的名稱';
  for i := 0 to ds.Tables.Count-1 do begin
    s := s   ds.Tables[i].TableName '
';
    s := s   '';
    s := s   '';
    for j := 0 to ds.Tables[i].Columns.Count-1 do
      s := s   '';
    s := s   '';
    for j := 0 to ds.Tables[i].Rows.Count-1 do begin
      s := s   '';
      for n := 0 to ds.Tables[i].Columns.Count-1 do
        s := s   '';
      s := s   '';
    end;
    s := s   '
'   ds.Tables[i].Columns[j].ColumnName   '
'   ds.Tables[i].Rows[j][n].ToString   '
';
  end;
  Label1.Text := s;
end;

小弟的問題是對TABLE的存取方法,是否跟以往差異很大呢?? ======================== 我是DELPHI5的初學者

cn1.ConnectionString := SqlPath; EZ_USER.Clear; da2.SelectCommand.CommandText := 'select * from ez_user'; da2.SelectCommand.Connection := cn1; da2.Fill(EZ_USER); //比對使用者資料 for i :=0 to EZ_USER.Rows.Count -1 do begin if (EZ_USER.Rows[i].Item['id'].ToString = tbUser.Text) and (EZ_USER.Rows[i].Item['pswd'].ToString = tbPassword.Text) then begin Session['IsLogin'] := 'True'; Break; end else Session['IsLogin'] := 'False'; end; 以上是小弟測試後的結果,不知是否還有其他比較好的方式,否則要讀取TABLE中的資料都要利用回圈一筆一筆的找,不能像以往的QUERY一樣方便好用!! ======================== 我是DELPHI5的初學者

不確定你用的是哪種資料元件 ( BDP.NET? ADO.NET? ), 下列程式採用 ADO.NET.    

function ChkUserPWD( UID, PWD : string ) : boolean;
const
  cnStr : string = 'Addr=127.0.0.1;user id=UID;password=PWD;initial catalog=DatabaseName';
  SQL   : string = 'SELECT [id] FROM ez_user WHERE [id]=@UID AND [pswd]=@PWD';
var
  cm : System.Data.SqlClient.SqlCommand;
  cn : System.Data.SqlClient.SqlConnection;
  res: TObject;
begin
  cn := System.Data.SqlClient.SqlConnection.Create( cnStr );
  cn.Open;
  cm := System.Data.SqlClient.SqlCommand.Create( SQL, cn );
  cm.Parameters.Add( '@UID', UID );
  cm.Parameters.Add( '@PWD', PWD );
  res := cm.ExecuteScalar;
  cm.Free;
  cn.Close;
  cn.Free;
  result := ( res <> nil );
end;

多謝shieh2700大哥的指導,不過小弟剛好是使用bdp來做為資料庫連線,和ADO用的方法似乎不同??因小弟目前都是參考MS VS.NET的書籍來試驗.. ======================== 我是DELPHI5的初學者

兩者的方式大同小異, 多多參考 MSDN 上的範例吧.