Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Datenbank-Anbindung mit Delphi/PHP (https://www.delphipraxis.net/129557-datenbank-anbindung-mit-delphi-php.html)

mkinzler 22. Feb 2009 09:54

Re: Datenbank-Anbindung mit Delphi/PHP
 
Ja, überall wo du diese verwendest

Exterior 22. Feb 2009 16:24

Re: Datenbank-Anbindung mit Delphi/PHP
 
Also das mit dem MySQL direct scheint ganz gut zu klappen. Aber ich bräuchte nochmal Hilfe:

was macht dieser Code-Abschnitt :wiejetzt:

Delphi-Quellcode:
 cr := FResult.RecNo;
      StringGrid2.RowCount := FResult.RowsCount+1;
      StringGrid2.ColCount := FResult.FieldsCount+1;
      for i:=0 to FResult.FieldsCount-1 do begin
        af := FResult.FieldDef(i)^;
        StringGrid2.cells[i+1,0] := af.Name;
      end;
      FResult.First;
      for i:=0 to FResult.RowsCount-1 do begin
        if FResult.RecNo=cr then
          StringGrid2.Cells[0,i+1] := '*'
        else
          StringGrid2.Cells[0,i+1] := '';


Leider steht nirgends beschrieben, was FResult.RecNo genau ist :(

FResult.FieldDef(i) markiert den Datensatz i, würde ich jetzt denken.

Delphi-Quellcode:
for i:=0 to FResult.FieldsCount-1 do begin
        af := FResult.FieldDef(i)^;
        StringGrid2.cells[i+1,0] := af.Name;
      end;
Bedeutet dann dieser Abschnitt, dass die komplette erste Spalte des Dynasets in die erste Zeile des Stringgrids eingetragen wird? Wenn ja, warum?

Dieser Quellcode soll ja das Ergebnis einer Abfrage in ein Stringgrid übertragen.
Aber warum reicht dafür nicht folgender Code:

Delphi-Quellcode:
for i:=0 to FResult.FieldsCount-1 do begin
         for j:=0 to FResult.FieldsCount-1 do
          StringGrid2.Cells[j+1,i+1] := FResult.FieldValue(j);
        FResult.Next;
:wiejetzt:


Und noch eine Frage:
Ich will die Sache ja in ein DataModule auslagern. Also möchte ich dann im Formular eine Function aufrufen, im DataModule die Abfrage machen und dann das Dynaset an das Formular zurückgeben. Aber wie? Ne Funktion als Array machen? Geht das?

Oder könnte / müsste ich dann quasi den Abschnitt zum Übertragen ins Formular mit eintragen und dann z.B.

Delphi-Quellcode:
StringGrid2.Cells[j+1,i+1] := DataModule.FResult.FieldValue(j);
schreiben?

mkinzler 22. Feb 2009 16:28

Re: Datenbank-Anbindung mit Delphi/PHP
 
Zitat:

FResult.FieldDef(i) markiert den Datensatz i, würde ich jetzt denken.
Nein es werden Informatioen zu den Feldern ermittelt.
Zitat:

Bedeutet dann dieser Abschnitt, dass die komplette erste Spalte des Dynasets in die erste Zeile des Stringgrids eingetragen wird? Wenn ja, warum?
Nein es werden die Feldname in die erste Zeile des Grids geschrieben
Zitat:

Aber warum reicht dafür nicht folgender Code: ...
Für die Werte allein reicht er ja


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:09 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz