Einzelnen Beitrag anzeigen

Benutzerbild von RWarnecke
RWarnecke

Registriert seit: 31. Dez 2004
Ort: Stuttgart
4.408 Beiträge
 
Delphi XE8 Enterprise
 
#7

AW: Daten aus einer Select-Anweisung auslesen ohne DataGrid

  Alt 14. Feb 2011, 06:18
Hallo zusammen,

danke erstmal für eure Antworten. Dank dem kleinen Beispiel von DataSpider habe ich es jetzt hinbekommen. Das Schlüsselwort war ExecuteReader.

Delphi-Quellcode:
method MainForm.button2_Click(sender: System.Object; e: System.EventArgs);
var
  cmd: FbCommand;
  conn: FbConnection;
  dr: FbDataReader;
begin
  conn := new FbConnection('User ID=sysdba;Password=masterkey!;' +
              'Database=111.111.111.111:/firebird/testdb.fdb; ' +
              'DataSource=111.111.111.111;Charset=NONE;');
  var SQLCommandText1 := "SELECT * FROM Details;";
  conn.Open();
  cmd := new FbCommand(SQLCommandText1, conn);
  dr := cmd.ExecuteReader();
  ListBox1.BeginUpdate();
  while (dr.Read()) do begin
    ListBox1.Items.Add(dr[0].ToString + ' - ' + dr[1].ToString + ' - ' + dr[2].ToString);
  end;
  ListBox1.EndUpdate();
  conn.Close();
end;
Rolf Warnecke
App4Mission
  Mit Zitat antworten Zitat