• Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

AltME groups: search

Help · search scripts · search articles · search mailing list

results summary

worldhits
r4wp443
r3wp4402
total:4845

results window for this page: [start: 3201 end: 3300]

world-name: r3wp

Group: Core ... Discuss core issues [web-public]
Steeve:
18-Dec-2008
i think that in the past i saw the  source of the file-handler even 
if i can't find it anymore in my sources.

i have the sources of the handlers of other shemes in some proto 
scripts delivred with the commercial version of view.
But nothing else... i loose my memory...
Steeve:
18-Dec-2008
you need to use a big file as data
[unknown: 5]:
18-Dec-2008
let me put it another way Steeve, I will not be reading more than 
16 bytes per request (because I don't need any more than that) and 
it isn't a 16  bytes segment that is next to another 16 byte segment 
really I'm moving back and forth all over the file to get 16 byte 
segments each time.
Sunanda:
7-Jan-2009
But, just in case of duplicates, you need to write that to a file.

If the value already exists on that file, try again. Repeat until 
a unique number emerges.
BenBran:
16-Jan-2009
The past few weeks I've had more time to devote to Rebol.  I'm working 
on some typical examples and routines to get aquainted with it.  
So I appreciate all the help I'm getting from this forum.  Currently 
just playing with the delete-dir function.

I'm not able to get this to work....is this even possible.....

in the environment: myPath = C:\myTemp

	myPath: probe get-env "myTemp"

 ....(tried several iterations of code here to fix the path perfectly)
	delete-dir myTemp

also tried reduce 

the path has been refomed to //%/myTemp/, %C/myTemp/,  and several 
others forms.

it says that it expects a dir argument of type: file url
Pekr:
16-Jan-2009
also, you can use handy functions as to-rebol-file, to-local-file, 
to convert to/from local/rebol file/path formats ...
Pekr:
16-Jan-2009
>> to-rebol-file "C:\mypath"
== %/C/mypath
>> to-rebol-file C:\mypath

** Script Error: to-rebol-file expected path argument of type: file 
string
** Near: to-rebol-file C:\mypath
BenBran:
16-Jan-2009
I'll look some more later, but what seemed to fix it was the built 
in function 'to-rebol file'  :-)
Will:
25-Jan-2009
sorry I may have been more clear, the code is in uni-engine.r, this 
line:

call/show join form to-local-file system/options/boot [" -qs " cmd]
not in a RSP, and not sure at all the problem is with call... 8/
Maarten:
1-Feb-2009
Are you in Qtask REBOL SIG? Then I'll post a link to the file there
BrianH:
2-Feb-2009
Doc: "The only support I expect is R2 C-level bugs fixing."


Don't forget mezzanine bug fixing and the backports, which are community 
support. No new C-level features are likely, except for backported 
tweaks to the natives. New mezzanine-level features we can add ourselves, 
but remember that R2 is in compatibility mode right now. We shouldn't 
break the existing R2-compatible code if we can avoid it, since that 
compaatibility is the main advantage of supporting R2.


Future releases of R2 will have even more backported functions from 
R3, but these will be in a separate file of the source. It is likely 
that this separate file will need to be loaded if you want to use 
its functions, so there will be no new predefined words by default. 
You can load the file if you want to make your code more R3 compatible. 
This is likely the best way to ensure compatibility.
Janko:
8-Feb-2009
With all the retrospection going on, can I somehow get whole current 
namespace/memory image/state of rebol interpreter as a block and 
save it to a file for example?
Janko:
8-Feb-2009
ok, so I get list of words .. but can I export (write to file) sources/definitions 
of functions ?  >> source somefunc<< prints it but I would need to 
get a string
Tomc:
13-Feb-2009
brian yes that is what bugs me

if it was in a file  or an un loaded string I could insert  brackets 
to my hearts content . but not once i start useing it.
[unknown: 5]:
21-Feb-2009
It just seems inconsistent to me but I suppose it is needed to be 
this way to deal with the manner in which REBOL operates.  For example, 
consider its inconsistency in this regard:

>> string? "this"
== true
>> file? %file
== true
>> lit-word? 'this
== false
BrianH:
23-Feb-2009
Everything is attributed in the file. The main difference in licensing 
is that you would not be restricted like REBOL mezzanine source. 
One of those restrictions is that it is not allowed to use mezzanine 
source (either in the SDK or the source function) on REBOL clones 
like Oscar.
BrianH:
23-Feb-2009
Henrik, the R3 changes to the graphics and port models are not supported. 
The post-2.7.5 R2 VID changes are not R3 compatible (nor is any R2 
VID or RebGUI code) so they should go in another file, which I think 
should still be external if it would break existing R2 code.
Graham:
26-Feb-2009
You can always take a windows path, or UNC path and convert it

to-rebol-file \\bens2000as\c$\myTestdir
Graham:
26-Feb-2009
needs quotes around the windows path

]
>> to-rebol-file "\\bens2000as\c$\myTestdir"
== %/bens2000as/c$/myTestdir
BenBran:
26-Feb-2009
that worked!  thank you folks!!

to-rebol-file has been the answer before, I really need to remember 
that one. :-)
Chris:
7-Mar-2009
What is the etiquette for using metadata in a REBOL header?  Here's 
some scenarios:

A) From Viewtop:

	REBOL [
		type: 'index
	]

	title "My RebPage"


This is clearly ok, and a good way for an application to determine 
the disposition of data - in this case a Dialect.

B) I use this for QM modules:

	REBOL [
		type: 'module
		exports: [do-something]
	]

	var: 1
	do-something: func [val][val * var]


This adds a little more, as the 'exports block is more than just 
an 'id, it's contents are bound to the application.  Moreover, 'exports 
is not in the standard header.


C) A hypothetical dialect definition with some 'do code (I'll use 
VID to demonstrate):

	REBOL [
		title: "My Application Window"
		type: 'vid
		locals: [mybtn myarea]
		on-close: [save-all quit]
		options: [resize min-size (config/min)]
	]

	h1 "My Small App"
	myarea: area "Some Text"
	mybtn: btn "Submit" [save-all]



Now obviously all these cases can be fleshed out with R2, but is 
this abuse of the header?  There's still no security issue 'loading 
the file, indeed it takes a special handler to actually execute the 
code.  But again, is this taking the header where it shouldn't go? 
 What of R3?
Chris:
7-Mar-2009
Callbacks.  One instance I'm thinking of is to have a file containing 
only a parse dialect -- parse "text" load %rule.r -- and having some 
callbacks specific to the rule - eg. on-success and on-fail.  Feels 
like it could be a natural way to do it.
Chris:
7-Mar-2009
It aids one type of file maintenance - a folder full of parse rules...
Maxim:
12-Mar-2009
WindowsXP-KB942763-x86-ENU.exe  is the file that fixes tz on xp.
Maxim:
12-Mar-2009
if you search the net, you will quickly find the direct download 
link for that file from MS servers, without the need for WGA   :-)
eFishAnt:
30-Mar-2009
so, if I am on a M$ network, what is the best way to reach a \\blah\blah\blah\file.blah?
[unknown: 5]:
30-Mar-2009
I think it is:
read %/blah/blah/blah/file.blah
[unknown: 5]:
31-Mar-2009
Yes to save resources.  For example, what if I just read an MP3 file 
into a word? I want to free that word so that it no longer is allocated 
to that data.
[unknown: 5]:
31-Mar-2009
f: has [file][file: read %somefile also copy/part file 30 file: none]
Geomol:
31-Mar-2009
Then do:


f: has [file] [file: copy/part read %somefile 30 comment "do something 
with the file" return file]
Izkata:
31-Mar-2009
newPread: func [URL] [read/binary URL]  ;  I only want the large 
timeout in this function, not in other 'read calls


f: has [file] [file: copy/part read %somefile 30 comment "do something 
with the file" return file] ; I'm also going for readability, otherwise 
I would have done something like this with the original code
Anton:
31-Mar-2009
load-mp3-data: func [file /local contents][
	contents: read/binary file
	; <- modify contents here
	also contents contents: none
]

data: load-mp3-data %song.mp3
eFishAnt:
16-Apr-2009
Hmmn, I am running a script, but not as CGI, on a remote 'nix box. 
 This script uses other scripts by 'do


The main script runs, but at the first use of parse rules from a 
do script, it fails.  Is there a magic setting of usage flags or 
file permissions to accomplish this?

$rebol -s main.r

runs main, but doesn't do the do %blah.r script from inside
eFishAnt:
16-Apr-2009
file permissions are set to 755 (rwxr-xr-x) and I am running them 
at superuser level
eFishAnt:
16-Apr-2009
$ ln hex-dump.r

ln: creating hard link `./hex-dump.r' to `hex-dump.r': File exists
Geomol:
16-Apr-2009
And you can't see that file with list-dir inside REBOL?
eFishAnt:
16-Apr-2009
>list-dir ;after the file crashes...aha, I could see the files before 
doing the main.r.
main.r  main.r  


My scripts work fine on Windoze.  I am now thinking from this...I 
do a change-directory to get the directory of where I am running 
and I write my data into the current directory.  In Windoze, the 
change-directory seemed needed to pick up the directory I am in. 
 I'll bet 'nix doesn't like that, and perhaps needs the full pathnamem 
from the root, or soemthing like that.
Graham:
21-Apr-2009
I write a batch script to do this .. ie. write the new file name 
as temp.exe or something.
Dockimbel:
1-May-2009
The only thing that blocks numbers to become word! values is the 
lexical scanner. When you type anything in console (or DO a file 
script), your input is first a string! value that gets LOADed (that's 
where the lexical scanner raises errors). TO-WORD allows to bypass 
the LOAD phase and force the conversion of any symbol to word! value.
Group: View ... discuss view related issues [web-public]
Anton:
20-Sep-2006
So remote file looks like this:
-------------------------------
[
	text "Fld:"
	text "[fldName]"
	etc.
]
---------------------------
Local script should maybe look like this:
---------------------------
rebol []
if all [ value? 'info-win   viewed? info-win ][
	unview/only info-win
]
info-resp: read remote-script.r
replace info-resp "[fldName]" "value from table"  ; etc....
spec: load info-resp
info-win: layout spec
view/new info-win 
do-events
Anton:
21-Sep-2006
original: %image.png  ; INPUT FILE
resized: %resized.png ; OUTPUT FILE
new-size: 300x300


save/png resized draw make image! new-size compose [image (load original) 
0x0 (new-size - 1x1)]

; examine results
view layout [image (load original) image (load resized)]
Gabriele:
21-Sep-2006
Henrik: PDF Maker 1 has been used extensively with images. And they'll 
be back in v2 very soon. The only drawback is lack of any compression, 
so the resulting PDF file is rather big (if the source image is big).
Louis:
16-Oct-2006
What I want is:


1. The exchange rate to be saved in a file, so that it will always 
be loaded upon start the script.

2. The exchange rate to remain in the field through each loop of 
view.

3. And, of course, I want to be able to change the exchange rate 
if needed.


Seems like it should be a common easy thing to do, but it eludes 
me.
MikeL:
16-Oct-2006
Louis, I haven't been following this problem but if you want to just 
load a rate from a text file you could do something like this which 
handles loading before showing the face and allows saving an updated 
rate 

REBOL []

these-styles: stylize [
	lab: label  60x20 right bold middle font-size 11
    fld: field  60x20 font-size 11 middle edge [size: 1x1]
]

    rate-file: %/c/rate-file.txt
    if not exists? rate-file [write rate-file 1.000]    
    rate: load rate-file

view layout [
    across
    styles these-styles
    lab "Rate"    rate-field: fld bold (form rate) return
    btn "Save" #"^s" [save rate-file form rate-field/text]
]
MikeL:
16-Oct-2006
If you want to keep the update function out of this script, it is 
simple to just use the REBOL editor to update the rate via 

btn "Editor" #"^e" [editor rate-file]

But make the rate field read only.
Anton:
24-Oct-2006
In my own little text file that I collected over the years. :)
Brock:
31-Oct-2006
REBOL [
	Title: "REBOL Logo Maker"
	Purpose: "Generate a Hilight image"
	Author: ["Carl Sassenrath" "Gabriele Santilli"]
	Version: 1.0.0

 Rights: "REBOL logo is a registered trademark of REBOL Technologies, 
 USA."
]

debug?: false
hilight-colour: 255.0.0 ;0.112.99	;request-color
character: uppercase request-text
font-type: "font-sans-serif"
xthin-chars: charset "I!J"
thin-chars: charset "1234567890ABDEFPRSZ"
normal-chars: charset"CGHKLNOTUVXY"
wide-chars: charset "WMQ"
xwide-chars: charset ""
special-chars: charset "*"

if font-type = "font-serif"[
;get-char: func [character][

 if find character xthin-chars 	[if debug? [print "xthin"] char-offset: 
 8x2 char-size: 14]

 if find character thin-chars 	[if debug? [print "thin"] char-offset: 
 7x2 char-size: 14]

 if find character normal-chars	[if debug? [print "normal"] char-offset: 
 6x2 char-size: 14]

 if find character wide-chars	[if debug? [print "wide"] char-offset: 
 5x2 char-size: 14]

 if find character xwide-chars	[if debug? [print "xwide"] char-offset: 
 4x2 char-size: 14]

 if find character special-chars	[if debug? [print "special"] char-offset: 
 5x-2 char-size: 28]
;]
]
if font-type = "font-sans-serif"[
;get-char: func [character][

 if find character xthin-chars 	[if debug? [print "xthin"] char-offset: 
 9x2 char-size: 14]

 if find character thin-chars 	[if debug? [print "thin"] char-offset: 
 7x2 char-size: 14]

 if find character normal-chars	[if debug? [print "normal"] char-offset: 
 6x2 char-size: 14]

 if find character wide-chars	[if debug? [print "wide"] char-offset: 
 5x2 char-size: 14]

 if find character xwide-chars	[if debug? [print "xwide"] char-offset: 
 4x2 char-size: 14]

 if find character special-chars	[if debug? [print "special"] char-offset: 
 4x-2 char-size: 26]
;]
]



font-style: make face/font [style: 'bold  name: font-type  size: 
char-size]

hilights: [
	transform 0 1 1 0x0 0x0
	fill-pen snow pen snow
	circle 10x10 9
	fill-pen black pen black
	circle 13x13 9
	fill-pen hilight-colour	;0.112.99
	pen hilight-colour	;serve dark green - 0.112.99
	circle 11x11 9
	fill-pen white pen white
	font font-style
	text 1 char-offset character 
		;]
	;]
]



insert-event-func func [face evt][
	if evt/type = 'resize [
		bx/size: out/size: evt/offset
		bx/size/y: out/size/y: evt/offset/x / 23 * 23
		n: to-decimal bx/size/x / 23
		;t-x: to-decimal bx/size/x / 23 + 5
		;t-y: to-decimal bx/size/y / 23 - 2
;		probe highlights ;logo-shape
;		halt
		hilights/3: n
		hilights/4: n
		loc: to-pair :t-x :t-y
		show out
	]
	evt
]


view/options center-face out: layout [
	origin 0

 bx: box 23x23 green effect [draw hilights effect [key: green]][  
  ;logo-shape][	; 

  file: request-file/only/save/file join %hilight- [character ".png"]
		if not file [exit]
		if not find file ".png" [append file ".png"]
		save/png file to-image bx
	]
][resize]
Brock:
31-Oct-2006
view layout [
	bx: box "test" [
			file: request-file/only/save/file %sample.png
			if not file [exit]
			if not find file ".png" [append file ".png"]
			save/png file to-image bx
	]

]
Brock:
1-Nov-2006
hmm, still unable to save out the transparent png file to maintain 
the transparent part in the png file.  I was able to produce an image 
with two coloured boxes and then one box was then made transparent, 
however when saving that image out, the background appears the default 
grey colour that is used when no colour is specified.
Rebolek:
1-Nov-2006
You need to manipulate tRNS chunk in PNG file. REBOL saves PNG files 
in color type 2 (true color) I think, so you must set tRNS chunk 
to RGB (2 bytes per color) value of color you want transparent. See 
http://www.faqs.org/rfcs/rfc2083.html
Brock:
2-Nov-2006
hilight-colour: 255.0.0 ;0.112.99	;request-color


font-style: make face/font [style: 'bold  name: "font-sans-serif" 
 size: 26]

hilights: [
	transform 0 1 1 0x0 0x0
	fill-pen snow pen snow	;white circle
	circle 10x10 9
	fill-pen black pen black	;black circle
	circle 13x13 9
	fill-pen hilight-colour	;0.112.99
	pen hilight-colour	;serve dark green - 0.112.99
	circle 11x11 9
	fill-pen snow pen snow
	font font-style
	text 1 6x0 "*"
]

view center-face out: layout [
	origin 0
	bx: box 23x23 50.50.50 effect [draw hilights effect []][ 
		file: request-file/only/save/file %hilight.png
		if not file [exit]
		if not find file ".png" [append file ".png"]
		save/png file to-image bx
		img: load file
		colour: pick img 1x1

  repeat i length? img [if colour = pick img i [poke img i 0.0.0.255]]
		save/png file img
	]
]
Brock:
2-Nov-2006
hilight-colour: 255.0.0 ;0.112.99	;request-color


font-style: make face/font [style: 'bold  name: "font-sans-serif" 
 size: 26]

img: make image! 23x23
img/alpha: 255	;make bg transparent


draw img [
	transform 0 1 1 0x0 0x0
	fill-pen snow pen snow	;white circle
	circle 10x10 9
	fill-pen black pen black	;black circle
	circle 13x13 9
	fill-pen hilight-colour	;0.112.99
	pen hilight-colour	;serve dark green - 0.112.99
	circle 11x11 9
	fill-pen snow pen snow
	font font-style
	text 1 6x0 "*"
]

file: request-file/only/save/file %hilight.png
if not file [exit]
if not find file ".png" [append file ".png"]
save/png file img
Maxim:
8-Nov-2006
I only wish, and I'm surprised you are not appreciative of, the fact 
of allowing REBOL view give me more of what its already doing.  it 
wont add anything substantial to interpreter in file size, wont remove 
any features, won't even affect current VID objects, as they already 
handle the most basic event types.  But at least, I will be able 
to cater more precisely to client's needs without it removing the 
core reason I would propose REBOL for a client in the first place... 
cause I can just do it.


an example, in many apps, having the middle mouse button would have 
been very usefull (especially in my field, where all computers have 
3 buttons), and sorry, but having to try and hack such a thing in? 
 I don't even know where to start, how do I then reverse hack such 
a thing so that it gets into view cleanly?  how will a word be assigned 
in the event/type correctly?  and then linux... my god, do I have 
to understand the whole X,  just to figure out how to add a middle 
 mouse buttons?
Pekr:
10-Nov-2006
Hi, I just received reply from RT towards my following request:

----------

I have also suggestion towards View Desktop. IIRC there is also RAMBO 
entry about it - please, lower the timeout, because Desktop tries 
to connect to Internet by default, and if someone is behind the proxy, 
it is frustrating experience - you can't close blocked Rebol even 
by window close button. As for me, I would prefer not connecting 
by default, and changing "Local" to "Connect", "Disconnect" duo ...
--------------


On Viewtop, I agree.  Let's develop a good method for that, and put 
it in the
next release.


There are a few choices.  1) Shorter timeout, 2) popup request to 
connect,

3) connect on demand (after clicking on an icon that has no file).

Perhaps you know some users who have a suggestion?

-REBOL Support
Anton:
14-Nov-2006
I just tried it. The public dir is always created (empty) despite 
patching path-thru in the user.r file.
Anton:
24-Nov-2006
I am using another way for a file search application. Ask me if the 
above is not sufficient.
Pekr:
27-Nov-2006
the nice thing, with phones and JAVA is, that "all" you need is to 
download .jar file ....
Jerry:
21-Dec-2006
To condense the font data, there is a better way. Almost every Chinese 
character consists of many parts. if reusing the parts, a Chinese 
TTF file can be condensed from 4 MB to 100 KB. However, doing that 
would need lots of analysis of Chinese characters. That's would not 
be easy. Also needed is a part-combining engine.
Jerry:
21-Dec-2006
Graham. That's not how it is done. That's why the Chinese TTF file 
is so big, that's why in two chracters with the same radical, their 
radical part are not exactually the same pixel-by-pixel. These is 
a company doing so though. http://www.hifont.com/.
Cyphre:
22-Dec-2006
how is the tiger demo done?
 Yes, it's just converted SVG file to DRAW dialect, nothing more.
Joe:
15-Jan-2007
resize-image: func [
	dest [file!]
	size [pair!]
	file [file!]
	/local im
][	
	im:		load-image file
	save/png 	dest to-image layout [origin 0x0 image (im) (size)]
	im:		none
]
Maxim:
18-Jan-2007
Oldes.. thats not a very good editor then ;-)

Using Ultra edit I've loaded a 400MB one line file.  :-)
Brock:
6-Mar-2007
The current application (not my own) uses an HTML page to list all 
this information, but new versions of MS apps all open the .doc files 
in the browser window instead of launching Word.  The problem here 
is the .doc files contain macros that run when executed, but this 
does not happen through the browser.  The Word templates also get 
auto-updated if new versions are available, but this is handled by 
a secondary .exe file.
Anton:
12-May-2007
Search for Gregg's win-shell.r file.
Gabriele:
8-Jul-2007
you have to do view/new, then inside copy-dir you need to call wait 
0 every now and then (eg. every file you copy) if you need your buttons 
to work.
Ingo:
23-Jul-2007
Hi ICarii ... what do you mean? Having 2 rebol instances, one that 
listens on tcp and creates a file, which is then read by the other, 
and used for display?
Gregg:
16-Sep-2007
If you have an animated GIF, try just using the standard ANIM style 
in VID; I thought it played them. Creating the animated GIF is a 
different story, but if you have a bunch of images, or a motion JPG 
file/stream, it's easy to parse and play.
Chris:
16-Sep-2007
My animation style was for animated-Gif *level* animations.  You 
still need all frames stacked up on each other in a single image 
file.  Unfortunately not the way anim-gif creation programs work...
james_nak:
6-Mar-2008
Is there a way to catch the "X" (close) button on a window. I'd like 
to offer a "Save File"
Graham:
30-Mar-2008
For peer to peer file transfer.
james_nak:
10-Apr-2008
It's not my imagination that request-file/title {something} {button} 
- the button text never shows up (at least not in windows). It complains 
if it is not there but I don't think I've ever gotten it to work.
Gabriele:
11-Apr-2008
Paul, indeed read-io and write-io are no more necessary. however, 
if reusing the same memory buffer is the intent, then they're the 
only way to do that. it may be better to just copy a small part of 
the file at a time and let the GC do its job instead.
Anton:
19-Apr-2008
Almost all my function libraries are in anonymous contexts.

Basically, DOing the library file (eg. do %auto-crop-bitmap-text.r) 
returns the context, and you just GET out the words you are interested 
in.
This job is eased a bit by my INCLUDE function.
Anton:
21-Apr-2008
The above update also cleans up loose words in the auto-crop-bitmap-text.r 
file.
Anton:
21-Apr-2008
updated 
	auto-crop-bitmap-text.r
removed old code and comments (file is 3.5k smaller)
Jaymer:
19-Jun-2008
hi.  I run View in Win XP.  My script is very simple... 

blk: load %/c/input.txt foreach url blk [if not find attempt [read 
append url "cvap"] "Nothing found"  [browse url]]
and a line in the input file is something like this:
http://website1.com/search?query=
http://website2.com/search?query=


So, I want to search for "cvap", and it appends that to the URL and 
I search the result string and if it DOES NOT say "Nothing Found", 
then I open that URL so I can visually examine it.


It works 95% of the time, but sometimes I get the following error:

** Script Error: find expected series argument of type: series port 
bitset
** Near: if not find attempt [read append url "cvap"]

Any ideas how I can fix this?
thx
kcollins:
23-Aug-2008
When you double click the file icon on the Desktop, Linux knows exactly 
what file you want to run. When you try to run something from the 
command line, Linux first looks to see if it is a command built in 
to the shell (bash), and then looks for it in each directory in your 
PATH environment variable. Typically, the current directory - "." 
- is not included in the PATH when you install Linux.
kcollins:
23-Aug-2008
I believe the Linux version of REBOL uses a libc6 shared library 
by accessing a specific file at a specific location. By putting a 
64 bit version of that file there, they managed to get it to work. 
I may not have the details quite right, but it was something like 
that.
Anton:
27-Sep-2008
site: http://anton.wildit.net.au/rebol/

foreach [file words] select load-thru site/doc/text-facet-rendering.r 
[include][
	print file load-thru/update (do file)
]
Anton:
3-Oct-2008
Minor update to ARROW360 style:

- Now it's smoother (more is calculated with decimal! instead of 
pair!)
(also updated the demo file).
Anton:
13-Oct-2008
and the test file to do is test-caret-to-offset-patch.r
Henrik:
14-Oct-2008
Anton, by far the slowest component is Ghostscript. Creating the 
postscript file is about as fast as an ordinary layout.
Graham:
14-Oct-2008
one postscript file but multiple pages
Graham:
14-Oct-2008
inefficient to produce a single postscript file for each layout
Anton:
14-Oct-2008
Can you put bitmaps in a postscript file ?
Nicolas:
21-Nov-2008
REBOL []

index: func [dir list /local files] [
	files: sort load dir
	foreach file files [append list join dir file]

 foreach file files [attempt [if find file "/" [index dir/:file list]]]
] index %/c/ files: []

l: layout [
	f: field 600 [call t/picked]
	t: text-list 600x400 data copy files] 

search: func [f-string] [
	t/data: copy files  

 foreach s parse f-string none [remove-each f t/data [not find f s]]
	show t]


append blk: select select second get in f/feel 'engage [switch act][key] 
bind [search f/text] blk/2

focus f view l



if I type something into the field, then I click the slider, it calls 
t/picked. Why? i can't figure it out.
Nicolas:
21-Nov-2008
index: func [dir list /local files] [
	files: sort load dir
	foreach file files [append list join dir file]

 foreach file files [attempt [if find file "/" [index dir/:file list]]]
] index %/c/ files: []

l: layout [
	f: field 600 [call t/picked]
	t: text-list 600x400 data copy files] 

search: func [f-string] [
	t/data: copy files  

 foreach s parse f-string none [remove-each f t/data [not find f s]]
	append clear t/picked t/data/1
	show t]


append blk: select select second get in f/feel 'engage [switch act][key] 
bind [search f/text] blk/2

append clear t/picked t/data/1
focus f view l



if I type something into the field, then I click the slider, it calls 
t/picked.
Anton:
21-Dec-2008
Gregg, I have it saved in a file, and this group is web-public, at 
least.
Gregg:
3-Jan-2009
Depends on the interface to the DB. I haven't use sqlite. If it's 
just in a file, you'll need to read it first (unless the DB layer 
does that, kind of like VID does). Of course, storing files in the 
files system and just putting the name in the DB is another option. 
If you have a lot of big images, the DB can grow very quickly, and 
many DBs aren't particularly designed for BLOB storage.
Nicolas:
13-Jan-2009
does update write the whole file or does it just alter the file?
Nicolas:
13-Jan-2009
I'm trying to make an interface that updates a file on every keystroke
amacleod:
11-Mar-2009
I comneted out all references to "MagickImportImagePixels" and it 
starts without error...

but anytime I try to save it says I do not have the Encoder for that 
file format...:


** User Error: 0 = NoEncodeDelegateForThisImageFormat `C:\Documents 
and Settings\Alan\Desktop\ImageMagick-6.3.2-Q16\test.jpg'
** Near: make error! errmsg
Pekr:
10-Apr-2009
added fps counter to the file. No difference for rotated display 
on my notebook, the same report received from Cyphre. So - it has 
to be some bad driver on the testing PC. Case closed (hopefully), 
thanks for assistance ...
Anton:
14-May-2009
Can I see a demo of your technique, Steeve?

I wanted transparent events along with transparent regions of a face 
(eg. a face with rounded corners, the events should pass through 
the corner regions, but the rest should land on the face).
It just couldn't be done properly - see my file
http://anton.wildit.net.au/rebol/gui/transparent-events.r
Maxim:
16-May-2009
anyone interested in an SCP based file copy software? this uses SSH 
port, so no need for ftp on the server  :-)  I've already got file 
browsing working.
Maxim:
16-May-2009
for now... I need something that just "works".  speed is secondary... 
the actual file copy is quick, its the login at each command which 
takes about a second ...
Maxim:
16-May-2009
basically at each operation, like clicking on a folder to view its 
content, I use call with an ssh related command.

I retrieve the output, report any errors or parse the return data 
and refresh the ui.


currently, it starts with root dir list, and you click on folders 
to go into them, or click on a checkbox to select it for other file 
manipulations.


each time I use call, the command-line must do a log-ing, since a 
system call is an atomic operation.
Maxim:
16-May-2009
the file copying, is recursive within the command-line , so only 
one login is done and the recursive folder content is xfered at max 
bandwith.
Maxim:
10-Jul-2009
it includes many of the basic VID styles as default...   near the 
end of the file, you will will see a big style block.  which basically 
adds the glayout framework on top of the previous master VID stylesheet.
Anton:
27-Jul-2009
I made something quite similar recently; an expanding/collapsing 
dir-tree viewer, like the dir panel of a file browser. Each directory/file 
has to be an object, because I store some state along with it, like 
collapsed/expanded, and other interesting attributes can be stored 
in there in future, when I get around to collecting the info. The 
purpose of the app is basically to create an image of a directory 
structure, which can be saved to disk, viewed magnified etc. to give 
an overview of directory structure.
3201 / 484512345...3132[33] 3435...4546474849