Delphi-Quellcode:
unit uQRTest;
interface
uses
Windows, Messages, SysUtils, Classes, Controls, QuickRpt, ADODB, StdCtrls;
type
TQRTest =
class(TButton)
private
FDataSet: TADODataSet;
FDataField:
string;
{ Private-Deklarationen }
protected
{ Protected-Deklarationen }
public
{ Public-Deklarationen }
published
property DataSet: TADODataSet
read FDataSet
Write FDataSet;
property DataField:
string read FDataField
Write FDataField;
{ Published-Deklarationen }
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('
QuickRep 4 (SK)', [TQRTest]);
end;
end.
Das ist der Source meiner Komponente. Eigentlich ist das eine vom Typ TQRRichEdit, aber zum Testen ist sie vom Typ TButton. Das DataSet kann ich nicht setzen (Meine ADOTable wird nicht angezeigt, und sobald ich versuche das DataField zu setzen bekomme ich das hier:
Zitat:
Eigenschaft DataSource existiert nicht
Versteh das irgendwie nicht?!?!