🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.vbasic
Article #92258

Re: List View vb6

#92258
From: Robert Kurzawa
Date: Thu, 20 Oct 2005 12:01
29 lines
1785 bytes
Użytkownik "janusz" <b_janusz@op.pl> napisał w wiadomości
news:dj7t3t$ded$1@atlantis.news.tpi.pl...
> Witam
> Mam prosbe jak sterowac ListView aby przy dodawaniu nowych
> pozycji w sytuacji kiedy lista pozycji wychodzi poza wysokosc kontrolki
> byl widoczny ostatni wiersz listview
> polecenia
> ListView1.ListItems(ListView1.ListItems.Count).Selected = True
> ListView1.SelectedItem = ListView1.ListItems(ListView1.ListItems.Count)
> nie zalatwiaja sprawy
> Z gory dzieki za pomoc


Uzupełnij deklaracje:

Private Declare Function SendMessageByLong _
Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, ByVal lParam As Long) As Long

Public Const WM_VSCROLL = &H115
Public Const SB_BOTTOM = &H7


Po dodaniu nowego wiersza wpisz:
SendMessageByLong ListView1.hwnd, WM_VSCROLL , SB_BOTTOM , &H0

Robert
Technical Details
Message-ID: <dj8148$8ib$1@news.onet.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!not-for-mail
References: <dj7t3t$ded$1@atlantis.news.tpi.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!not-for-mail
From: "Robert Kurzawa" <joulesnemo@poczta._ANTYspam_onet.pl.invalid>
Newsgroups: pl.comp.lang.vbasic
Subject: Re: List View vb6
Date: Thu, 20 Oct 2005 14:01:15 +0200
Organization: Onet.pl
Lines: 30
Message-ID: <dj8148$8ib$1@news.onet.pl>
References: <dj7t3t$ded$1@atlantis.news.tpi.pl>
NNTP-Posting-Host: zj138.internetdsl.tpnet.pl
Mime-Version: 1.0
X-Trace: news.onet.pl 1129809865 8779 80.53.141.138 (20 Oct 2005 12:04:25 GMT)
X-Complaints-To: usenet@news.onet.pl
NNTP-Posting-Date: Thu, 20 Oct 2005 12:04:25 +0000 (UTC)
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4522.1200
X-Sender: hEcFbcdZSiEHpfpCa7Ce8N39RR2YXsG+AvhAeILI48A=
X-Newsreader: Microsoft Outlook Express 5.50.4522.1200
X-Priority: 3
X-MSMail-Priority: Normal
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit