criar um campo na dbgrid e mudar a cor

[Giba 0]

turma, to com mais um problema nessa DBGRID.

O 1º é se tem como criar um campo na DBCRID e jogar um falor nesse campo, sem mudar o campo na tabela.

 

O 2º é se tem com mudar o car da fonte em um determinado campo da DBGRID. "aquilo do evendo ondrawcolunncell nao ta certo, pq é em outro form"

 

Bom, vou esplicar como é o sistema.

Tenho uma matriz com 20 valores e uma tabela em excel com 50 colunas e N linhas.

O sistema tem que fazer oq, verificar o valor da matriz com a 50 do excel..

Se os valores da matriz bater com o da tabela, o sistema ira contar isso como um acerto, e tera que indormar na no final da DBGRI o numero de acertos..

 

 

FOR DBG_TOTAL:= 1 TO Form2.ADOTable1.RecordCount DO

begin

Form2.Label3.Caption:=inttostr(DBG_TOTAL);

Form2.ProgressBar1.Position:= DBG_TOTAL;

Form2.Refresh;

FOR VL:= 0 TO 19 DO //começa a correr na matriz de 1 a 20

begin

FOR DB:= 0 TO Form2.AdoTable1.FieldCount - 1 DO //começa a correr na tabela o excel de 1 a 50.

begin

 

if valores_array[VL] = Form2.DBGrid1.Fields[DB].AsInteger Then //se os valores forem iguais

acertos:= acertos +1; // conta como acerto

Form2.DBGrid1.Fields[51].Create := 'acerto'; //emprime na coluna 51 a quantidade de acertos

 

end;

Form2.AdoTable1.First;

end;

Form2.ADOTable1.Next;

acerto:=0;

end;

O trecho em vermelho acho que esta errado, e nao sei como fazer

[@beto 0]

e ai...

 

 

giba, neste mesmo forum já foi dito sobre este assunto..

 

da uma olha aqui...

 

valeu..

 

 

http://forum.imasters.com.br/public/style_emoticons/default/joia.gif