Status: New Owner: ---- Labels: Version Type-Bug Priority-Medium OpSys-Any Dist-Any Arch-Any Desktop-Any GUI-Any
New issue 575 by flynetin...@gmail.com: Clipboard change https://code.google.com/p/gambas/issues/detail?id=575 1) clipboard returns a different object to that returned in previous versions 2) [System] Gambas=3.6.90 OperatingSystem=Linux Kernel=3.13.0-38-generic Architecture=x86 Distribution=Ubuntu 14.04.1 LTS Desktop=GNOME Theme=QGtk Language=es_AR.UTF-8 Memory=3781M [Libraries] Cairo=libcairo.so.2.11301.0 Curl=libcurl.so.4.3.0 DBus=libdbus-1.so.3.7.6 GStreamer=libgstreamer-0.10.so.0.30.0 GStreamer=libgstreamer-1.0.so.0.204.0 GTK+3=libgtk-3.so.0.1000.8 GTK+=libgtk-x11-2.0.so.0.2400.23 OpenGL=libGL.so.1.2.0 Poppler=libpoppler.so.13.0.0 Poppler=libpoppler.so.19.0.0 Poppler=libpoppler.so.44.0.0 Poppler=libpoppler.so.5.0.0 Qt4=libQtCore.so.4.8.6 SDL=libSDL-1.2.so.0.11.4 3) Public Sub leerdelpp(rejilla As TableView, Optional titulos As Boolean = False) 'rejilla: es el tableview donde se van a escribir los datos 'titulos: 0: sin titulo, -1 titulo contiene la 1o fila Dim lineas As String[] Dim linea_procesada As String Dim columnas As String[] Dim a As Integer Dim c As Integer Dim portapapeles As String Dim finlinea As String Dim fincolumna As String rejilla.Clear() rejilla.Rows.Count = 0 finlinea = "\n" 'retorno de carro (separa las filas) fincolumna = "\t" 'tabulador (separa las colunas) portapapeles = Clipboard.Paste() lineas = Split(portapapeles, finlinea) rejilla.Rows.Count = lineas.Max For a = 0 To lineas.Max - 1 linea_procesada = lineas[a] columnas = Split(linea_procesada, fincolumna) For c = 0 To columnas.Max If a = 0 And titulos Then rejilla.Columns[c].Title = columnas[c] Else If titulos Then rejilla[a - 1, c].Text = columnas[c] Else rejilla[a, c].Text = columnas[c] Endif Endif Next 'c Next 'a End 4) 5) The above function work properly on a tableview pasting clipboard contents obtained from a table in a spreadsheet in previous versions. Since the new version returns error. Required string obtained object in Clipboard.Paste() -- You received this message because this project is configured to send all issue notifications to this address. You may adjust your notification preferences at: https://code.google.com/hosting/settings ------------------------------------------------------------------------------ _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
