Cómo conectar interbase con delphi 7

[Gbyte]

Hola!
Porfavor, alguien me puede ayudar. Estoy elaborando un seminario y ocurre lo siguiente.
1) Instalo en un form un IBDatabase, IBTransaction, IBDataSet, DataSource, DBGrid y DBNavigator. Ocupo la BD EMPLOYEE q se instala con Delphi 7.
a) IBDataBase: - database:seminario.gdb
- Transaction:IBTransaction1
- Active:True
b)IBTransaction: * DefaultDataBase: IBDataBase1
* Active: True
c)IBDataSet: DataBase: / DataBase:IBDataBase1
/ SelectSQL: select * from proveedor / Transaction: IBTransaction1
Comentario: Haciendo click derecho sobre el componente DataSet----- ---> DataSet Editor--->Select Primary Keys---->Generate SQL. Todo ésto para q me genere el Insert, delete, Modific, Refresh y luego OK.
Por último cuando voy a la propiedad Active del DataSet a TRUE-->
---> Dynamic SQL Error
SQL Error Code=-104
Token Unkown-line 2, char-1
from.
La tabla proveedor, tiene las columnas:
* cod_prov es el primary key
* pagina_web varchar(25)
* cuil varchar(25)
* razon_social varchar(25)
* dni integer foreing key a la tabla Agentes donde estan los datos del proveedor (dni, apellido, nombre, direccion, codigo_postal)

Todo éstos pasos los probe con employee.gdb q se instala con dlephi 7 y ando OK.

Desde Ya MUCHAS GRACIAS!

[Gbyte]

HOLA!
Me podrian ayudar, mi problema es q tengo un formulario para ingresar datos referentes a mercaderias y una de sus columnas es cod_merc q lo genero cuado doy el alta de una mercaderia. puse un boton al lado del DBEdit para q valide la entrada del nuevo código, pero no se como comparar con los datos almacenados en la tabla mercaderia. Estoy trabajando con IBDataSet.
Gracias desde ya!

[[felipe88]]

Y porque no creas el consecutivo tu mismo???... simplemente "tomas" el ultimo cod_mer de la tabla, creas una variable en la que solo le sumas uno y se lo pasas al registro antes de guardarlo...

[Gbyte]

Disculpa por mi ignorancia, es q recien me estoy iniciando en Delphi.
Me podrias ayudar a como implementarlo.

[[felipe88]]

Prueba algo como esto...

Código Delphi [-]
// Esto en el evento BeforeInsert de la tabla en la que guardaras

procedure TForm1.Table2BeforeInsert(DataSet: TDataSet);
var cod : Integer; // Creas la variable
begin
  cod := Table1.FieldByName('cod_mer').Value + 1; // Table1 es la tabla de las mercancias, sea el nombre que le diste
  Table2.FieldByName('campo').AsInteger := cod; // Asignas a la tabla en la que guardaras el consecutivo
end;

Algo asi...

[Gbyte]

Muchas Gracias Felipe, ya solucione mi problema.

[Gbyte]

Cómo podría hacer para tener seguridad de acceso a mi programa para un determinado usuario. Ese password se encuentra almacendado en mi BD?