Avatar billede mmfrandsen Nybegynder
13. december 2003 - 20:44 Der er 3 kommentarer og
1 løsning

Speedbutton "trykke op" (GroupIndex 1)

Når en Speedbutton er sat på GroupIndex 1 har jeg lagt mærke til, at den bliver nede, når man trykker på den. Ved et ekstra tryk kommer den op igen.

Kan jeg sætte en procedure på hver af de handlinger?

Altså én procedure til, når knappen bliver trykket ned
Og én procedure til, når knappen bliver trykket/hevet op igen.

På forhånd tak, MM
Avatar billede stone Forsker
13. december 2003 - 21:17 #1
sæt din speedbutton til allowallup til true

begin
if
speedbutton1.GroupIndex = 1 then
label1.Visible := false;
if
speedbutton1.Down = True then
label1.Visible := True;
Avatar billede stone Forsker
13. december 2003 - 21:17 #2
her fra hjælpen

Set GroupIndex to determine how the button behaves when clicked.

When GroupIndex is 0, the button behaves independently of all other buttons on the form. When the user clicks such a speed button, the button appears pressed (in its clicked state) and then returns to its normal up state when the user releases the mouse button.

When GroupIndex is greater than 0, the button remains selected (in its down state) when clicked by the user. When the user clicks a selected button, it returns to the up state, unless AllowAllUp is False. Setting the GroupIndex property of a single speed button to a value greater than 0 causes the button to behave as a two-state button when AllowAllUp is True.

Speed buttons with the same GroupIndex property value (other than 0), work together as a group. When the user clicks one of these buttons, it remains selected until the user clicks another speed button belonging to the same group. Speed buttons used in this way can present mutually exclusive choices to the user.
Avatar billede mmfrandsen Nybegynder
13. december 2003 - 21:22 #3
Det virker... Tak :)
Avatar billede stone Forsker
13. december 2003 - 22:35 #4
//den her er bedre da der ikke sker noget før der har været trykket på knappen første gang

label1.Visible := false;
if
speedbutton1.Down = True then
label1.Visible := True;
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester