/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Nr på øverste linie i TListBox
Fra : Kurt Guldbæk


Dato : 13-10-04 07:24

Hej NG!
Jeg har en TListBox.
Jeg har behov for at kende nummeret på den øverste linie, som vises i
LTlistBox-en efterhånden som man skroller gennem den.
Hvordan finder jeg det?

Mvh Kurt



 
 
Kurt Guldbæk (13-10-2004)
Kommentar
Fra : Kurt Guldbæk


Dato : 13-10-04 07:33

Har selv fundet det. Undskyld evt. ulejlighed!
/Kurt

"Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
news:416cc9e3$0$243$edfadb0f@dread16.news.tele.dk...
> Hej NG!
> Jeg har en TListBox.
> Jeg har behov for at kende nummeret på den øverste linie, som vises i
> LTlistBox-en efterhånden som man skroller gennem den.
> Hvordan finder jeg det?
>
> Mvh Kurt
>
>



Kurt Guldbæk (13-10-2004)
Kommentar
Fra : Kurt Guldbæk


Dato : 13-10-04 08:41

"Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
news:416ccc36$0$272$edfadb0f@dread16.news.tele.dk...
> Har selv fundet det. Undskyld evt. ulejlighed!
> /Kurt
>
> "Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
> news:416cc9e3$0$243$edfadb0f@dread16.news.tele.dk...
> > Hej NG!
> > Jeg har en TListBox.
> > Jeg har behov for at kende nummeret på den øverste linie, som vises i
> > LTlistBox-en efterhånden som man skroller gennem den.
> > Hvordan finder jeg det?
> >
> > Mvh Kurt
> >
Ja, jeg havde fundet ud af, at nummeret er indeholdt i ".TopIndex", men
TListBox har ikke en 'on chance', og de andre Events ser ikke ud til at
virke når man benytter skyderen i højre side til at skrolle med.
Hvordan klarer man det?
/Kurt



Mathias (13-10-2004)
Kommentar
Fra : Mathias


Dato : 13-10-04 17:36

Wednesday 13 October 2004 09:41 sagde Kurt Guldbæk noget à la dette i
dk.edb.programmering.pascal:
>> "Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
>> news:416cc9e3$0$243$edfadb0f@dread16.news.tele.dk...
>> > Hej NG!
>> > Jeg har en TListBox.
>> > Jeg har behov for at kende nummeret på den øverste linie, som vises
>> > i LTlistBox-en efterhånden som man skroller gennem den.
>> > Hvordan finder jeg det?
> Ja, jeg havde fundet ud af, at nummeret er indeholdt i ".TopIndex",
> men TListBox har ikke en 'on chance', og de andre Events ser ikke ud
> til at virke når man benytter skyderen i højre side til at skrolle
> med. Hvordan klarer man det?

Hmm, jeg ville umiddelbart sætte en Timer med Interval 55 til at checke,
men den er jo kun den uprofessionelle måde at løse problemet på

--
Mvh. Mathias | @: mathias der bor på mrside *i* dk

Kurt Guldbæk (14-10-2004)
Kommentar
Fra : Kurt Guldbæk


Dato : 14-10-04 13:26

"Mathias" <nntp@mrside.dk> wrote in message
news:XPcbd.57579$Vf.2734606@news000.worldonline.dk...
> Wednesday 13 October 2004 09:41 sagde Kurt Guldbæk noget à la dette i
> dk.edb.programmering.pascal:
> >> "Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
> >> news:416cc9e3$0$243$edfadb0f@dread16.news.tele.dk...
> >> > Hej NG!
> >> > Jeg har en TListBox.
> >> > Jeg har behov for at kende nummeret på den øverste linie, som vises
> >> > i LTlistBox-en efterhånden som man skroller gennem den.
> >> > Hvordan finder jeg det?
> > Ja, jeg havde fundet ud af, at nummeret er indeholdt i ".TopIndex",
> > men TListBox har ikke en 'on chance', og de andre Events ser ikke ud
> > til at virke når man benytter skyderen i højre side til at skrolle
> > med. Hvordan klarer man det?
>
> Hmm, jeg ville umiddelbart sætte en Timer med Interval 55 til at checke,
> men den er jo kun den uprofessionelle måde at løse problemet på
>
> --
> Mvh. Mathias | @: mathias der bor på mrside *i* dk

Da der ikke er kommet bedre forslag vil jeg gerne prøve det.
Jeg har aldrig brugt Timer-funktionen, så der kommer spørgemålet: Hvorfor
netop Interval 55
Mvh Kurt



Konrad (14-10-2004)
Kommentar
Fra : Konrad


Dato : 14-10-04 15:43

"Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
news:416e705b$0$228$edfadb0f@dread16.news.tele.dk...

> > Mvh. Mathias | @: mathias der bor på mrside *i* dk
>
> Da der ikke er kommet bedre forslag vil jeg gerne prøve det.
> Jeg har aldrig brugt Timer-funktionen, så der kommer spørgemålet: Hvorfor
> netop Interval 55

I skyder da vist gråspurve med kanoner. Lav en ny TListBox der responderer
på WM_HSCROLL ala

TKurtListBox =class(TListBox)
protected
procedure WMHScroll(var message:TMessage); message WM_HSCROLL;
end;

I WMHScroll kan du så finde ud af det nye TopIndex eller f.eks lave en
SendMessage(LB_GETTOPINDEX ...



Kurt Guldbæk (18-10-2004)
Kommentar
Fra : Kurt Guldbæk


Dato : 18-10-04 10:47

"Konrad" <david_konrad@hotmail.com> wrote in message
news:416e9068$0$77014$14726298@news.sunsite.dk...
> "Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
> news:416e705b$0$228$edfadb0f@dread16.news.tele.dk...
>
> > > Mvh. Mathias | @: mathias der bor på mrside *i* dk
> >
> > Da der ikke er kommet bedre forslag vil jeg gerne prøve det.
> > Jeg har aldrig brugt Timer-funktionen, så der kommer spørgemålet:
Hvorfor
> > netop Interval 55
>
> I skyder da vist gråspurve med kanoner. Lav en ny TListBox der responderer
> på WM_HSCROLL ala
>
> TKurtListBox =class(TListBox)
> protected
> procedure WMHScroll(var message:TMessage); message WM_HSCROLL;
> end;
>
> I WMHScroll kan du så finde ud af det nye TopIndex eller f.eks lave en
> SendMessage(LB_GETTOPINDEX ...
>
Det siger mig ikke ret meget, men jeg vil prøve og se hvad jeg får ud af
det!
/Kurt



Mathias (15-10-2004)
Kommentar
Fra : Mathias


Dato : 15-10-04 13:22

Thursday 14 October 2004 14:26 sagde Kurt Guldbæk noget à la dette i
dk.edb.programmering.pascal:

> "Mathias" <nntp@mrside.dk> wrote in message
> news:XPcbd.57579$Vf.2734606@news000.worldonline.dk...
>> Wednesday 13 October 2004 09:41 sagde Kurt Guldbæk noget à la dette i
>> dk.edb.programmering.pascal:
>> >> "Kurt Guldbæk" <kurt_g@guldbaek.net> wrote in message
>> >> news:416cc9e3$0$243$edfadb0f@dread16.news.tele.dk...
>> >> > Hej NG!
>> >> > Jeg har en TListBox.
>> >> > Jeg har behov for at kende nummeret på den øverste linie, som
>> >> > vises i LTlistBox-en efterhånden som man skroller gennem den.
>> >> > Hvordan finder jeg det?
>> > Ja, jeg havde fundet ud af, at nummeret er indeholdt i ".TopIndex",
>> > men TListBox har ikke en 'on chance', og de andre Events ser ikke
>> > ud til at virke når man benytter skyderen i højre side til at
>> > skrolle med. Hvordan klarer man det?
>> Hmm, jeg ville umiddelbart sætte en Timer med Interval 55 til at
>> checke, men den er jo kun den uprofessionelle måde at løse problemet
>> på
> Da der ikke er kommet bedre forslag vil jeg gerne prøve det.
> Jeg har aldrig brugt Timer-funktionen, så der kommer spørgemålet:
> Hvorfor netop Interval 55
> Mvh Kurt

*Finder sin gamle Delphi-bog frem*
Her er et udklip fra bogen "Delphi Programming for Dummies", side 155
afsnit 4:
Don't bother setting Interval to a value less than 55. Windows uses the
hardware timer interrupt as the basis for its timers, and that
interrupt occurs about every 55 milliseconds. What? You don't like
approximations? Okay, the timer interrupt occurs once every
1,193,180/65,536 seconds. Better, yes?

- Citat slut -

--
Mvh. Mathias | @: mathias der bor på mrside *i* dk

Christian Andersen (13-10-2004)
Kommentar
Fra : Christian Andersen


Dato : 13-10-04 17:03

Brug ListBox.TopIndex

Kurt Guldbæk <kurt_g@guldbaek.net> skrev:
>Hej NG!
>Jeg har en TListBox.
>Jeg har behov for at kende nummeret på den øverste linie, som
vises i
>LTlistBox-en efterhånden som man skroller gennem den.
>Hvordan finder jeg det?
>
>Mvh Kurt


Søg
Reklame
Statistik
Spørgsmål : 177580
Tips : 31968
Nyheder : 719565
Indlæg : 6409079
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste