Horizontal scrolling with page control

Hello,
in my application I use Page Control for switching from page to page (at the moment it is only possible when you touch on the dots). But I want that when the user scrolls left/right the next/previous page is displayed. I know that the class UIScrollView is to use, but I have no idea how!!
Can somebody post an example code?
Message was edited by: mpxl

I am trying to implement a similar scrollview/pagecontrol, but I want to retain vertical scrolling capabilities on each pane (non-paginated). Would this be easy to implement?

Similar Messages

Horizontal scrolling with mousewheel

I was wondering if anyone knew how to create horizontal scrolling with the mousewheel in Adobe Muse.
So that instead of the page moving up/down when the mousewheel is used, it moves left to right so that the user dosen't have to manually scroll.
Is there any HTML I can insert that will allow me to do this?

My apple mouse that came with my iMac G5 started sticking which was causing problems when I tried to double-click. I bought a Logitech Optical Mouse which works fine on my iMac even if it was intended to be used with a PC. I can even right-click to bring up the options you would get by ccontrol-click an apple mouse. Also the Logitech mouse is cheap compared with an apple mouse.
http://www.amazon.com/gp/product/B0001LTT64/ref=dpcp_ob_title0/104-2556526-6719156

Horizontal scrolling with mouse wheel?

I have built a website for a client that scrolls only horizontally. Is it possible to scroll with the mouse wheel horizontally?
Is there certain HTML I need to add?
Thank you

Hi,
There is no out of the box solution to force horizontal scrolling with mouse wheel. However, you can add your own code to your Muse site after exporting it. These docs should be helpful :
http://css-tricks.com/snippets/jquery/horz-scroll-with-mouse-wheel/
http://stackoverflow.com/questions/2346958/how-to-do-a-horizontal-scroll-on-mouse-wheel-sc roll
Regards,
Aish

Horizontal scrolling with captioned images?

Hey everybody I'm helping a friend with his new site and need help figuring this out:
- I want to add left-aligned text captions below each of the horizonal scrolling images.
- I also want the images/captions to automatically resize to fit every window size (as the images currently do) - would be great if the image caption texts would automatically resize and become smaller with smaller window sizes.
Example here (this is a test without captions): http://briankokoska.com/indextest2.html
If somebody could please try to code the page including the word "caption" left-aligned underneath each of the images I would be very greatful. This way i can add the proper captions myself.
Thanks in advance for your help!!!

Horizontal scrolling and fixed divisions don't work well in mobile devices.
Try this code in a new, blank document and SaveAs test.html. This works much better in mobile/tablet devices.
<!doctype html>
<html>
<head>
<meta charset="utf-8">
<title>BRIAN KOKOSKA</title>
<meta name="viewport" content="width=device-width, initial-scale=1">

<style>
margin: 0;
padding: 0;
-moz-box-sizing: border-box;
-webkit-box-sizing: border-box;
box-sizing: border-box;
body {
width: 98%;
color: #000;
padding: 0 1%;
font-size: 125%;
font-family: Segoe, "Segoe UI", "DejaVu Sans", "Trebuchet MS", Verdana, sans-serif;
header {
position: fixed;
top: 0;
right: 3%;
margin: 0;
width: 35%;
font-weight: bold;
text-align: right;
background: rgba(255,255,251,0.5)
header * { padding-right: 1% }
header address a {
padding-top: 25px;
margin-bottom: 0;
color: red
header p { margin-top: 25px; }
header h2 a {
color: blue;
font-size: 75%;
margin-top: -10px;
section { display: table; }
article { display: table-row; }
/**Captions**/
article p {
display: table-cell;
vertical-align: middle;
margin: 2%;
padding: 2%;
color: red;
/**re-usable classes**/
.center { text-align: center }
.right { text-align: right }
.red { background: rgba(255,0,0,0.5); }
.white { background: rgba(204,204,204,0.5) }
.blue { background: rgba(0,102,204,0.5) }
/**links**/
a img { border: none }
a {
text-decoration: none;
color: #000;
display: block;
line-height: 2em;
a:hover, a:active, a:focus { text-decoration: underline }
/* Special Rules for Mobile, Tablets */
@media only screen and (max-width: 1024px) {
body { font-size: 90% }
img { width: 100% }
header {
width: 100%;
position: static;
padding: 0.5%
article p {
display: block;
padding: 0;
font-size: 90%
</style>
</head>
<body>
<header>
<h1 class="right">BRIAN KOKOSKA</h1>
<address>
<a href="mailto:[email protected]">[email protected] </a>
</address>
<h2><a href="http://mfineart.ca/artists/brian-kokoska-selected-works/" target="_blank">Macaulay & Co. Fine Art</a></h2>
<p class="blue"><a href="http://briankokoska.com/installationviews">INSTALLATION VIEWS</a><p>
<p class="white"><a href="http://briankokoska.com/selectedworks">SELECTED WORKS</a></p>
<p class="red"><a href="http://briankokoska.com/info">INFORMATION</a></p>
</header>
<section>
<article>
<p>Caption goes here...</p>
<p><a href="http://lvl3gallery.com/post-hope-1262013-2172013/#1" target="_blank">
<img src="http://briankokoska.com/briankokoska_posthope_smallest.jpg">
</a> </p>
<p>Caption goes here...</p>
<p><a href="http://lvl3gallery.com/post-hope-1262013-2172013/#1" target="_blank">
<img src="http://briankokoska.com/briankokoska_posthope_smallest2.jpg">
</a> </p>
<p>Caption goes here...</p>
<p><a href="http://voxpopuligallery.org/exhibitions/painting-bitten-by-a-man/" target="_blank">
<img src="http://briankokoska.com/briankokoska_paintingbittenbyaman_smallest.jpg">
</a> </p>
<p>Caption goes here...</p>
<p><a href="http://voxpopuligallery.org/exhibitions/painting-bitten-by-a-man/" target="_blank">
<img src="http://briankokoska.com/briankokoska_paintingbittenbyaman_smallest2.jpg">
</a></p>
<p> Caption goes here... </p>
<p>image here</p>
Etc.....
</article>
</section>
</body>
</html>
Nancy O.

Designing for iPad. Horizontal Scroll & Different Page Sizes.

Putting together a pdf for iPad using cs6.
I have content that fits a standard iPad format BUT I also have these very long timelines (170cm x 21 cm). These need to be displayed zoomed in – with the reader swiping right to accessing the remainder of the content (so a horizontal scroll).
Whenever I test it on the iPad it displays the full image (so zoomed out and tiny).
Just to clarify – I have two different page sizes in the same document – standard iPad size and then these annoyingly long ones....
So how do I make sure I view them right on the iPad? I need the zoom/fixed start on the long images.
Sorry a bit of a novice with anything for iPad.
Thanks!

Hi,
Go the page in which u have added the iview.
choose page layout.
Set "1 Column (Full Width)" for the column property
The Default Layout should be 1 Column (Full Width).
Regards,
Krishna Kumar

Horizontal scrolling with a vertical scroll wheel

Recently I sadly had to ditch my mighty mouse. Good by little friend.
I couldn't justify spending 45 minutes of my day trying to clean the wheel.
I miss horizontal scrolling now. I've been told that one can get horizontal scrolling by holding the shift key, but that doesn't work for me.
Any ideas?

My apple mouse that came with my iMac G5 started sticking which was causing problems when I tried to double-click. I bought a Logitech Optical Mouse which works fine on my iMac even if it was intended to be used with a PC. I can even right-click to bring up the options you would get by ccontrol-click an apple mouse. Also the Logitech mouse is cheap compared with an apple mouse.
http://www.amazon.com/gp/product/B0001LTT64/ref=dpcp_ob_title0/104-2556526-6719156

I usually scroll with page up/page down on my laptop. With firefox, it will go back and forth between my previous pages. How do I fix this?

My question pretty much sums it up. I like to scroll with the page up/page down buttons, and it's hit or miss working with firefox lately. It will go between my previous pages that I've visited instead of scrolling down the page.
Any suggestions?

When you say ''"It will go between my previous pages that I've visited"'' like clicking Back button to go to a previously browsed webpage ?? OR does your current Tab switches back/forth to previous/next tabs located in the Tab Strip(Tab bar) ??

How do I eliminate horizontal scrolling with wireless mouse?

Is there a way to disable just the horizontal scrolling on a wireless mouse? I have Mac OS X 10.6.8. I've searched Google and found several sources that recommend typing "defaults write com.apple.driver.Apple BluetoothMultitouch.mouse MouseHorizontalScroll -bool NO" in the Terminal window but it does not work. Any help would be appreciated.

It will only last until the next startup, but
Open Terminal (in your Applications/Utilities folder):
Copy/paste and hit Return:
defaults write com.apple.driver.AppleBluetoothMultitouch.mouse MouseHorizontalScroll -bool NO
For this to take effect, turn your mouse off and then on again from the power switch
To reverse
defaults write com.apple.driver.AppleBluetoothMultitouch.mouse MouseHorizontalScroll -bool YES
Message was edited by: WZZZ

Horizontal Scroll with CSS ? ? ?

Hi All:
I did a search on the forum and cannot find what I am looking for so I am posting this question: I built a phot gallerey based upon the Stu Nichols tutorial I found posted online. It works fine and can be seen here:
http://www.chartoonz.com/test/imgGalleryTEST02Scroll.html
My problem is too many photo buttons. I have 32 buttons for the photos but I don't want them all to show. I just want to line them all up, horizontally and allow a user to scroll through the top line. I would really like the scroll to stay put when they click a button and let them continue to scroll. Is that possible?
I tried using "overflow-x:scroll;" in the ".gallery" style but I cannot restrict the height as of now; so it didn't work. Not sure what's going wrong and I sure could use some help...
Thanks
ACC

Qusi success!
I had to set .gallery's width up to 250% but I finally got the scroll I wanted hooray and thank you! It can be seen at http://www.chartoonz.com/test/imgGalleryTEST05ScrollKeepingimagesInplace.html
So thanks a LOT.
However the results are not what I intended, the scroll shifts all the LI items when one scrolls which means that the images, scroll along with them and I was hoping to keep them stuck in one position. I HAD thought that the
.gallery li a img {
position:absolute;
top:-390px;
left:80px;
would do that but having researched absolute positioning I see the folly of my ways. Is there a way with the css to decouple the image's (.gallery li a img) from the positioning of the actual .gallery li a positioning? Or am I barking up the worng tree. It's frustrating to be 66.66% done. If there was a way to get the scroll, to scroll, but the images to stay put DESPITE the fact that they are all part of the same unorderd list it wouyld be awesome. I have looked through the forums but I cannot get any information that seems to be helpful.

Can't horizontal scroll with PC desktop glidepoint touch pad or dell lap top touchpad.

I can scroll vertically but not horizontally on firefox with desktop PC glidepoint touchpad and with dell laptop touchpad. Desk-and-lap tops work fine with internet explorer.
== This happened ==
Every time Firefox opened
== From first moment firefox was downloaded

I cant get my T530 to boot on the discrete graphics card either (Nvidia) unless I add (EDIT: to the kernel boot line in grub.cfg):
noapic
Note that I did NOT write noacpi, but noapic. See this thread:
https://bbs.archlinux.org/viewtopic.php?id=175672
**EDIT2** Actually, you might try noacpi and noapic, and then both at the same time considering your mention of acpi in your OP.
Last edited by GSF1200S (2014-05-29 17:08:07)

Lightbox in slideshow widget scrolling with page

Hi,
if i have page that scrolls and being in lightbox mode, scrollbar in browser doesn't dissapear and causing scroll of lightbox image thru all the page when moving mouse wheel or keyboard - it shouldn't scroll! It didn't happen with muse 2.
Please fix it or post solution.
Look at this - there is no scroll bar in lightbox mode and you can't scroll image up or down - despite main site have a scroll bar:
http://tv.adobe.com/watch/learn-muse/adobe-muse-creating-a-lightbox-slideshow/?t=148.764

i ask the same !A carousel thumbnails widget or place a html !
And i think is possible because i found this http://muse.adobe.com/exchange-library/lances-sample-widgets and this support the base for the scrolling effect,I mean here that you can find marquee (text scrolling ) and a sliding image also.Its a start.I hope a development make a widget for sliding thumbnails

Horizontal scrolling with a table that is 100% width of window/container

Hello,
I'm a bit perplexed - it seems to me that the only way that I can have both fixed and scrollable columns in a table, with a table that resizes to the width of the user's screen, is to have percentage widths for all the entries.
Warning imminent rant
This seems to me to almost defeat the purpose. I want to be able to show more columns if the user has a large screen, and less if they have a small screen, keep certain key fields always showing and have the space avaliable for each column fixed to the size of the column contents. Having percentages of the screen for all columns just means that the column will get wider and thinner, not more or less!
Is there any hope that this might come along with client side scrolling in NetWeaver EhP2? Or does anyone have a cunning solution to the problem?
Now, I can sort of understand why this functionality has been build like this (the ABAP not having any real idea of how wide the screen actually is) - but why deliever such a solution at all? I can almost understand a fixed width situation, although all that code for a minimal improvement over just specifying the number of scrollable columns is suprising - but I struggle to see the use case for setting all the columns in a table to display as percentage widths.
Rant over -
If anyone does have any ideas how to have a 100% width table with fixed width columns - please do let me know.
Cheers,
Chris

Can this work:
Emebed your table UI element in Transparent Container UI element ( give it a fixed width ), now make table width as 100 % and make each column width as Width of Transparent Container / No of Columns.
Although I'm suggesting this but in my opinion giving fixed width to any UI element height width property is not advisable and recommended. It is because when browser will be resized by the user then if there is a fixed width settings then scrollbars would appear and layout may also go haywire.
If on the other hand if we are giving % (relative of window ) in width height of UI elements then layout will be adjusted automatically.
Regards
Manas Dua

Menu that scrolls with page

I am looking at trying to make the side menu follow the
scroll of the page so that its visible at all times when your
scrolling. Can this be done within DW and can anyone give me any
pointers on how this is done or point me to any tutorials on it?
Much Respect
PaKa

http://dhtmlnirvana.com/oldalchemy/floater.htm
http://www.flevooware.nl/dreamweaver/extdetails.asp?extID=1
Jo
"PaKa79" <[email protected]> wrote in
message
news:e2puff$6vk$[email protected]..
>I am looking at trying to make the side menu follow the
scroll of the page
>so
> that its visible at all times when your scrolling. Can
this be done within
> DW
> and how do you do this?
>
> Much Respect
> PaKa
>

Why does thumbnail widget not scroll with page in browser

Hi, I am experiencing a slider problem. The thumbnail slider heroes and thumbnails appear not to be attached to the Gallery page and does not scroll to view full hero image.
The site is live at: www.bilyz.com. All other pages are OK. Thanks for any help
Bill Watters

Hi,
It looks like you have pinned the slider. Please check and make sure it is not pinned.
Regards,
Aish

Unable get the table scroll for table control

hai
i unable get horizontal scrolling for table control when the output is dislayed
help me
very urgent

Hi,
check out the sample program it might help you
See the following simple ex
*& Module pool ZTEST_TBLCTRL
PROGRAM ZTEST_TBLCTRL.
***&SPWIZARD: DATA DECLARATION FOR TABLECONTROL 'TC1'
*&SPWIZARD: DEFINITION OF DDIC-TABLE
TABLES: ZFG_SRNO, ZFIH0004.
*&SPWIZARD: TYPE FOR THE DATA OF TABLECONTROL 'TC1'
*TYPES: BEGIN OF T_TC1,
ZSRNO LIKE ZFG_SRNO-ZSRNO,
SCRNAME LIKE ZFIH0004-SCRNAME,
END OF T_TC1.
*TYPES: BEGIN OF T_TC1.
STRUCTURE ZFG_SRNO.
END OF T_TC1.
*&SPWIZARD: INTERNAL TABLE FOR TABLECONTROL 'TC1'
*DATA: G_TC1_ITAB TYPE T_TC1 OCCURS 0 WITH HEADER LINE,
G_TC1_WA TYPE T_TC1. "work area
DATA: G_TC1_ITAB LIKE ZFG_SRNO OCCURS 0 WITH HEADER LINE,
G_TC1_WA LIKE G_TC1_ITAB. "work area
DATA: G_TC1_COPIED. "copy flag
*&SPWIZARD: DECLARATION OF TABLECONTROL 'TC1' ITSELF
CONTROLS: TC1 TYPE TABLEVIEW USING SCREEN 0100.
*&SPWIZARD: LINES OF TABLECONTROL 'TC1'
DATA: G_TC1_LINES LIKE SY-LOOPC.
DATA: OK_CODE LIKE SY-UCOMM,
S_CODE LIKE SY-UCOMM,
MARK.
DATA: T1(10).
*&SPWIZARD: OUTPUT MODULE FOR TC 'TC1'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: COPY DDIC-TABLE TO ITAB
MODULE TC1_INIT OUTPUT.
IF G_TC1_COPIED IS INITIAL.
*&SPWIZARD: COPY DDIC-TABLE 'ZFG_SRNO'
*&SPWIZARD: INTO INTERNAL TABLE 'g_TC1_itab'
SELECT * FROM ZFG_SRNO
INTO CORRESPONDING FIELDS
OF TABLE G_TC1_ITAB.
G_TC1_COPIED = 'X'.
REFRESH CONTROL 'TC1' FROM SCREEN '0100'.
IF T1 <> SPACE.
G_TC1_ITAB-ZSRNO = T1.
CLEAR T1.
APPEND G_TC1_ITAB.
REFRESH CONTROL 'TC1' FROM SCREEN '0100'.
ENDIF.
*TC1-TOP_LINE = 1.
ENDIF.
ENDMODULE.
*&SPWIZARD: OUTPUT MODULE FOR TC 'TC1'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: MOVE ITAB TO DYNPRO
MODULE TC1_MOVE OUTPUT.
MOVE-CORRESPONDING G_TC1_WA TO ZFG_SRNO.
if sy-subrc ne 0.
*append G_TC1_WA to G_TC1_ITAB.
*endif.
READ TABLE G_TC1_ITAB INDEX TC1-CURRENT_LINE.
IF SY-SUBRC = 0.
G_TC1_WA-ZSRNO = G_TC1_ITAB-ZSRNO.
ENDIF.
MOVE-CORRESPONDING G_TC1_ITAB TO ZFG_SRNO.
REFRESH CONTROL 'TC1' FROM SCREEN '8001'.
*******Below line is the logic for scrolling.
tc1-lines = G_TC1_LINES + 100.
ENDMODULE.
*&SPWIZARD: OUTPUT MODULE FOR TC 'TC1'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: GET LINES OF TABLECONTROL
MODULE TC1_GET_LINES OUTPUT.
G_TC1_LINES = SY-LOOPC.
ENDMODULE.
*&SPWIZARD: INPUT MODULE FOR TC 'TC1'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: MODIFY TABLE
MODULE TC1_MODIFY INPUT.
*break-point.
MOVE-CORRESPONDING ZFG_SRNO TO G_TC1_ITAB.
MODIFY G_TC1_ITAB INDEX TC1-CURRENT_LINE.
G_TC1_COPIED = 'X'.
REFRESH CONTROL 'TC1' FROM SCREEN '8001'.
MOVE-CORRESPONDING ZFG_SRNO TO G_TC1_WA.
MODIFY G_TC1_ITAB
FROM G_TC1_WA
INDEX TC1-CURRENT_LINE.
G_TC1_COPIED = 'X'.
if sy-subrc ne 0.
append G_TC1_WA to G_TC1_ITAB.
endif.
*modify G_TC1_ITAB INDEX TC1-CURRENT_LINE.
ENDMODULE.
*&SPWIZARD: INPUT MODULE FOR TC 'TC1'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: PROCESS USER COMMAND
MODULE TC1_USER_COMMAND INPUT.
OK_CODE = SY-UCOMM.
PERFORM USER_OK_TC USING 'TC1'
'G_TC1_ITAB'
'FLAG'
CHANGING OK_CODE.
SY-UCOMM = OK_CODE.
ENDMODULE.
INCLUDE TABLECONTROL_FORMS *
*& Form USER_OK_TC *
FORM USER_OK_TC USING P_TC_NAME TYPE DYNFNAM
P_TABLE_NAME
P_MARK_NAME
CHANGING P_OK LIKE SY-UCOMM.
&SPWIZARD: BEGIN OF LOCAL DATA----
DATA: L_OK TYPE SY-UCOMM,
L_OFFSET TYPE I.
&SPWIZARD: END OF LOCAL DATA----
*&SPWIZARD: Table control specific operations *
*&SPWIZARD: evaluate TC name and operations *
SEARCH P_OK FOR P_TC_NAME.
IF SY-SUBRC <> 0.
EXIT.
ENDIF.
L_OFFSET = STRLEN( P_TC_NAME ) + 1.
L_OK = P_OK+L_OFFSET.
*&SPWIZARD: execute general and TC specific operations *
CASE L_OK.
WHEN 'INSR'. "insert row
PERFORM FCODE_INSERT_ROW USING P_TC_NAME
P_TABLE_NAME.
CLEAR P_OK.
WHEN 'DELE'. "delete row
PERFORM FCODE_DELETE_ROW USING P_TC_NAME
P_TABLE_NAME
P_MARK_NAME.
CLEAR P_OK.
WHEN 'P--' OR "top of list
'P-' OR "previous page
'P+' OR "next page
'P++'. "bottom of list
PERFORM COMPUTE_SCROLLING_IN_TC USING P_TC_NAME
L_OK.
CLEAR P_OK.
WHEN 'L--'. "total left
PERFORM FCODE_TOTAL_LEFT USING P_TC_NAME.
WHEN 'L-'. "column left
PERFORM FCODE_COLUMN_LEFT USING P_TC_NAME.
WHEN 'R+'. "column right
PERFORM FCODE_COLUMN_RIGHT USING P_TC_NAME.
WHEN 'R++'. "total right
PERFORM FCODE_TOTAL_RIGHT USING P_TC_NAME.
WHEN 'MARK'. "mark all filled lines
PERFORM FCODE_TC_MARK_LINES USING P_TC_NAME
P_TABLE_NAME
P_MARK_NAME .
CLEAR P_OK.
WHEN 'DMRK'. "demark all filled lines
PERFORM FCODE_TC_DEMARK_LINES USING P_TC_NAME
P_TABLE_NAME
P_MARK_NAME .
CLEAR P_OK.
WHEN 'SASCEND' OR
'SDESCEND'. "sort column
PERFORM FCODE_SORT_TC USING P_TC_NAME
l_ok.
ENDCASE.
ENDFORM. " USER_OK_TC
*& Form FCODE_INSERT_ROW *
FORM fcode_insert_row
USING P_TC_NAME TYPE DYNFNAM
P_TABLE_NAME .
&SPWIZARD: BEGIN OF LOCAL DATA----
DATA L_LINES_NAME LIKE FELD-NAME.
DATA L_SELLINE LIKE SY-STEPL.
DATA L_LASTLINE TYPE I.
DATA L_LINE TYPE I.
DATA L_TABLE_NAME LIKE FELD-NAME.
FIELD-SYMBOLS <TC> TYPE CXTAB_CONTROL.
FIELD-SYMBOLS <TABLE> TYPE STANDARD TABLE.
FIELD-SYMBOLS <LINES> TYPE I.
&SPWIZARD: END OF LOCAL DATA----
ASSIGN (P_TC_NAME) TO <TC>.
*&SPWIZARD: get the table, which belongs to the tc *
CONCATENATE P_TABLE_NAME '[]' INTO L_TABLE_NAME. "table body
ASSIGN (L_TABLE_NAME) TO <TABLE>. "not headerline
*&SPWIZARD: get looplines of TableControl *
CONCATENATE 'G_' P_TC_NAME '_LINES' INTO L_LINES_NAME.
ASSIGN (L_LINES_NAME) TO <LINES>.
*&SPWIZARD: get current line *
GET CURSOR LINE L_SELLINE.
IF SY-SUBRC <> 0. " append line to table
L_SELLINE = <TC>-LINES + 1.
*&SPWIZARD: set top line *
IF L_SELLINE > <LINES>.
<TC>-TOP_LINE = L_SELLINE - <LINES> + 1 .
ELSE.
<TC>-TOP_LINE = 1.
ENDIF.
ELSE. " insert line into table
L_SELLINE = <TC>-TOP_LINE + L_SELLINE - 1.
L_LASTLINE = <TC>-TOP_LINE + <LINES> - 1.
ENDIF.
*&SPWIZARD: set new cursor line *
L_LINE = L_SELLINE - <TC>-TOP_LINE + 1.
*&SPWIZARD: insert initial line *
INSERT INITIAL LINE INTO <TABLE> INDEX L_SELLINE.
<TC>-LINES = <TC>-LINES + 1.
*&SPWIZARD: set cursor *
SET CURSOR LINE L_LINE.
ENDFORM. " FCODE_INSERT_ROW
*& Form FCODE_DELETE_ROW *
FORM fcode_delete_row
USING P_TC_NAME TYPE DYNFNAM
P_TABLE_NAME
P_MARK_NAME .
&SPWIZARD: BEGIN OF LOCAL DATA----
DATA L_TABLE_NAME LIKE FELD-NAME.
FIELD-SYMBOLS <TC> TYPE cxtab_control.
FIELD-SYMBOLS <TABLE> TYPE STANDARD TABLE.
FIELD-SYMBOLS <WA>.
FIELD-SYMBOLS <MARK_FIELD>.
&SPWIZARD: END OF LOCAL DATA----
ASSIGN (P_TC_NAME) TO <TC>.
*&SPWIZARD: get the table, which belongs to the tc *
CONCATENATE P_TABLE_NAME '[]' INTO L_TABLE_NAME. "table body
ASSIGN (L_TABLE_NAME) TO <TABLE>. "not headerline
*&SPWIZARD: delete marked lines *
DESCRIBE TABLE <TABLE> LINES <TC>-LINES.
LOOP AT <TABLE> ASSIGNING <WA>.
*&SPWIZARD: access to the component 'FLAG' of the table header *
ASSIGN COMPONENT P_MARK_NAME OF STRUCTURE <WA> TO <MARK_FIELD>.
IF <MARK_FIELD> = 'X'.
DELETE <TABLE> INDEX SYST-TABIX.
IF SY-SUBRC = 0.
<TC>-LINES = <TC>-LINES - 1.
ENDIF.
ENDIF.
ENDLOOP.
ENDFORM. " FCODE_DELETE_ROW
*& Form COMPUTE_SCROLLING_IN_TC
text
-->P_TC_NAME name of tablecontrol
-->P_OK ok code
FORM COMPUTE_SCROLLING_IN_TC USING P_TC_NAME
P_OK.
&SPWIZARD: BEGIN OF LOCAL DATA----
DATA L_TC_NEW_TOP_LINE TYPE I.
DATA L_TC_NAME LIKE FELD-NAME.
DATA L_TC_LINES_NAME LIKE FELD-NAME.
DATA L_TC_FIELD_NAME LIKE FELD-NAME.
FIELD-SYMBOLS <TC> TYPE cxtab_control.
FIELD-SYMBOLS <LINES> TYPE I.
&SPWIZARD: END OF LOCAL DATA----
ASSIGN (P_TC_NAME) TO <TC>.
*&SPWIZARD: get looplines of TableControl *
CONCATENATE 'G_' P_TC_NAME '_LINES' INTO L_TC_LINES_NAME.
ASSIGN (L_TC_LINES_NAME) TO <LINES>.
*&SPWIZARD: is no line filled? *
IF <TC>-LINES = 0.
*&SPWIZARD: yes, ... *
L_TC_NEW_TOP_LINE = 1.
ELSE.
*&SPWIZARD: no, ... *
CALL FUNCTION 'SCROLLING_IN_TABLE'
EXPORTING
ENTRY_ACT = <TC>-TOP_LINE
ENTRY_FROM = 1
ENTRY_TO = <TC>-LINES
LAST_PAGE_FULL = 'X'
LOOPS = <LINES>
OK_CODE = P_OK
OVERLAPPING = 'X'
IMPORTING
ENTRY_NEW = L_TC_NEW_TOP_LINE
EXCEPTIONS
NO_ENTRY_OR_PAGE_ACT = 01
NO_ENTRY_TO = 02
NO_OK_CODE_OR_PAGE_GO = 03
OTHERS = 0.
ENDIF.
*&SPWIZARD: get actual tc and column *
GET CURSOR FIELD L_TC_FIELD_NAME
AREA L_TC_NAME.
IF SYST-SUBRC = 0.
IF L_TC_NAME = P_TC_NAME.
*&SPWIZARD: et actual column *
SET CURSOR FIELD L_TC_FIELD_NAME LINE 1.
ENDIF.
ENDIF.
*&SPWIZARD: set the new top line *
<TC>-TOP_LINE = L_TC_NEW_TOP_LINE.
ENDFORM. " COMPUTE_SCROLLING_IN_TC
*& Form FCODE_TC_MARK_LINES
marks all TableControl lines
-->P_TC_NAME name of tablecontrol
FORM FCODE_TC_MARK_LINES USING P_TC_NAME
P_TABLE_NAME
P_MARK_NAME.
&SPWIZARD: EGIN OF LOCAL DATA----
DATA L_TABLE_NAME LIKE FELD-NAME.
FIELD-SYMBOLS <TC> TYPE cxtab_control.
FIELD-SYMBOLS <TABLE> TYPE STANDARD TABLE.
FIELD-SYMBOLS <WA>.
FIELD-SYMBOLS <MARK_FIELD>.
&SPWIZARD: END OF LOCAL DATA----
ASSIGN (P_TC_NAME) TO <TC>.
*&SPWIZARD: get the table, which belongs to the tc *
CONCATENATE P_TABLE_NAME '[]' INTO L_TABLE_NAME. "table body
ASSIGN (L_TABLE_NAME) TO <TABLE>. "not headerline
*&SPWIZARD: mark all filled lines *
LOOP AT <TABLE> ASSIGNING <WA>.
*&SPWIZARD: access to the component 'FLAG' of the table header *
ASSIGN COMPONENT P_MARK_NAME OF STRUCTURE <WA> TO <MARK_FIELD>.
<MARK_FIELD> = 'X'.
ENDLOOP.
ENDFORM. "fcode_tc_mark_lines
*& Form FCODE_TC_DEMARK_LINES
demarks all TableControl lines
-->P_TC_NAME name of tablecontrol
FORM FCODE_TC_DEMARK_LINES USING P_TC_NAME
P_TABLE_NAME
P_MARK_NAME .
&SPWIZARD: BEGIN OF LOCAL DATA----
DATA L_TABLE_NAME LIKE FELD-NAME.
FIELD-SYMBOLS <TC> TYPE cxtab_control.
FIELD-SYMBOLS <TABLE> TYPE STANDARD TABLE.
FIELD-SYMBOLS <WA>.
FIELD-SYMBOLS <MARK_FIELD>.
&SPWIZARD: END OF LOCAL DATA----
ASSIGN (P_TC_NAME) TO <TC>.
*&SPWIZARD: get the table, which belongs to the tc *
CONCATENATE P_TABLE_NAME '[]' INTO L_TABLE_NAME. "table body
ASSIGN (L_TABLE_NAME) TO <TABLE>. "not headerline
*&SPWIZARD: demark all filled lines *
LOOP AT <TABLE> ASSIGNING <WA>.
*&SPWIZARD: access to the component 'FLAG' of the table header *
ASSIGN COMPONENT P_MARK_NAME OF STRUCTURE <WA> TO <MARK_FIELD>.
<MARK_FIELD> = SPACE.
ENDLOOP.
ENDFORM. "fcode_tc_mark_lines
*& Module D20XX_INIT OUTPUT
text
MODULE D20XX_INIT OUTPUT.
*if screen-name = 'ZSRNO'.
SCREEN-INPUT = 0.
SCREEN-COLOR = 0.
MODIFY SCREEN.
endif.
ENDMODULE. " D20XX_INIT OUTPUT
*& Module STATUS_0100 OUTPUT
text
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.
*CLEAR R1_REF.
DO 30 TIMES.
APPEND G_TC1_ITAB.
ENDDO.
DESCRIBE TABLE G_TC1_ITAB LINES TC1-LINES.
ENDMODULE. " STATUS_0100 OUTPUT
*& Module TAB1_INIT OUTPUT
text
MODULE TAB1_INIT OUTPUT.
ENDMODULE. " TAB1_INIT OUTPUT
*& Module USER_COMMAND_0100 INPUT
text
MODULE USER_COMMAND_0100 INPUT.
ENDMODULE. " USER_COMMAND_0100 INPUT
*& Module MESSAGE INPUT
text
MODULE MESSAGE INPUT.
OK_CODE = SY-UCOMM.
S_CODE = OK_CODE.
CLEAR OK_CODE.
if S_CODE = 'DELE'.
loop at G_TC1_ITAB.
if G_TC1_ITAB-scrname = 'X'.
delete g_tc1_itab.
endif.
endloop.
ELSEIF S_CODE = 'SAVE'.
G_TC1_WA-ZSRNO = T1.
MOVE-CORRESPONDING G_TC1_WA TO ZFG_SRNO.
REFRESH CONTROL 'TC1' FROM SCREEN '0100'.
ENDIF.
ENDMODULE. " MESSAGE INPUT
*& Module DELETE_RECORD INPUT
text
MODULE DELETE_RECORD INPUT.
IF MARK = 'X' AND S_CODE = 'DELE'.
DELETE TABLE G_TC1_ITAB FROM ZFG_SRNO.
DESCRIBE TABLE G_TC1_ITAB LINES TC1-LINES.
ENDIF.
ENDMODULE. " DELETE_RECORD INPUT
*********************Screen modules*********************
PROCESS BEFORE OUTPUT.
*&SPWIZARD: PBO FLOW LOGIC FOR TABLECONTROL 'TC1'
MODULE TC1_INIT.
*&SPWIZARD: MODULE TC1_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE TC1_CHANGE_COL_ATTR.
LOOP AT G_TC1_ITAB
INTO G_TC1_WA
WITH CONTROL TC1
CURSOR TC1-CURRENT_LINE.
*&SPWIZARD: MODULE TC1_CHANGE_FIELD_ATTR
MODULE TC1_MOVE.
MODULE TAB1_INIT.
MODULE TC1_GET_LINES.
ENDLOOP.
MODULE D20XX_INIT.
MODULE STATUS_0100.
PROCESS AFTER INPUT.
*&SPWIZARD: PAI FLOW LOGIC FOR TABLECONTROL 'TC1'
*BREAK POINT.
LOOP AT G_TC1_ITAB.
CHAIN.
FIELD ZFG_SRNO-ZSRNO.
MODULE TC1_MODIFY ON CHAIN-REQUEST.
MODULE TC1_MODIFY.
ENDCHAIN.
MODULE MESSAGE .
MODULE DELETE_RECORD.
ENDLOOP.
MODULE TC1_USER_COMMAND.
*&SPWIZARD: MODULE TC1_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE TC1_CHANGE_COL_ATTR.
MODULE USER_COMMAND_0100.
please check out the link below for more information it might help you
http://help.sap.com/saphelp_sm32/helpdata/en/9f/dbac9f35c111d1829f0000e829fbfe/content.htm
http://help.sap.com/saphelp_nw04/helpdata/en/d1/801c7b454211d189710000e8322d00/content.htm
http://www.sapbrainsonline.com/REFERENCES/ABAP_SYNTAX/SAP_ABAP_SYNTAX.html
*********please reward points if the information is helpful to you*************

Horizontal scrolling with page control

Similar Messages

Maybe you are looking for