MySQL: Seitenweise blättern

[Seven]

Hallo zusammen,

ich muss mit Delphi auf MySQL zugreifen(soweit so gut [select name from kunden where umsatz > 200)
Jetzt möchte ich pro Seiten 30 Ergebnisse aus meiner Query anzeigen lassen und dann per Button die nächsten 30 treffer anzeigen lassen.

Frage:

Wie kann ich das am Besten realisieren?

[franktron]

du must nur mit limit arbeiten am besten in der MYSQL Doku gucken

[Seven]

ok mit limit habe ich begriffen (limit 0,30) aber wie kann wie per button die nächsten 30 anzeigen lassen. Ich muss gestehen bin gerade erst in den anfängen mit Delphi zu programmieren *schäm*

[Sharky]

Hai Seven,

Du musst mit einer Variablen arbeiten und die dann pro Buttonklick um 30 erhöhen:

Delphi-Quellcode:

var
  i_offset : Integer;

procedure TForm1.FormCreate(Sender: TObject);
begin
  i_offset := 0;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ZQuery1.Close;
  ZQuery1.SQL.Text := 'SELECT * FROM tabelle LIMIT :offset,30';
  ZQuery1.ParamByName('offset').AsInteger := i_offset;
  ZQuery1.Open;
  Inc (i_offset,30);
end;

[Seven]

@Sharky

Danke für den Tipp. Ich werde es mal probieren, da nicht über die BDE auf MySQL zugreife, kann ich Deine Query auch nicht benutzen. Da in meiner Query kein ParambyName zur Verfügung steht. Aber den Sinn habe ich verstanden. Mal sehe ob ich es auch umsetzten kann.

[Sharky]

Mit welchen Querys greifst Du denn auf den MySQL zu?
Ich benutze die Zeos-Komponenten und bin damit recht zufrieden.

[Seven]

Habe auch zuerst Zeos probiert, doch ich bekam immer beim select * aus der query die Fehlermeldung "ungültige Feldgröße" ca. 68000 Datensätze.

Daher bin ich jetzt testweise zu Scibit Mysqlcomponents umgestiegen. Bisher habe ich mit dieser Komponente keine Probleme gehabt.