Here is the meat of code that I wrote to paste values into a dataset:
pasteValues := Screen default getExternalSelection runsFailing: [:chr | chr isSeparator ].
dataSetWidget := self displayedAdjusters_widget.
rows := dataSetWidget model value.
rows := rows copyFrom: (rows indexOf: self selectedRow value) to: rows size.
(pasteValues size ~= rows size or: [rows isEmpty]) ifTrue: [
(MessageBox
confirm: ('The clipboard contains ', pasteValues size printString, ' values, but there are ', rows size printString, ' rows (from the selected row) to paste into.\Continue anyway?') withCRs
initialAnswer: false) ifFalse: [^false].
].
keepGoing := true.
1 to: (pasteValues size min: rows size) do: [:i |
| row |
row := rows at: i.
keepGoing ifTrue: [
selectedRow value == row ifFalse: [
"Disabling widgets would prevent the user from getting into this situation. This is a guard just in case."
MessageBox notice: 'A different row was selected while pasting values. Paste was interrupted.'.
^false.
].
fieldEditor := dataSetWidget editor widget.
fieldEditor editText: (pasteValues at: i).
keepGoing := (fieldEditor controller accept) ~~ false.
keepGoing ifTrue: [dataSetWidget moveEditVerticallyBy: 1].
].
].
Paul Baumann
-----Original Message-----
From:
[hidden email] [mailto:
[hidden email]] On Behalf Of loveflying000
Sent: Wednesday, February 16, 2011 00:48
To:
[hidden email]
Subject: [vwnc] copy Excel's range then drag into dataset widget
Hi
My customer likes to use Excel to do almost everything -_-!
they want to copy copy Excel's range data then drag into dataset widget
directly
If column number and format is simple and same
is it posiible?
or just copy the data(ctrl + C) ,then paste in dataset widget
although I know that it's a good way to read a file to import data
It's a just a thought
could anybody give me some clues?
thanks every~~
--
View this message in context:
http://forum.world.st/copy-Excel-s-range-then-drag-into-dataset-widget-tp3308230p3308230.htmlSent from the VisualWorks mailing list archive at Nabble.com.
_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwncThis message may contain confidential information and is intended for specific recipients unless explicitly noted otherwise. If you have reason to believe you are not an intended recipient of this message, please delete it and notify the sender. This message may not represent the opinion of IntercontinentalExchange, Inc. (ICE), its subsidiaries or affiliates, and does not constitute a contract or guarantee. Unencrypted electronic mail is not secure and the recipient of this message is expected to provide safeguards from viruses and pursue alternate means of communication where privacy or a binding message is desired.
_______________________________________________
vwnc mailing list
[hidden email]
http://lists.cs.uiuc.edu/mailman/listinfo/vwnc
Locked
