Lazarus
Home
Help
TinyPortal
Search
Login
Register
Lazarus
»
Forum
»
Programming
»
LCL
»
How to handle Buttons on TUpDown component ?
Free Pascal
Website
Downloads
Wiki
Documentation
Bugtracker
Mailing List
Lazarus
Website
Downloads (Laz+FPC)
Packages (OPM)
FAQ
Wiki
Documentation (RTL/FCL/LCL)
Bugtracker
CCR Bugs
IRC channel
GIT
Mailing List
Other languages
Foundation
Website
Useful Wiki Links
Project Roadmap
Getting the Source
Screenshots
How to use the forum
About donations (wiki)
Bookstore
Computer Math and Games in Pascal
(preview)
Lazarus Handbook
Search
Advanced search
Recent
New to internet programmi...
by
Thaddy
[
Today
at 06:00:41 am]
A "leisure" question on W...
by
Thaddy
[
Today
at 05:53:56 am]
App with black theme runs...
by
AlexTP
[
Today
at 04:36:04 am]
Your best UI design - con...
by
AlexTP
[
Today
at 04:32:36 am]
Computational Language Tr...
by
AlexTP
[
Today
at 02:55:23 am]
Poll: Watches and Display...
by
440bx
[
Today
at 01:08:58 am]
Free AI to use in local
by
gidesa
[March 29, 2024, 10:14:48 pm]
Program loop "runaway" wh...
by
Thaddy
[March 29, 2024, 09:34:48 pm]
Unable to open the packag...
by
LazKuri
[March 29, 2024, 08:42:25 pm]
Slight improvement for la...
by
n7800
[March 29, 2024, 07:18:44 pm]
Controlling the behavior ...
by
1HuntnMan
[March 29, 2024, 04:55:21 pm]
Making panels with lots o...
by
lainz
[March 29, 2024, 04:00:20 pm]
Ribbon bar in Lazarus 3.2...
by
lainz
[March 29, 2024, 03:58:42 pm]
Have anyone develop UEFI ...
by
PascalDragon
[March 29, 2024, 02:16:40 pm]
Dynarray initialization p...
by
PascalDragon
[March 29, 2024, 02:12:47 pm]
STARS and Regular POLYGON...
by
Boleeman
[March 29, 2024, 02:05:38 pm]
how to change the color f...
by
cdbc
[March 29, 2024, 12:02:27 pm]
Understanding and adjusti...
by
ArchChem
[March 29, 2024, 11:49:35 am]
Offical launch of the 1 B...
by
abouchez
[March 29, 2024, 11:14:35 am]
Using KeyPress event, how...
by
KodeZwerg
[March 29, 2024, 10:44:31 am]
Big Numbers Math
by
Thaddy
[March 29, 2024, 07:22:49 am]
Parquet?
by
Thaddy
[March 29, 2024, 07:11:17 am]
Project fails on run but ...
by
jamie
[March 29, 2024, 12:54:49 am]
Curling Pythagoras Tree: ...
by
Boleeman
[March 29, 2024, 12:00:37 am]
how to search in rxmemory...
by
rcmz
[March 28, 2024, 10:19:54 pm]
« previous
next »
Print
Pages: [
1
]
Author
Topic: How to handle Buttons on TUpDown component ? (Read 2348 times)
DenPit5
New Member
Posts: 21
How to handle Buttons on TUpDown component ?
«
on:
February 13, 2019, 05:26:00 pm »
Can anyone explain How to distinguish which of the two buttuns on the TUpDown control was pressed. ?
Logged
Handoko
Hero Member
Posts: 5132
My goal: build my own game engine using Lazarus
Re: How to handle Buttons on TUpDown component ?
«
Reply #1 on:
February 13, 2019, 05:29:57 pm »
Something like this below?
Code: Pascal
[Select]
[+]
[-]
procedure
TForm1
.
UpDown1Click
(
Sender
:
TObject
;
Button
:
TUDBtnType
)
;
begin
case
Button
of
btNext
:
ShowMessage
(
'Up is pressed'
)
;
btPrev
:
ShowMessage
(
'Down is pressed'
)
;
end
;
end
;
Logged
dsiders
Hero Member
Posts: 1052
Re: How to handle Buttons on TUpDown component ?
«
Reply #2 on:
February 13, 2019, 05:31:26 pm »
Quote from: DenPit5 on February 13, 2019, 05:26:00 pm
Can anyone explain How to distinguish which of the two buttuns on the TUpDown control was pressed. ?
OnClick gets a TUDBtnType parameter: btPrev, btNext.
Logged
Preview Lazarus 3.99 documentation at:
https://dsiders.gitlab.io/lazdocsnext
DenPit5
New Member
Posts: 21
Re: How to handle Buttons on TUpDown component ?
«
Reply #3 on:
February 13, 2019, 09:17:24 pm »
Many thanks HanDoko and dsiders for replies. That is just what I required. Thanks again.
Logged
Print
Pages: [
1
]
« previous
next »
Lazarus
»
Forum
»
Programming
»
LCL
»
How to handle Buttons on TUpDown component ?
TinyPortal
© 2005-2018