Pesquisa no StringGrid

Delphi

12/03/2004

Eu preciso fazer uma busca num StringGrid que me traga um ´valor válido´ mais próximo de um ´valor inválido´.

Por exemplo:
Image que eu tenha o StringGrid a seguir:

+------------------------------------+
| 10 | 12 | x | 03 | x | x | 01 | x  | ...
+------------------------------------+


Eu tenho que substituir o ´x´ por um valor válido mais próximo dele, no caso acima observando o primeiro ´x´ o valor valido mais proximo seria o 12 ou o 03, aí no lugar do ´x´ eu devo colocar um deste valores.
Ou seja, a partir do momento que um ´x´ é encontrado eu devo buscar um valor anterior ou posteiro mais próximo validos, cuidando para que coluna anterior não seja uma que nao existe (primeira coluna - 1) ou
coluna posteiro não seja uma que nao existe (ultima coluna + 1);

Como faço para fazer esse tipo de pesquisa, vc poderia me ajudar?


Marcela

Marcela

Curtidas 0

Respostas

Lucas Silva

Lucas Silva

12/03/2004

Tenta o código:

for i:= 0 to StringGrid.ColCount - 1
  if StringGrid.Cells[i ,0] = x then
     if i <> 0 then
       StringGrid.Cells[i, 0]  := StringGrid.Cells[i-1, 0]
      else 
         StringGrid.Cells[i, 0]  := StringGrid.Cells[i-1, 0]
            

  // ou senão você pode guadar o valor válido para cada celula que você estiver percorrendo


a lógica é essa. É só você dá uma melhorada no código ai...


GOSTEI 0
POSTAR