TQuery function umstellen auf FibPlus

[hoika]

Hallo,

ich will auch die BDE ersetzen ...

Zitat:

Mich würde Interessieren, ob man Parallel mit FibPlus und den Delphi Std. Komponenten arbeiten kann,
also einmal Zugriff über TDatabase und einmal über FibPlus?!

Ja, warum sollte das nicht gehen?
Du musst nur aufpassen, dass du nicht die gleiche Tabelle mit BDE und FIBPlus
zur gleichen Zeit bearbeitest (Transaktionskonflikt).

Nehmen wir mal an, TFBQuery heisst das Teil in FIBPlus.

Delphi-Quellcode:

function GetOpenQuery( Sql : String ) : TFBQuery;
var  myQuery : TFBQuery;
begin
  myQuery := TFBQuery.Create( Application );
  Result := myQuery;
  try
   //  myQuery.DatabaseName := 'Handel';

    myQuery.Connection
    myQuery.Transaction  // jaja, es gibt 2 davon, für Read und Write

    myQuery.sql.Text := Sql;
    myQuery.Active := True;
    Result := myQuery;
  except
    myQuery.Free;
    Result:= NIL;  // das sollte hier noch dirnstehen
  end;
end;

Heiko