Ir al contenido



Foto

copiar excel clipboard a ClientDataset

excel clipboard dataset

  • Por favor identifícate para responder
2 respuestas en este tema

#1 look

look

    Advanced Member

  • Miembros
  • PipPipPip
  • 408 mensajes
  • LocationLa Ceiba-Atlantida-Honduras

Escrito 21 noviembre 2018 - 11:13

Hola amigos, tengo estos datos en un excel.

 

ex.png

 

lo que quiero hacer es seleccionar esos registros y pegarlos en un ClientDataset,


delphi
  1. procedure TFrmGenPre.btnPegarClick(Sender: TObject);
  2. var
  3. Str: string;
  4. begin
  5.  
  6. if Clipboard.HasFormat(CF_TEXT) then
  7. begin
  8.  
  9. Str := Clipboard.AsText;
  10.  
  11. end;
  12.  
  13. end;

alguien me hecha una mano?


  • 0

#2 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.003 mensajes
  • LocationMéxico

Escrito 21 noviembre 2018 - 05:37

Así a bote pronto usaria un StringList y despues vaciarlo a un dataset..

 

Saludos :)


  • 0

#3 escafandra

escafandra

    Advanced Member

  • Moderadores
  • PipPipPip
  • 3.858 mensajes
  • LocationMadrid - España

Escrito 23 noviembre 2018 - 12:49

Te voy a dar una pista para que puedas interpretar el resultado del Texto que se copia en el ClipBoard desde Excel.

1º Se copian filas se texto.

2º Cada elemento de la fila (Campo Columna) termina con un separador tabulador: Carácter $09,

3º Cada fila termina con un CR + LF ($0D + $0A)

 

De este modo, en tu ejemplo en la primera linea tendrías:

'101380'+$09 + '1700' + $0D + $0A

 

Ahora solo tienes que recorrer el texto para encontrar tabuladores ($09) que separan los campos y encontrar los finales de línea($0D+$0A) para encontrar el fin del registro

 

Saludos.

 

  • 1





Etiquetado también con una o más de estas palabras: excel, clipboard, dataset