Re: VB6 TextBox

Article View: pl.comp.lang.vbasic

Article #92503

Back to pl.comp.lang.vbasic Previous Next

#92503

From: Robert Kurzawa
Date: Mon, 31 Oct 2005 23:17

29 lines
1872 bytes

Użytkownik "blizzard" <blizzard@msi.pl> napisał w wiadomości
news:dk60hr$ikl$1@nemesis.news.tpi.pl...
> skyblast wrote :
> > Ja bym przy uruchomieniu formularza przestawił kursor np. na 2 pole
> > tekstowe - Text2.SetFocus - może to wystarczy.
> >
> > Pozdrawiam.
>
> A jak sa tylko 2 TextBox-y i na zadnym nie chce miec tego migajacego
kursora
> ? Moze inna kontrolka tekstowa jakas ktora umozliwi mi wylaczenie kursora
w
> tym polu tekstowym. (ale musi byc funkcja multiline i scrollbar)

Spróbuj funkcję API - HideCaret:

Private Declare Function HideCaret Lib "user32" (ByVal hwnd As Long) As Long

Private Sub Text1_GotFocus()
  HideCaret Text1.hwnd
End Sub

Co prawda w momencie kliknięcia TextBoxa przez ułamek sekundy
kursor jest widoczny, lecz jest to tylko mignięcie.
Można tego uniknąć przez zastosowanie subclassingu,
ale to już inna bajka.

Robert

Technical Details

Message-ID: <dk68mf$tcb$1@news.onet.pl>

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!news.onet.pl!not-for-mail

References: <dk5uah$7si$1@nemesis.news.tpi.pl> <dk601s$geg$1@nemesis.news.tpi.pl> <dk60hr$ikl$1@nemesis.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: VB6 TextBox
Date: Tue, 1 Nov 2005 00:17:25 +0100
Organization: Onet.pl
Lines: 31
Message-ID: <dk68mf$tcb$1@news.onet.pl>
References: <dk5uah$7si$1@nemesis.news.tpi.pl> <dk601s$geg$1@nemesis.news.tpi.pl> <dk60hr$ikl$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: zj138.internetdsl.tpnet.pl
Mime-Version: 1.0
X-Trace: news.onet.pl 1130800655 30091 80.53.141.138 (31 Oct 2005 23:17:35 GMT)
X-Complaints-To: usenet@news.onet.pl
NNTP-Posting-Date: Mon, 31 Oct 2005 23:17:35 +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

Reply to Parent Message