Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Zugriff auf einen Datensatz , der vorher mit .recno ermittel (https://www.delphipraxis.net/127826-zugriff-auf-einen-datensatz-der-vorher-mit-recno-ermittel.html)

zeras 19. Jan 2009 20:15

Datenbank: Clientdataset (midas.dll) • Zugriff über: ??

Zugriff auf einen Datensatz , der vorher mit .recno ermittel
 
Wie kann ich auf einen Datensatz zugreifen, den ich mir vorher mit Clientdataset.recno gemerkt habe.
Ich habe im Ergebnis möglicherweise mehrere Datensätze gefunden und nun will ich den aktuellsten raussuchen. Das scheint ja auch zu gehen, und ich merke mir die Datensatznummer mit ActIndex:=CDS.RecNo. Wie kann ich aber später wieder zugreifen? Zwischenzeitlich kann ja in der Schleife ein anderer aktuell sein.
Mit First, Last, Moveby scheint das ja nicht zu gehen.

Ich habe schon in verschiedenen Foren gesucht, aber dazu nichts gefunden.
Vielleicht so: CDS.ActRec:=ActnIdex, aber diese Funktion scheint es nicht zu geben.

Delphi-Quellcode:

if CDS.FindFirst then begin
    repeat
      ZeitNew:=CDS.FieldByName(NodeChildLastWrite).AsDateTime;
      Anzahl:=Anzahl+1;
      if ZeitNew>ZeitSaved then begin
        fName:=CDS.FieldByName(NodeChildfName).AsString;
        ActIndex:=CDS.RecNo; //den Datensatz merken, fürs nachträgliche Ändern von "letzter Lesezugriff"
      end;
    until CDS.FindNext = false;

    //wenn was gefunden wurde
    if fName<>'' then begin

      fnameWZK:=fName;
      result:=True;

      //hier muss ja nicht immer der letzte Datensatz oben gemerkt worden sein!!
      CDS.Edit;
      CDS.FieldValues[NodeChildLastRead]:=now; //Update für letzten Lesezugriff
      CDS.Post;
    end;
  end;

zeras 19. Jan 2009 21:19

Re: Zugriff auf einen Datensatz , der vorher mit .recno ermi
 
Hat sich erledigt. Man kann den Wert offensichtlich auch beschreiben.

Delphi-Quellcode:
CDS.RecNo:=ActIndex;


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:38 Uhr.

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