Outros probelamas.

A criação deu tudo certo.

Mas quando vou fazer a ligação do banco com a qry dá problema olha o meu codigo:

procedure TForm1.FormCreate(Sender: TObject);
var qry : TZQuery;
begin
qry := TZQuery.Create(Self);
with qry do
begin
Connection:=dmCompras.conCompras;
Name := ´qryTipoSuporte´;
SQL.Text:=´select * from tipo_suporte´;
Active:=True;
end;
DataSource1.DataSet := qry;
end;

dá erro na linha : Connection:=dmCompras.conCompras;


o erro é o seguinte:

Debbuger Exception Notification

Project Compras.exe raised exception class EAccessViolation with message ´Access violation at Anddress 00539303 in module ´Compras.exe´. Read of address FFFFFFFF´.