procedure first

Syntax:

procedure first;

Beschreibung:

Die Methode First positioniert auf den ersten Datensatz der Datenmenge.

Mit First können Sie den ersten Datensatz der Datenmenge zum aktiven Datensatz machen. Dabei werden zuerst die Änderungen des aktuellen Datensatzes eingetragen und dann folgende Aktionen durchgeführt:

Der Datensatzpuffer wird gelöscht. Der erste Datensatz wird abgerufen und zum aktiven Datensatz gemacht. Die weiteren für die Anzeige benötigten Datensätze werden abgerufen, um beispielsweise eine Gitterkomponente zu füllen. Die Eigenschaft Bof wird auf true gesetzt. Die verbundenen Steuerelemente und Detailmengen werden von der Änderung benachrichtigt. Diese führen dann die entsprechenden Aktualisierungen durch.

Hinweis: TDataSet verwendet interne, geschützte Methoden, um den aktiven Datensatz zu wechseln und die für die Anzeige benötigten Datensätze abzurufen. In TDataSet sind diese internen Methoden leere Grundgerüste. Sie werden in abgeleiteten Klassen implementiert, um die Funktion von First bereitzustellen.

Beispiel:


// Alle Datensätze in Customers (einer Tabelle in Windows

// und SQLDataSet-Komponente in Linux) durchlaufen.
// ProgressBar entsprechend aktualisieren.

procedure TForm1.Button1Click(Sender: TObject);

var
  i: Integer;
begin
  with ProgressBar1 do
  begin
    Min := 0;
    Max := Customers.RecordCount;
    Customers.First;
    for i := Min to Max do
    begin
      Position := i;
      Customers.Next;
      // Operationen mit aktuellem Datensatz durchführen
    end;
  end;
end;