精华内容
下载资源
问答
  • 在android TV上,时候,...填充数据的时候,我们下拉到最后一行,发现最后一行数据纵向上内容会显示不完整,比如说其他的都显示了,就只有文字还有一半没显示出来,像这种情况菜鸟会经常遇到之后,不知道如何解决,

    在android TV上,有时候,我们会发现,在使用ListView和GridView的时候,如果直接给ListView或者GridView的layout_height属性设置为match_parent的时候,当我们运行,

    填充数据的时候,我们下拉到最后一行,发现最后一行数据纵向上内容会显示不完整,比如说其他的都显示了,就只有文字还有一半没显示出来,像这种情况菜鸟会经常遇到之后,不知道如何解决,疯狂百度之后,也没有搜到这样的小细节,所以我想把这个细节记录一下,希望能帮到刚入行android TV开发的新人,因为手机上不会遇到这样的问题,因为手机上是触摸屏的,可以上下滑动,可以看到完整的item信息。


    一般我们在给ListView或者GridView的layout_height属性设置为match_parent的时候,最好在设置一个layout_marginBottom属性,值大于0以上应该就可以了,例如:

     <GridView
                            android:id="@+id/file_gridview"
                            android:layout_width="match_parent"
                            android:layout_height="match_parent"
                            android:layout_marginBottom="10dp"
                            android:cacheColorHint="@android:color/transparent"
                            android:horizontalSpacing="@dimen/category_page_files_content_gridview_horizontalSpacing"
                            android:listSelector="@android:color/transparent"
                            android:numColumns="5"
                            android:scrollbars="none"
                            android:verticalSpacing="@dimen/category_page_files_content_gridview_verticalSpacing" />


    展开全文
  • 在android TV上,...填充数据的时候,我们下拉到最后一行,发现最后一行数据纵向上内容会显示不完整,比如说其他的都显示了,就只有文字还有一半没显示出来,像这种情况菜鸟会经常遇到之后,不知道如何解决,疯...

    在android TV上,有时候,我们会发现,在使用ListView和GridView的时候,如果直接给ListView或者GridView的layout_height属性设置为match_parent的时候,当我们运行,

    填充数据的时候,我们下拉到最后一行,发现最后一行数据纵向上内容会显示不完整,比如说其他的都显示了,就只有文字还有一半没显示出来,像这种情况菜鸟会经常遇到之后,不知道如何解决,疯狂百度之后,也没有搜到这样的小细节,所以我想把这个细节记录一下,希望能帮到刚入行android TV开发的新人,因为手机上不会遇到这样的问题,因为手机上是触摸屏的,可以上下滑动,可以看到完整的item信息。

    一般我们在给ListView或者GridView的layout_height属性设置为match_parent的时候,最好在设置一个layout_marginBottom属性,值大于0以上应该就可以了,例如:

     <GridView
                            android:id="@+id/file_gridview"
                            android:layout_width="match_parent"
                            android:layout_height="match_parent"
                            android:layout_marginBottom="10dp"
                            android:cacheColorHint="@android:color/transparent"
                            android:horizontalSpacing="@dimen/category_page_files_content_gridview_horizontalSpacing"
                            android:listSelector="@android:color/transparent"
                            android:numColumns="5"
                            android:scrollbars="none"
                            android:verticalSpacing="@dimen/category_page_files_content_gridview_verticalSpacing" />
    
    
    展开全文
  • 他想把12N这些数依次放进去,但是为了使格子看起来优美,他想找到使每每列都递增方案。不过画了很久,他发现方案数实在是太多了。度度熊想知道,多少种放数字方法能满足上面条件? Input  第...
  • 也就是说六千行数据最后输出的一列剩 如果我用 AVERAGE(A1:A6)、AVERAGE(A7:A12)然后下拉话,自动填充的不是每隔六出来个,第三个就变成了AVERAGE(A3:A8),最后导致数据并没有...
  • 数据结构 1800题》

    热门讨论 2012-12-27 16:52:03
    其中 n为正整数,则最后一行的语句频度在最坏情况下是(D ) 郴州都市网 www.0735.cc郴州人才网 www.CZHR.com www.989.org 《数据结构 1800题》 A. O(n) B. O(nlogn) C. O(n3) D. O(n2) 【南京理工大学 ...
  • 如何能把模板语法编译成个能够返回 Virtual-DOM render 函数?例如上面模板引擎,不再返回 HTML 字符串了,而是返回个像下面那样 render 函数: <pre><code> javascript ...
  • 使用 DataView 查看数据:描述如何访问 DataView 的内容,在 DataView 中查找特定的数据,以及基于父子关系创建数据的视图。 使用 DataView 修改数据:描述如何通过 DataView 修改基础 DataTable 中的数据(包括...
  • 10.4.9 最后一行 93 10.4.10 打印行号 93 10.4.11 附加文本 93 10.4.12 创建sed脚本文件 94 10.4.13 插入文本 94 10.4.14 修改文本 95 10.4.15 删除文本 96 10.4.16 替换文本 96 10.5 使用替换修改字符串 97 10.6 将...
  • 如何在EXCEL中快速定位最后一行数据 用SUN函数快速求和 在Excel中快速查看所有工作表公式 在Excel中设置行间距 怎样同时改变多行行高 快速换行 让文本换行 在Excel中行列快速转换 将原有列中内容倒置过来 快速回到...
  • 你必须知道495个C语言问题

    千次下载 热门讨论 2015-05-08 11:09:25
    可我找不任何方法来声明这样函数——感觉我需要个返回指针函数,返回指针指向又是返回指针函数……,如此往复,以至无穷。 数组大小 1.23 能否声明和传入数组大小一致局部数组,或者由其他参数...
  • 《你必须知道495个C语言问题》

    热门讨论 2010-03-20 16:41:18
    可我找不任何方法来声明这样函数——感觉我需要个返回指针函数,返回指针指向又是返回指针函数……,如此往复,以至无穷。 12  数组大小 13 1.23 能否声明和传入数组大小一致局部数组,或者由...
  •  实例111 使用重载方法实现不同类型数据的计算 135 5.2 结构与类 136  实例112 通过结构计算矩形的面积 136  实例113 通过类继承计算梯形面积 137  实例114 封装类实现个简单的计算器 139  实例115 使用...
  •  '测出数据的最后一行  endrow = Sheet1.Range("a65536").End(xlUp).Row - 1  '把标题贴过去  Worksheets(1).Range("1:1").Copy (Worksheets(2).Cells(1, 1))  For i = 3 To endrow  '把每条数据抬头贴过去  ...
  • EXCEL函数公式集

    热门讨论 2010-03-16 03:26:38
    如何在EXCEL中快速定位最后一行数据 用SUN函数快速求和 在Excel中快速查看所有工作表公式 在Excel中设置行间距 怎样同时改变多行行高 快速换行 让文本换行 在Excel中行列快速转换 将原有列中内容倒置过来 快速回到...
  • 可我找不任何方法来声明这样函数——感觉我需要个返回指针函数,返回指针指向又是返回指针函数……,如此往复,以至无穷。 12  数组大小 13 1.23 能否声明和传入数组大小一致局部数组,或者由...
  • 可我找不任何方法来声明这样函数——感觉我需要个返回指针函数,返回指针指向又是返回指针函数……,如此往复,以至无穷。  数组大小  1.23 能否声明和传入数组大小一致局部数组,或者由其他参数...
  • 可我找不任何方法来声明这样函数——感觉我需要个返回指针函数,返回指针指向又是返回指针函数……,如此往复,以至无穷。 数组大小 1.23 能否声明和传入数组大小一致局部数组,或者由其他参数...
  • 处理FLV数据的提示点 8.14节. 创建视频播放进度条 8.15节. 读取mp3文件的ID3数据 8.16节. 在载入图像时显示自定义引导 8.17节. 启动图像上传 8.18节. 比较两幅位图 第九章.皮肤与样式(305) 9.1节.用CSS定义组件...
  • activereport报表控件详细使用说明

    千次阅读 2010-12-29 09:41:00
    如何判断是否报表的最后一页 2.当报表数据源为空是,如果填充记录,也就是空报表(主要报表是以表格方式) 第页20行数据! 3.以表格形式做报表时,细节和本页合计部分一部分空间,如何去掉,谢谢!...

    [推荐]activereport报表控件的详细使用说明 使用ActiveReport报表若干问题

     

    1.如何判断是否到报表的最后一页

    2.当报表数据源为空是,如果填充记录,也就是空报表(主要报表是以表格方式)

    第页20行数据!

    3.以表格形式做报表时,细节和本页合计部分有一部分空间,如何去掉,谢谢!

    ==================

     

    以下为CSDN handwolf(初学者)回答

     

    1,这一点我也不知道有什么属性可以判断是否到报表的最后一页,但是方法是有的,我以前

        的方法是控制一页的记录行数,然后根据记录总数计算出总的页数,报表的pageNumber

        性表示当前的页码,比较一下就可以了,然后显示总页数与当前页码的方法如下:

              --在页脚中添加一个用于显示总页数的Field和一个用于显示第几页的Field2

              --显示总页数的Field1:设置Summaryrunning的值为:0(ddsrNone)

                            summaryFunc的值为0

                            Summarytype的值为4

              --显示第几页的Field2:设置Summaryrunning的值为:2(ddsrall)

                           summaryFunc的值为2

                            Summarytype的值为4

     

    2,这个问题我也遇到过,我的解决方法是程序控制(假设你一页打印20行)

        1)如果记录源空,则可以建一临时记录集,除了允许字段为空外,其他的与原记录源

            相同,这样可以增加空记录(比如20条),然后用临时记录集绑定

     

        2)如果记录源不空,记录数不能添满一页,想用空记录添满;则可以用如下方法控制:

     

            首先,要有变量记录当前打印的是一页中的第几行(如整型的printline变量)

     

            然后在报表的Detail_Format()事件中控制是否到达记录集尾,是否打印了20

     

            如果打到最后一条记录还没有打完一页,就让帮定的记录集moveprevious!!!直到

            打印完一页!

     

            注意:这里的最后一行可要控制好

                  第一次moveprevious时,不要进行清空绑定的field控件

                  第二次到最后一次moveprevious时,一定要清空绑定的field控件,否则会一直

                  显示最后一条记录

     

     

    3,你可以将本页合计放在Detail部分,设置它的visiblefalse

        当到这一页最后一条记录时,设置它的visibletrue

     

    下面的是第一次做的代码,命名不规则!!!希望你看得不会累!后来写的代码是用临时记录集的!

     

     

    Dim rst As ADODB.Recordset

    Dim num As Integer '记录已输出的有效记录数-1

    Dim bc As Integer '记录所需补的空记录数 ,在变,最后减为0

    Dim bc2 As Integer '记录所需补的空记录数 ,一直不变

    Dim totalPagenum As Integer '记录总页数

    Dim recordnum As Integer '记录总记录数

    Dim flag As Boolean '控制开关,控制最后一条记录的显示

     

    Private Sub ActiveReport_ReportStart()

    Set rst = GetRecordset("select * from ymjzjl") '注意这里的打开方式,recordcount

                                                     '的属性必须可用

    '赋初值

    num = -1

    recordnum = rst.RecordCount'总记录数

    bc = 10 - recordnum Mod 10

    If bc = 10 Then

    bc = 0

    End If

    bc2 = bc   '需要补充的行数

    If bc = 0 Then

    totalPagenum = recordnum / 10'总的页数

    Else

    totalPagenum = recordnum / 10 + 1

    End If

    rst.MoveFirst

    DataControl1.Recordset = rst

    End Sub

     

    Private Sub Detail_Format()

    PageBreak1.Enabled = False    'PageBreak1用来控制一页只显示10条记录

    num = num + 1      '已经打印的行数

    If num >= recordnum - 1 And bc > 0 Then

       If flag = True Then 

         Field2.Text = ""

         Field1.Text = ""

         Field3.Text = ""

         Field4.Text = ""

         Field5.Text = ""

       End If

       flag = True

       rst.MovePrevious

       bc = bc - 1 '还需打印的空行减1

    End If

    If bc = 0 And flag = True Then

        Field2.Text = ""

        Field1.Text = ""

        Field3.Text = ""

        Field4.Text = ""

        Field5.Text = ""

    End If

    If (num + 1) Mod 10 = 0 Then

    If Me.pageNumber = totalPagenum Then

       MsgBox ("Last Page!") '最后一页的最后一条,这里你可以添加自己的代码

    End If

     

    If Not Me.pageNumber = totalPagenum Then

        PageBreak1.Enabled = True '一页10行打印完毕,换页

    End If

    End If

    End Sub

     

     

    估计没有方便的方法可以得到报表的总页数,因为你的程序可以控制页数,比如,你可以在程序中早点把关联的记录集movelast,这样就可以早点结束报表,本来要打印20张的可以控制在打印10张,编译器一般没有这么大的能力可以计算出这个时候报表的总页数!!!

     

    所以,最好的方法还是自己用程序来算出报表的总页数!你可以控制一张纸打印的记录数,同时算出总的记录数,很容易就可以得到你要的总页数了!!!

     

    很遗憾,不能给你找到方便的方法!!!

     

    使用ActiveReport报表若干问题2

     

    1、打印预览时表格的边框是很淡的,但打印出来变成很粗了!请问这如何解决?我打的报表要求表格的边框的颜色要很淡,不要太粗!

    --------------

    如果是报表边框的话

         Me.PageBorder.LeftStyle = ddBLExtraThickSolid

         Me.PageBorder.RightStyle = ddBLExtraThickSolid

         Me.PageBorder.TopStyle = ddBLDouble

         Me.PageBorder.BottomStyle = ddBLDouble 具体粗细你看吧

     

    我设置了field的边框,

       Field1.Border.TopStyle = ddBLSolid

       Field1.Border.TopColor=颜色

       打印预览时候field的边框的颜色是很淡的,但打印出来就变成很粗了。这是什么回事?

     

    还有这样一种情况,就是设置两个相连的字段边框时,两个相交的地方也设置了两次,可能会导致你说的问题。如果是这样的话,只要注意公用边框只要设置一次,不要两个都设置。

     

    2、如何在ActiveReport 中控制纸张的规格?

    ------------------

    使用ActiveReport1.Printer.PaperSize属性来设置纸张大小(假定你的ActiveReports控件叫ActiveReport1)。要在事前设定printdevice=0,再设置papersize属性设置纸张大小。

     

    3、请问如何使用ActiveReport设计一个报表,内有每页的各项本页总计和本页累计(累计到该页止的所有记录的总计),最后一页在本页总计和本页累计再来一个各项总计?

    -----------------

    只要加一个字段,然后设置字段的SummaryFun属性为0-Sum,设置SummaryType2-PageTotal。进行各页总计只需将SummaryType设为1-GrandTotal就可以了。

         每页累计要稍微复杂一些。首先象上面一样建立一个每页总计字段fdPageTotal,再建立一个字段fdSum,不与任何字段捆绑。我们假定这两个字段都放在PageFooter中。切换到代码部分,在(General)部分定义变量:

         Dim dblSum As Double

         然后输入以下代码:

         Private Sub ActiveReport_ReportStart()

          dblSum = 0

         End Sub

       

         Private Sub PageFooter_Format()

          dblSum = dblSum + fdPageTotal

          fdSum.DataValue = dblSum

         End Sub

     

    4、我在使用ActiveReports控件使用,使用ACTIVEREPORTS1.PrintReport True打印后,在更新数据源后,再次掉用它时,发现无法更新它的数据,它打印的仍是打印第一张时的数据。

    -------------------

    ActiveReport.PrintReport True前加上一句ActiveReport.Restart 即可。例如:

          ActiveReport.Restart

          ActiveReport.PrintReport True

     

    5ACTIVEREPORT 能否向FOXPRO的报表一样,添加打印条件,比如若该字段值为0则不打印。

    -----------------

         Private Sub Detail_Format()

          If txtEmployeeSales.DataValue = 0 Then

          lblOutstanding.Visible = False

          End If

         End Sub

     

    6、我想用VB6.0的报表设计器设计发票这样的表格。表格里的数据是根据动态的查询语句从数据表中检索出来。一张发票可能对应多种货物。

    ------------------

        ActiveReport可以很容易地做出发票样式的报表,连发票中的空白项都能做出来。

         首先在ReportStart事件中设置数据源,建立含有发票数据的单一记录集,发票上的每种商品(明细)均为一条记录,各种抬头信息(如发票号,单位,税号等)等应当包含在每条记录中(这种重复信息在报表中便于分组);同时使用set me.printer.papersize设置好纸张大小。

         接下来,在设计器中建立一个分组(Group1),将分组字段设为发票号,并在分组中放置抬头字段,画好抬头部分的表格线,然后在该分组中再插入一个分组(Group2),在其中画出固定空栏(用于填写商品明细,具体行数自已定)的表格线。然后在明细段(detail)中放置商品明细字段,不画表格线。

         接下来关键的一步是:设置Group2UnderlayNext属性为True,它表示下一报表段(detail)将从本报表段(Group2)的起始位置开始输出;同时设置detailbackstyle属性为Transparent(透明)。

         运行报表,可能发现商品明细显示的位置不太准确,这时可以通过调节各报表段的尾部大小来调整,而且还可以调节明细显示的最大行数,超过可以自动生成第二张发票,当然必须设置group1group2repeat属性为OnPage(即每页都显示)。

     

    7、为什么会每打印一页内容总会间隔一页空白的纸张,例如,我要打印两页内容,打印机会出来四张纸,其中两张是空白的。

    ------------------------

    其实只要适当调整 PageLeftMarginPageRightMargin两个属性的值即可。有时会看见打印预览中会出现一根红线,这就是ActiveReport告诉你要分成两张纸了。但是,问题就出在这里,有时这根红线在纸的边缘,你根本看不见,所以就导致了你以为不要分页,但却分了页的结果。

     

    8、如何获得打印机当前选定的纸张型号及尺寸

    -----------------------

    可以使用Printer对象的PaperSize获得纸张型号(在帮助中有更详细的说明),使用Printer对象的Height Width属性获得纸张大小。

         Printer对象表示当前系统默认打印机,如果你想知道它在Printers中的序号,可以使用下面的代码:

          For i = 0 To Printers.Count - 1

          If Printers(i).DeviceName = Printer.DeviceName Then

          Print i

          End If

          Next

    9 ActiveReports能横向预览吗?

    -------------------------

    可以修改Orientation属性。

     

    10、如何检测系统中是否安装了打印机

    ----------------------

    VB有个Printers对象,要知道是否安装了打印机,只需要看Printers.Count的值就可以了,它表示系统安装的打印机的数目。还有个打印驱动名称的属性Printer.DeviceName="" 表示没有安装默认打印机。

     

    11、怎樣設置上,,,右邊距及橫向打印

    -----------------

         Dim Act As ActiveReport   '设置纸的类型及尺寸

         Act.Printer.PaperSize = 255

         Act.Printer.PaperHeight = 21 / 2.54 * 1440 '21cm

         Act.Printer.PaperWidth = 29 / 2.54 * 1440 '29cm

         Act.PageSettings.LeftMargin = 1 / 2.54 * 1440 '1cm ' 设置边宽             Act.PageSettings.RightMargin = 1 / 2.54 * 1440 '1cm

         Act.PageSettings.TopMargin = 1 / 2.54 * 1440 '1cm

         Act.PageSettings.BottomMargin = 1 / 2.54 * 1440 '1cm

         ActiveReport有如下4个属性是控制页边距的:

         PageBottomMargin

         PageTopMargin

         PageLeftMargin

         PageRightMargin

    也可以通过ActiveReport的菜单来更改:File->Page Setup...

     

    12、如何在activereports中实现手动分页?

    ------------------

    两种比较简单的方法:

    1,首先在可能需要分页的地方插入分页符,然后在代码中控制它的Enabled属性,:

     

    Private Sub PageHeader_Format()

    Static x As Long

         x = x + 1

             'Disables the page break for all but the first page

         If x > 1 Then

             Me.PageBreak1.Enabled = False

         End If

    End Sub

     

    当然你可以插入很多分页符分别控制.

     

    2,用运行时添加控件的方式在需要时添加分页控件.运行时添加控件的方法请参见AR自带的VB sample中的Print MS FlexGrid.

     

    13、如何在报表分组后,分页显示分组后的内容,即每页只单独显示一种内容!

    ---------------

    1、設置froupheadnew page屬性after

    2、把Detail往下多拉一点,够长的时候就自动分页了

     

    14、在程序中设定字段

    -----------------

    Dim RptRs As ADODB.Recordset

    Dim ret As Integer

    Dim report1 As RptTop8

    Set report1 = New RptTop8

    report1.DataControl1.Connection = ADODBConnection

    Set report1.DataControl1.Recordset = frmscore.GridEX1.ADORecordset

    Set RptRs = frmscore.GridEX1.ADORecordset

    report1.FldName.DataField = RptRs(0)

    RptRs.MoveFirst

    report1.DataControl1.Recordset.MoveFirst

    report1.Restart

    report1.ItemTitle.Text = "ddddd"

    ret = MsgBox("打印?", vbYesNo + vbQuestion, "提示")

    If ret = vbYes Then

         report1.Show

    End If

    其中,FldName是细节带区的一个Field

    rptrsRecordset,确认打开有记录。报表也可以显示出,如果有3条纪录,显示三行,但显示的不是字段的值,而是FldNameText属性值。

     

    report1.FldName.DataField = RptRs.fields(0).name 改成這句试试

     

    15ActiveRepor做报表,有一些列是和上一条记录重复的,请问能让这些重复的列不显示吗?

    ---------------------

    需在隐藏原来的数据字段,然后在上面在一个Label1来显示.

    在上面定义一个局部变量:

    private strNN as string

     

     

    在报表加在时

    strNN =""

    Label1.Caption=""

     

    Detail_Format事件中

    if strNN="" then

         strNN=trim(数据字段.text)

         Label1.Caption=strNN

    else

         if strNN=trim(数据字段.text) then

            Label1.Caption=""

         else

             strNN=trim(数据字段.text)

             Label1.Caption=strNN

         end if

    end if

    或者:你可以用代码实现,FetchData写代码,用一个数组变量存储上一个记录,如果发现当前记录有一个列与上个记录相同,则把该列赋值为空

     

     

    本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/DJBOY850317/archive/2008/03/31/2234270.aspx

    展开全文
  • 8.3.9 把字符串填充到字符串中 226 8.3.10 在小写和大写之间进行转化 227 8.3.11 移除前导空格和尾部空格 228 8.3.12 重复个表达式N次 228 8.3.13 重复个空格N次 229 8.3.14 逆序输出表达式 229 ...
  • 而将那些被认为“过时”或功能缺失的浏览器下的测试工作安排在开发周期的最后阶段 渐进增强 开始只构建站点的最少特性,然后不断针对各浏览器追加功能。先让网站能够正常工作于尽可能旧的浏览器上,然后不断为它...
  • 127.如何在DataGrid控件中删除最后一页的最后一记录 128.如何把数据库中的数据以Excel文件的格式在显示浏览器中 129.如何给DataGrid控件添加个标题并实现分类显示 130.如何实现DataGrid控件中DropDownList控件的...

空空如也

空空如也

1 2 3 4 5 ... 9
收藏数 161
精华内容 64
关键字:

如何填充到有数据的最后一行