Article View: be.comp.programming
Article #15465Re: ActiveX- elementen toevoegen via code (V.B.)
From: Development
Date: Thu, 05 Oct 2000 00:15
Date: Thu, 05 Oct 2000 00:15
78 lines
3532 bytes
3532 bytes
Kleine code snippet.
Naargelang de waarde van een variabele dient het aantal command buttons te
worden vergroot of verkleint. Maakt deel uit van een class die beheer van
reservaties van vergaderzalen toelaat.
Ja, Flippo, kan dus dynamisch (hier wordt gewoon index van de command buttos
gebruikt).
Veel geluk d'ermee,
Waldo Smets
SoftwareSuite�
Heverlee - LEUVEN
Select Case intDifference
Case Is > 0 'Extra time blocks needed
For x = (intPreviousRooms * 28) To ((CInt(lblMRCount) * 28) - 1)
Load cmd_Available(x)
cmd_Available(x).Left = 3960 + ((x Mod 28) * 240)
cmd_Available(x).Top = 2040 + (Int(x / 28) * 245)
cmd_Available(x).Visible = True
Next x
Case 0 'No extra time blocks needed
Case Is < 0 'Time blocks to remove
For x = (intPreviousRooms * 28) To ((CInt(lblMRCount) * 28)) Step -1
Unload cmd_Available(x)
Next x
End Select
Flippo wrote:
> Probleem is dan je altijd met hetzelfde aantal elementen zit, of kan je zo'n
> array dynamisch maken?
>
> StoVoKar <StoVoKar@yahoo.com> schreef in berichtnieuws
> BGKC5.50714$nQ2.947310@afrodite.telenet-ops.be...
> | Is het niet gemakkelijker te werken met 'control-arrays'?
> |
> | "Flippo" <wouterk46@hotmail.com> wrote in message
> | news:ZUDC5.49833$nQ2.917750@afrodite.telenet-ops.be...
> | > Mja, het is het laden dat het probleem is, als je bv. hebt
> | > "Dim Combo as ImageCombo"
> | >
> | > dan is Combo dus = nothing. Als je dan een eigenschap toewijst, krijg je
> | een
> | > error. Hoe moet zo'n object dan geladen worden?? Bij complete forms kan
> je
> | > "Dim as New Form" gebruiken, maar bij ActiveX-elementen?
> | >
> | > Development@SoftwareSuite.be
> | > | Declareren (Dim as...)
> | > | Laden
> | > | Instellen (Heigth, Visible, etc...)
> | > |
> | > | Good luck,
> | > |
> | > | Waldo Smets
> | > | SoftwareSuite�
> | > | Heverlee- Leuven
> | > |
> | > | Flippo wrote:
> | > |
> | > | > Ik had graag een ActiveX-element (label, textbox, dropdown combo,
> ...)
> | > | > toegevoegd vanuit de programmeercode, in run-time dus. Weet iemand
> hoe
> | > dit
> | > | > mogelijk is?
> | > | >
> | > | > Dank bij voorbaat,
> | > | > Wouter
> | > |
> | >
> | >
> |
> |
Technical Details
Message-ID:
<39DBC814.8AA5C943@softwaresuite.be>Path:
arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-xit-03!supernews.com!news.tele.dk!193.190.198.17!newsfeeds.belnet.be!news.belnet.be!zapata.tvd.be!news.tvd.be!news.chello.be!not-for-mailReferences:
<%EqC5.48035$nQ2.894680@afrodite.telenet-ops.be> <39DAC720.612199A0@softwaresuite.be> <ZUDC5.49833$nQ2.917750@afrodite.telenet-ops.be> <BGKC5.50714$nQ2.947310@afrodite.telenet-ops.be> <gLKC5.50747$nQ2.948286@afrodite.telenet-ops.be>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII X-Google-Thread: fcea4,3bf1469788088b44 X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2000-10-04 17:16:26 PST Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-xit-03!supernews.com!news.tele.dk!193.190.198.17!newsfeeds.belnet.be!news.belnet.be!zapata.tvd.be!news.tvd.be!news.chello.be!not-for-mail Message-ID: <39DBC814.8AA5C943@softwaresuite.be> From: "Development@SoftwareSuite.be" <development@softwaresuite.be> X-Mailer: Mozilla 4.75 [en] (Win98; U) X-Accept-Language: en MIME-Version: 1.0 Newsgroups: be.comp.programming Subject: Re: ActiveX- elementen toevoegen via code (V.B.) References: <%EqC5.48035$nQ2.894680@afrodite.telenet-ops.be> <39DAC720.612199A0@softwaresuite.be> <ZUDC5.49833$nQ2.917750@afrodite.telenet-ops.be> <BGKC5.50714$nQ2.947310@afrodite.telenet-ops.be> <gLKC5.50747$nQ2.948286@afrodite.telenet-ops.be> Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit Lines: 79 Date: Thu, 05 Oct 2000 00:15:35 GMT NNTP-Posting-Host: 195.162.216.140 X-Complaints-To: abuse@chello.be X-Trace: news.chello.be 970704935 195.162.216.140 (Thu, 05 Oct 2000 02:15:35 MET DST) NNTP-Posting-Date: Thu, 05 Oct 2000 02:15:35 MET DST Organization: Chello Usenet Service