Ver Mensaje Individual
  #1  
Antiguo 24-08-2006
javicho_villa javicho_villa is offline
Miembro
 
Registrado: feb 2005
Ubicación: Lima - Perú
Posts: 105
Reputación: 20
javicho_villa Va por buen camino
Unhappy Problema con StringGrid

Hola tengo un problema con los stringgrid cuando manejo los heigth de estos, me sale el error GridIndex out of range;
un poco de codigo (son 3 stringGrid evento DbClick).

Código Delphi [-]
  MiAlto := Height-PedidoPanel.Height-DetallePedidoPanel.Height-OrdenPanel.Height-ListaOrden.Height-ListaDetalle.Height-45;
  if lpedido then lpedido:=false
  else lpedido:=true;
  if lpedido then
    begin
      self.ListaDetalle.Height := 0;
      self.ListaOrden.Align    := alTop;
      self.ListaOrden.Height   := 0;
      if (MiAlto>0) and (MiAlto<500) then
        //self.ListaPedido.Height := 100
        self.ListaPedido.Height := MiAlto
      else
        self.ListaPedido.Height := 60;
    end
  else begin
         self.ListaPedido.SetFocus;
         self.ListaPedido.Height := 60;
         self.ListaPedido.SetFocus;
         MiRow := ListaPedido.Row;
         self.ListaPedido.Row := 1;
         self.ListaPedido.Row := MiRow;
         self.ListaPedido.SetFocus;
//         self.PintarDetalle;
       end;
__________________
Javier Villa Sánchez
jvilla@andreaproducciones.com
Responder Con Cita