Wie kann man eine Query innerhalb eines Threads nutzen ?

folgendes habe ich verwendet nur kommt ständig eine Speicherzugriffsverletzung !

zusammenfalten · markieren

Delphi-Quellcode:

type
  Test = class(TThread)
  a1 : Integer;
  Query1 : TIBQuery;
  Datenbank : TIBDatabase;
  Transaction : TIBTransaction;

  private
    { Private-Deklarationen }

  public
    constructor create(Art : Integer; Datenbankkomp : TIBDatabase); overload;

  protected
    procedure Execute; override;
 
end;

var
  Test1 : Test;
  U_Datum : Tdate;
  U_Fach : Integer;
implementation

{$R *.DFM}

constructor Test.create(Art : Integer; Datenbankkomp : TIBDatabase);
Begin
  a1 := Art;
  Datenbank := Datenbankkomp;
  inherited create(false);

End;

procedure Test.Execute;

begin
  Query1.text := 'Egal'; // Hier bekomme ich eine Speicherzugriffsverletzung !
  sleep(10000);
end;

end.

Das Hauptformular und den Button der den Thread erzeugt habe ich mal weggelassen !

Hast du das Objekt irgendwo initialisiert?
(Wahrscheinlich brauchst du im Thread auch noch so etwas wie CoInitialize.)

Ich gebe dir mal mein ButtonClick procedure :

markieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  U_Datum := MonthCalendar1.Date;
  Test1 := Test.Create(2,IBDatabase1);
end;

reicht des ?

Du musst das Query Initialisieren/instanzieren:
Query1:=TIBQuery.create(); Und übergebe am besten keine Objekte über Threadgrenzen. Du solltest dir besser gleich angewöhnen alles, was die Datenbank betrifft an Objekten komplett und ausschließlich im Thread zu erledigen.
Zur Vereinfachung leg dir ein DataModul an, welches du nur im Thread benutzt.

Des wars schon danke hat funktioniert !!!!!

Zitat von sirius:

Und übergebe am besten keine Objekte über Threadgrenzen. Du solltest dir besser gleich angewöhnen alles, was die Datenbank betrifft an Objekten komplett und ausschließlich im Thread zu erledigen.
Zur Vereinfachung leg dir ein DataModul an, welches du nur im Thread benutzt.

Ergänzend wäre noch zu hinterfragen ob die eingesetzten Komponenten überhaupt Thread-Safe von sich aus sind oder ob es trotz aller sonstigen Fehlervermeidungen kracht da keine Verbindungen aus 2 verschiedenen Threads behandelt werden können.