einfache Datenbankanwendung ODBC SQL

[raena]

prinzipielle funktioniert das Ganze jetzt. Ich habe nur ein Problem.

Der Wert ADODataSet1.Active:=true; sollte ja true sein damit was angezeigt wird.
Wenn ich die SQL aendere, wird der Wert automatisch auf false gesetzt.
Deswill ich den Wert im Quell Code automatisch true setzen. Da stürzt die Kiste aber ab.

Raena.

Delphi-Quellcode:

unit DBtest;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ADODB, Grids, DBGrids, DB;

type
  TForm2 = class(TForm)
    ADOConnection1: TADOConnection;
    ADODataSet1: TADODataSet;
    DataSource1: TDataSource;
    DBGrid1: TDBGrid;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;
  testervar:integer;
  ADODataSet1:TADODataSet;
implementation

{$R *.dfm}
begin

testervar:=33;
ShowMessage('tma ' + inttostr(testervar));
ADODataSet1.Active:=true;
end.