DBgrid e dblookupcombobox

[daniel_silva]

Bom dia.

Tenho 2 tabelas, a 1ª que é dos orçamentos e a 2ª é onde o utilizador define os preços de cada artigo. 

Nos orçamentos tenho um dbgrid com um dblookupcombobox interligada à 2ª tabela (tabela de preços).

O que eu queria era: 

Na tabela de orçamentos ao seleccionar um artigo aparecer logo o preço desse artigo, onde está interligado na 2ª tabela.

[nunopicado]

Na tabela de orçamentos tens o preço do artigo, ou apenas a ligação à tabela de artigos?

[daniel_silva]

Tenho o preço também. 

[nunopicado]

Então não percebi bem a questão...
Se o preço também está na mesma tabela, qual o problema em o mostrar junto com os outros campos?

[daniel_silva]

@nunopicado já consegui resolver esse problema. 

Agora tenho outra problema, como faço para inserir dados através do SQL directamente para o dbgrid? 

[nunopicado]

Directamente não podes. A DBGrid é um componente Data Aware, e como tal recebe os dados de um TDataSource.

O que podes fazer é ligar a DBGrid a um TDataSource, e ligar este à tua Query/Table/Dataset (o componente que usas para aceder ao SQL).
A DBGrid será automaticamente preenchida com os dados que esse componente tiver.

[daniel_silva]

Eu tenho:

- Um query ligado à tabela;

- Um data source ligado ao query.

E tenho um botão "Inserir" que o que queria que fizesse era, escrever nas caixas de texto e de seguida carrego no botão "Inserir" e grava na tabela aparecendo automaticamente no dbgrid. 

Já tentei vários códigos mas todos eles me dão erro... 

[nunopicado]

Que caixas de texto?

Se forem DBEdits, ligadas ao mesmo Dataset, isso é feito quase de forma automática, necessitando apenas de chamares o Insert da query (e em alguns casos, dependendo da tua configuração, fazer o Commit no fim).

Que caixas de texto?

Se forem DBEdits, ligadas ao mesmo Dataset, isso é feito quase de forma automática, necessitando apenas de chamares o Insert da query (e em alguns casos, dependendo da tua configuração, fazer o Commit no fim).

Que caixas de texto?

Se forem DBEdits, ligadas ao mesmo Dataset, isso é feito quase de forma automática, necessitando apenas de chamares o Insert da query (e em alguns casos, dependendo da tua configuração, fazer o Commit no fim).

[daniel_silva]

Já fiz isso, e não dá. 

Aparece sempre uma mensagem de erro ao inserir. 

Como é o código para inserir? 

Se for só, queryOrc.insert, não dá. (queryOrc é o nome da query).

[nunopicado]

Esse é o código para inserir, mas verifica se a tua query não está como read-only! 😉

[daniel_silva]

@nunopicado consegui 🙂

Nas propriedades do componente Query meti a propriedade RequestLive para True, e o código é como estavas a dizer "query1.insert".

Para gravar fiz desta forma: 

with query1 do
   begin
    Query1.FieldByName('Artigo').AsString := DBLookupComboBox3.Text;
    Post;
   end;

Obrigado pela ajuda! 😄

[nunopicado]

Atenção que isso não é preciso para gravar na tabela.

A DBLookUpComboBox tem forma de ela própria ir buscar os dados a uma tabela e gravar noutra.
Se tiveste de fazer isso, é porque a tua combobox não está bem configurada. 

[daniel_silva]

@nunopicado tens razão, eu depois é que reparei que dava guardar automático nas propriedades.

Obrigado 😄