[Suche] Tutorial für Absolute Database

[Alloc]

Hi, hier mal ein kleiner Code-Ausschnitt aus einem meiner Progs ... hoffe das hilft dir weiter =)

Delphi-Quellcode:

uses ABSDecUtil, ABSMain, DB;

var
  var_string:String;
  var_int:Integer;
  Database:TABSDatabase;
  Query:TABSQuery;

begin
  Database:=TABSDatabase.Create(NIL);
  Database.DatabaseName:='OLDBcon';
  Database.DatabaseFileName:=FileName;
  Database.Open;
  Query:=TABSQuery.Create(Database);
  Query.DatabaseName:='OLDBcon';

  Query.SQL.Text:='SELECT id,name,extension FROM datfiles WHERE id<100 ORDER BY id ASC;';
  Query.Open;
  IF Query.RecordCount>0 THEN BEGIN
    Query.First;
    REPEAT
      var_string:=Query.FieldByName('name').AsString;
      var_int:=Query.FieldByName('id').AsInteger;
      Query.Next;
    UNTIL Query.EOF;
  END;
  Query.Close;

mfG, Chris

/Edit: Connection aufbauen vergessen gehabt