Welcome
Guest
, you are in:
<root>
•
Anmelden
CP Wiki
Navigation
¶
CP Solutions
Startseite
domizil+
Startseite
Administration
Administration
Neue Seite
Alle Seiten
Kategorien
Navigations-Pfade
Datei Manager
Neuer Benutzer
Suche im wiki
»
Zurück
procedure first
Modified on 08/04/2010 15:08
by
CPATRD
Categorized as
Plattform
'''Syntax:'''{BR} {{{{'''procedure''' first;}}}}{BR} {BR} '''Beschreibung:'''{BR} {BR} 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. {BR} '''Beispiel:'''{BR} {BR} <code pascal> // 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; </code>
ScrewTurn Wiki
version 3.0.1.400. Some of the icons created by
FamFamFam
.