Lazarus
Home
Help
TinyPortal
Search
Login
Register
Lazarus
»
Forum
»
Programming
»
Packages and Libraries
»
Visual PlanIt and lots of events on the day
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
GIT
Mailing List
Other languages
Foundation
Website
Useful Wiki Links
Project Roadmap
Getting the Source
Screenshots
How to use the forum
Forum Rules
About donations (wiki)
Bookstore
Computer Math and Games in Pascal
(preview)
Lazarus Handbook
Search
Advanced search
Recent
How to define a type of ...
by
Fibonacci
[
Today
at 03:22:26 am]
IndySecOpenSSL is now ava...
by
TheMouseAUS
[
Today
at 03:10:23 am]
Discipline your AI coding...
by
440bx
[
Today
at 02:44:06 am]
Version 4.8 was recently ...
by
Ten_Mile_Hike
[
Today
at 01:43:17 am]
Who can explain this ?
by
J-G
[
Today
at 01:02:01 am]
FPC Unleashed (inline var...
by
Fibonacci
[
Today
at 12:03:13 am]
[New Component] ExtTabCtr...
by
d7_2_laz
[June 10, 2026, 10:52:55 pm]
Conscious Artificial Inte...
by
schuler
[June 10, 2026, 09:11:29 pm]
TDWEdit
by
Ed78z
[June 10, 2026, 08:24:43 pm]
Trayslate 1.3.0 - Free tr...
by
AlexanderT
[June 10, 2026, 08:12:24 pm]
TShellListView
by
Ed78z
[June 10, 2026, 07:59:41 pm]
[SOLVED] Curious why this...
by
1HuntnMan
[June 10, 2026, 07:53:21 pm]
Toying Pascal Documenting...
by
paule32
[June 10, 2026, 05:22:32 pm]
Gitlab site history date.
by
Fred vS
[June 10, 2026, 05:07:59 pm]
Cursor changes to arrow o...
by
atlatl
[June 10, 2026, 05:02:45 pm]
Sizes and SizeInt
by
440bx
[June 10, 2026, 02:15:13 pm]
how to add a ForEach call...
by
jamie
[June 10, 2026, 12:42:04 pm]
XLibre, finally and fortu...
by
kagamma
[June 10, 2026, 12:15:10 pm]
[SOLVED] Watches panel is...
by
CM630
[June 10, 2026, 12:06:33 pm]
How to monitor changes in...
by
Martin_fr
[June 10, 2026, 11:55:18 am]
Printer Info
by
J-G
[June 10, 2026, 11:26:52 am]
Strange Behaviour at Runt...
by
andrew Bubble
[June 10, 2026, 11:19:45 am]
Can I get the position an...
by
CM630
[June 10, 2026, 11:00:33 am]
WEBP, no DLLs
by
CM630
[June 10, 2026, 08:52:43 am]
Dataset EnableControls/Di...
by
Sharfik
[June 10, 2026, 07:40:21 am]
« previous
next »
Print
Pages: [
1
]
Author
Topic: Visual PlanIt and lots of events on the day (Read 3053 times)
kkuba
Jr. Member
Posts: 50
Visual PlanIt and lots of events on the day
«
on:
October 07, 2023, 10:37:21 pm »
I have the problem that I have a lot of events on one day. It doesn't fit in the events preview by day, or even less in the events preview by week. When it does, three dots appear at the bottom, but clicking on them only adds a event. So it's impossible to scroll through the events on that day. Is there any way to display a long list of events on a given day? No matter in which component, e.g. in VpWeekView?
«
Last Edit: October 07, 2023, 10:47:52 pm by kkuba
»
Logged
wp
Hero Member
Posts: 13556
Re: Visual PlanIt and lots of events on the day
«
Reply #1 on:
October 07, 2023, 11:55:56 pm »
How many is a "lot of events"? How many are overlapping?
Logged
kkuba
Jr. Member
Posts: 50
Re: Visual PlanIt and lots of events on the day
«
Reply #2 on:
October 08, 2023, 12:13:13 am »
I had this idea to show the availability of the team during the week. It's about 15 people, but if it's not possible or it's difficult, I'll come up with something else.
Logged
wp
Hero Member
Posts: 13556
Re: Visual PlanIt and lots of events on the day
«
Reply #3 on:
October 08, 2023, 12:29:31 am »
OK, I see: with about 10 overlapping events it gets tight even on a wide monitor... Let me see what I can do.
Logged
wp
Hero Member
Posts: 13556
Re: Visual PlanIt and lots of events on the day
«
Reply #4 on:
October 08, 2023, 01:10:34 am »
See attached demo for a quick-and-dirty solution. You can write a procedure which exports all events of the date selected in the Dayview to a StringList, and this could be displayed in a Listbox, for example:
Code: Pascal
[Select]
[+]
[-]
procedure
ExportEventsByDate
(
AResource
:
TVpResource
;
Date
:
TDateTime
;
AList
:
TStrings
)
;
var
i
:
Integer
;
event
:
TVpEvent
;
schedule
:
TVpSchedule
;
begin
schedule
:
=
AResource
.
Schedule
;
for
I
:
=
0
to
schedule
.
EventCount
-
1
do
begin
event
:
=
schedule
.
GetEvent
(
I
)
;
if
schedule
.
IsEventOfThisDate
(
Date
,
event
)
then
begin
if
event
.
AllDayEvent
then
AList
.
Insert
(
0
,
Format
(
'all day: %s'
,
[
event
.
Description
]
)
)
else
AList
.
Add
(
'%s - %s: %s'
,
[
FormatDateTime
(
FormatSettings
.
ShortTimeFormat
,
event
.
StartTime
)
,
FormatDateTime
(
FormatSettings
.
ShortTimeFormat
,
event
.
EndTime
)
,
event
.
Description
]
)
;
end
;
end
;
end
;
Logged
kkuba
Jr. Member
Posts: 50
Re: Visual PlanIt and lots of events on the day
«
Reply #5 on:
October 08, 2023, 07:52:30 am »
This is what I was thinking about. I just wrote a query in SQL to the events table using ZQurey because in then I could use DBGrid. But this is a nightmare solution.... In fact, it should probably work like this, that when you click on the three dots it moves the list of events. Because now it is impossible to edit a longer list of events from these components.
Logged
wp
Hero Member
Posts: 13556
Re: Visual PlanIt and lots of events on the day
«
Reply #6 on:
October 11, 2023, 12:32:30 am »
I extended the TVpGanttview to hour resolution. In a GanttView the time is on the horizontal axis (in DayView it is on the vertical axis), and every event has a single row. Maybe this is better-suited to this use case.
Logged
Print
Pages: [
1
]
« previous
next »
Lazarus
»
Forum
»
Programming
»
Packages and Libraries
»
Visual PlanIt and lots of events on the day
TinyPortal
© 2005-2018