Problem mit direct Mysql

[deplinux]

Hallo,

ich habe seid mehreren Stunden das Problem, dass ich nicht weiss, wie ich mit direct mysql eine Abfrage ausgebe.

Ich habe eine tabelle user und ich möchte einfach nur die anzahl der daran enthaltenden Datensätze ausgelesen haben und in einem Edit Feld angezeigt bekommen.

Delphi-Quellcode:

FMysql := TMysqlClient.create;
Memo1.Lines.LoadfromFile('daten.txt');

FMysql.Host := Memo1.Lines[1];
  FMysql.port := 3306;
  FMysql.user :=Memo1.Lines[2];
  FMysql.password := Memo1.Lines[3];
  FMysql.UnixSocket := '';
  FMysql.Db := Memo1.Lines[4]; // Datenbank auf dem Server
  FMysql.UseNamedPipe := false;
  FMysql.UseSSL := false;
  FMysql.Compress := true;
  FMysql.TrySockets := false;
  if FMysql.Connect then

  else
    ShowMessage('Fehler beim Verbinden zur SQL Datenbank: '+FMysql.LastError);

    begin


  FResult := FMysql.query('SELECT * FROM forum_user', true, ex);
  showmessage(FResult);

DAs habe ich bis jetzt. Kann mir jemand helfen, wie ich jetzt die anzahl der datensätze in einem Edit zurückgeben kann?

[mkinzler]

SELECT COUNT(*) as Anzahl FROM forum_user;

[deplinux]

Zitat von mkinzler:

SQL-Code:

SELECT COUNT(*) as Anzahl F
ROM forum_user;

Das bringt mir schonmal sehr viel, nur jetzt habe ich noch das Problem, dass ich nicht weiss, wie genau ich es nun in einem Edit Feld ausslesen lassen kann.


Mit dem Code möchte ich auch noch, dass mir alle Ergebniss die ausgelesen werden in 1(!) Label gelesen werden
SELECT * FROM forum_user WHERE user_online = "1"

Es wäre wirlich nett, wenn du mir helfen könntest!

Vielen Lieben Dank im Vorraus!

[mkinzler]

http://www.delphi-treff.de/tutorials...direct/page/4/

[deplinux]

Zitat von mkinzler:

http://www.delphi-treff.de/tutorials/datenbanken/mysql-direct/page/4/

Das habe ich mir ja alles scho angeschaut.

Kannst du mir nich einen tipp geben wie ich es ausgeben muss?

Die abfrage habe ich schon mir scheitert es ja nur bei der Ausgabe...

[DeddyH]

http://www.delphipraxis.net/internal...=839783#839783