Ver Mensaje Individual
  #3  
Antiguo 13-04-2013
jonydread jonydread is offline
Miembro
NULL
 
Registrado: nov 2011
Posts: 157
Reputación: 13
jonydread Va por buen camino
gracias por la explicacion tan solo era eso ya estaba hirviendo jjaja
saludos amigo!!

dejo el codigo quedo asi
Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
var
nItem: TListItem;
 begin
DateTimePicker1.Datetime := now;
zquery1.SQL.Text := 'select *from Datos';
zquery1.Open;
while not zquery1.Eof do
begin
nItem := Listview1.Items.Add;
nItem.Caption := zQuery1.fieldbyname('fecha').AsString;
nItem.SubItems.Add(zQuery1.fieldbyname('area').AsString);
nItem.SubItems.Add(zQuery1.fieldbyname('tipo').AsString);
nItem.SubItems.Add(zQuery1.fieldbyname('detalle').AsString);
 zquery1.next;
 end;

 end;
Responder Con Cita