Einzelnen Beitrag anzeigen

Benutzerbild von Net7
Net7

Registriert seit: 22. Jun 2004
Ort: Lauenburg
161 Beiträge
 
Delphi 7 Professional
 
#2

Re: Wie Spalte in Listbox laden mit MySQL Direct?

  Alt 10. Aug 2009, 14:01
Hi,

mal ein Beispiel aus einem meiner Projekte

Delphi-Quellcode:

MysqlResult := MySqlClient.Query('SELECT * from `Hersteller` ORDER BY `Hersteller_id` ASC');

  if assigned(MysqlResult) then
    begin
      Anzahl := MysqlResult.RowsCount; <-- Anzahl der Hersteller
      for i := 0 to Anzahl - 1 do
        begin
          Inhalt := self.MysqlResult.FieldValue(1); <-- 0 währe Hersteller_id '1' ist Hersteller_name usw.
          // ein direktes ansprechen der felder ist auch möglich
          Inhalt:=MysqlResult.FieldValueByName('Hersteller_name');
                
             

          MysqlResult.Next; <-- Nächster Schleifendurchgang
        end;
    end;

Nachtrag: Achso vergiss nicht MysqlResult: TMysqlResult; zu definieren

Mfg Marko
Marko
So`ne Atombombe kann einem den ganzen Tag verderben!
Eine eigene DLL in C++ geschrieben wird meist ein Sklave für mein Delphi/Pascal.
  Mit Zitat antworten Zitat