Fórum Passar valor de varíavel #188138

Olá...

Estou precisando passar o valor de uma variável declarada no PUBLIC para uma procedure, segue abaixo a procedure:




begin
if not odd([b:eae26e98d3]FrmPrincipal.path[/b:eae26e98d3]) then // se for impar
//se a célula não está selecionada
if not (gdSelected in State) then
Begin
//Define uma cor de fundo
DBGRegistros.Canvas.Brush.Color:=$00D2FFFF;
DBGRegistros.Canvas.FillRect(Rect); //Pinta célula
//pinta o texto padrão
DBGRegistros.DefaultDrawDataCell(rect,Column.Field,State);
End;
end;



Onde está em negrito, preciso que a procedure ´entenda´ o valor da variável...

Alguém poderia me ajudar???

Obrigado