Ver Mensaje Individual
  #4  
Antiguo 17-04-2016
Avatar de BDWONG
BDWONG BDWONG is offline
Miembro
NULL
 
Registrado: nov 2013
Posts: 113
Reputación: 11
BDWONG Va por buen camino
Hola despues de buscar se me ocurrio una posible solucion y es la de crear una funcion que auto ajuste las dimensiones del las columnas de listview, pero como el form esta expuesto a ser redimensionado puse la funcion dentro del evento onResize del formulario( Form)

La funcion en cuestion es esta:
Código Delphi [-]
procedure autoSizeListView(var listView:TListView; Form:TForm);
var
  i:Integer;
begin
  for i:=0 to listView.Columns.Count-1 do
  begin
    listView.Columns.Items[i].Width:=Form.Width div listView.Columns.Count;
  end;
end;

Pider por parametro un listView y una formulario, el listView tiene que ser pasado por referencia.
Ya que tenemos nuestra funcion nos vamos al evento onResize del formulario( Form) y ponemos la funcion ahi.
Ejemplo:

Código Delphi [-]
procedure TForm1.ListView1Resize(Sender: TObject);
begin
  autoSizeListView(ListView1,Form1);
end;




Si alguien tiene una mejor alternativa que lo haga saber.
Saludos...
Responder Con Cita