Aplicativo copilado nao roda dar erro.

Vc esta levando para  a outra maquina o banco junto com o executavel?

Cara você tem que instalar o driver do seu banco de Dados. 

project > options > directories/conditionals

Tem o driver do interbase aqui. Testa e posta aqui se deu certo.

        Olha esta questão do banco de dados eu ja corri muito atras deste assunto, e nas minhas conclusões (pode alguem não concordar comigo) não existe melhor banco de dados, existe aquele que vc gosta de trabalhar, claro que vc vai encontrar a questão de segurança, de um banco diferente de outro mas isso vc deve avaliar com muito cuidado, quando eu comecei com Delphi utilizava o banco Acsess da microsoft, mas por ser um banco pago não mexi mais com ele, estou utilizando hoje o mysql, que é muito bom e tem opções de segurança muito boas, a vantagem de se utilizar o acsess no inico é que ele fica em um único arquivo, com todas as suas tabelas. 

        Olha esta questão do banco de dados eu ja corri muito atras deste assunto, e nas minhas conclusões (pode alguem não concordar comigo) não existe melhor banco de dados, existe aquele que vc gosta de trabalhar, claro que vc vai encontrar a questão de segurança, de um banco diferente de outro mas isso vc deve avaliar com muito cuidado, quando eu comecei com Delphi utilizava o banco Acsess da microsoft, mas por ser um banco pago não mexi mais com ele, estou utilizando hoje o mysql, que é muito bom e tem opções de segurança muito boas, a vantagem de se utilizar o acsess no inico é que ele fica em um único arquivo, com todas as suas tabelas. 
 

Você tem que levar além do seu executável o instalador do bde, após instalar o bde, tem que copiar para a pasta do seu executável os arquivos da base de dados paradox que você criou : cliente.db cliente.PX
cliente.XG0
cliente.YG0
cliente.XG1
cliente.XG2   e depois entrar mo bde que você instalou e criar o seu alias novamente, apontando para a pasta onde estão estes arquivos.

 


Concordo plenamente com vc... vc se adapta em um modo de trabalhar, embora seja difícil acho que o programador deve se esforçar ao máximo para ter conhecimento suficiente em diversos gerenciadores de dados, não dominar todos mas ter o mínimo de conhecimento possível pelo menos nos mais comuns. Também sou um iniciante, apesar de já conhecer as ferramentas há aproximadamente 3 anos, só estou trabalhando no ramo há 4 meses e gosto muito do firebird, pois ele me atende em todos meus requisitos, mas se um eu precisar ter conhecimentos em outra ferramenta como oracle por exemplo terei que me adequar... vale lembrar que a curiosidade é quem transforma o leigo em mestre

procedure Tfrmclientes.Button1Click(Sender: TObject);
begin
if(Datamodule1.tblclientesRgcli.text ='') or (Datamodule1.tblclientesCpfcli.Text ='') then
begin
Showmessage('RG e CPF são campos obrigatório para salvar o Registro');
abort;
end
else
  if Datamodule1.tblclientes.state in [dsEdit, dsInsert] then     Datamodule1.tblclientes.Post;
end;

procedure Tfrmclientes.Button2Click(Sender: TObject);
begin
Datamodule1.tblclientes.Append;
tedit2.setfocus;
end;

procedure Tfrmclientes.Button3Click(Sender: TObject);
begin
Datamodule1.tblclientes.First;
if Datamodule1.tblclientes.Bof then
application.MessageBox('Início dos Registros','Aviso', mb_iconinformation);
end;

procedure Tfrmclientes.Button4Click(Sender: TObject);
begin
Datamodule1.tblclientes.Prior;
end;

procedure Tfrmclientes.Button5Click(Sender: TObject);
begin
Datamodule1.tblclientes.Next;
end;

procedure Tfrmclientes.Button6Click(Sender: TObject);
begin
Datamodule1.tblclientes.Last;
if Datamodule1.tblclientes.Eof then
application.MessageBox('Você esta  no Último Registro','Aviso', mb_iconinformation);
end;

procedure Tfrmclientes.Button7Click(Sender: TObject);
begin
if application.MessageBox('Deseja realmente excluir o Registro','aviso', mb_yesno)<> mryes then
abort
else
Datamodule1.tblclientes.Delete;
end;

procedure Tfrmclientes.Button8Click(Sender: TObject);
begin
close;
end;

procedure Tfrmclientes.dbedit1KeyPress(Sender: TObject; var Key: Char);
begin
if not ((key in['0'..'9'])or(key in[#8])or (key in[#46]))then
key:=#0;
end;

end.