Hi MrSpock,
Vielleicht kannst Du mir nochmal helfen. Wollte heute schon nichts mehr machen, habe aber gerade einen PageHeader gedruckt, das wars aber auch schon
Zitat:
procedure TForm1.Button1Click(Sender: TObject);
begin
{
KuDataMod.DataBase.open;
KuDataMod.Transaction.StartTransaction;
}
KuDataMod.KuDataSet.Active := false;
KuDataMod.KuDataSet.SelectSQL.Text := 'SELECT NR,ANREDE,STRASSE,ORT FROM KUNDE8 WHERE NR < 1000';
KuDataMod.KuDataSet.Active := true;
print;
end;
Bei diesem Code, den ich aus einem anderen Programmteil abgekupfert habe, kommt beim ersten Zugriff auf das Datamodul eine
Exception '
Access Violation'. Bei dem auskommentierten kommt das bei open, im Moment bei active := false. Auf jeden Fall aber vor dem SelectSQL. Genau dasselbe Datamodul verwende ich an anderer Stelle genauso wie hier.
Gruß
Hansa