Probleminha Com Flexgrid

[brunohjoia]

Oi pessoal....

Estou fazendo uma rotininha que adiciona produtos a uma flexgrid, mas gostaria que, ao clicar no botão adicionar, este verificasse se o produto que ele irá adicionar já não foi adicionado antes na flexgrid. Para fazer a verificação, eu pretendo usar o código do produto (que ao ser adicionado fica na 1ª coluna da grid) como referencia... Sendo assim, gostaria que o botão lesse todas as linhas da coluna do código e comparasse com o código do produto que será adicionado. Se houver alguma linha onde já tenha esse código de produto, o botão simplesmente não adiciona e emite uma msgbox...

O meu problema é: Eu não sei fazer a rotina que faz a comparação entre cada linha da grid e o código do produto. Qual é o método que devo usar para verificar isso???? Por favor, me dêem um exemplo....

Obrigado

[Graymalkin]

A propriedade TextMatrix permite que você resgate (ou defina) valores para as células como se a mesma fosse uma matriz. Portanto, o que você quer seria algo assim:

achou = false
for i = 0 to MSFlexGrid1.Rows - 1
  if MSFlexGrid1.TextMatrix(i, 0)=txtCodigo.text then achou = true
next i
if not achou then
  'adiciona
else
  'já está na grade
endif

Abraços,

Graymalkin