criar dbedit em tempo de execucao!!
como criar um dbedit em tempo de execucao!!??
[]ss
[]ss
Rafael Gomes
Curtidas 0
Respostas
Caninha51
09/01/2006
Use a unit DBCtrls.
Crie uma variável do tipo TDBEdit...
Crie uma variável do tipo TDBEdit...
var dbEditExec: TDBEdit; begin dbEditExec := TDBEdit.Create(self);// passe o proprietario, nesse caso o form dbEditExec.Parent := form1; // informe o pai, onde o dbedit ficara. Se for num panel atribua-o dbEditExec.DataSource := datasource;//o datasource q sera linkado dbEditExec.DataField := ´CAMPO´//o campo da tabela... //vc podera alterar todas as propriedades necessarias... end;
GOSTEI 0
Rafael Gomes
09/01/2006
Use a unit DBCtrls.
Crie uma variável do tipo TDBEdit...
var dbEditExec: TDBEdit; begin dbEditExec := TDBEdit.Create(self);// passe o proprietario, nesse caso o form dbEditExec.Parent := form1; // informe o pai, onde o dbedit ficara. Se for num panel atribua-o dbEditExec.DataSource := datasource;//o datasource q sera linkado dbEditExec.DataField := ´CAMPO´//o campo da tabela... //vc podera alterar todas as propriedades necessarias... end;
amigo, nao funciona nao!!!
na propriedade parent, ele fala que o form1 nao é um tipo compativel, ele pede um tipo TWidgetControl que é da classe QControl se nao me engano ... se fosse como criar o edit eu teria conseguido, mas apareceu esse erro, e gostaria de saber o que é!!
[]sss
GOSTEI 0
Caninha51
09/01/2006
A aplicação eh CLX?
Invés de usas DBCtrls use QDBCtrls.
Invés de usas DBCtrls use QDBCtrls.
GOSTEI 0