Too Many Files error with 480 GIF images linked C11

JaredDavis · November 6, 2018, 2:25am

Hi,

I converted a prj from c5.5 to c11. The prj has 480+ gif image files statically linked. Worked in c5.5. Fails with “too many files” error in c11. What is the correct method to statically link gobs of gif files in an exe?

PS. In win 10 w/o compatibility mode, it works ok. When win 10 compatibility mode is set to win xp the app locks up.

MarkGoldberg · November 6, 2018, 1:25pm

Hi Jared,

This is how I link in resources:
Using the solution explorer,
Under “Projects to include”,
I add a file named Resources.Pr
and within it I have lines like

#pragma link("SmBallWh.gif")

I have no idea if that will solve you’re “too many files” error, but it’s worth a try.

JaredDavis · November 6, 2018, 1:59pm

Thanks. Same error message “too many files.”

Looks like this error has been reported several times before.

jslarve · November 6, 2018, 3:03pm

I remember a Lee White post somewhere, where he created some dummy window() structures that contained dummy controls that use the images as icons.

Whether that willl allow you to get more stuff linked in than what you’re currently trying is another thing.

JaredDavis · November 6, 2018, 3:49pm

I searched a little bit and did not find it. Got any other keywords I can try?

As a test I moved all the gif files from main prj into a new dll prj.

compiles ok.

However it gpfs when called.

Here is the calling code. setImage is the new dll method that is failing:

        setImage(SELF.imageQR.imageEqu, '~' & tempcString) ! <== poof with access error
        ! too many files fix attempt 023 (SELF.imageQR.imageEqu) {prop:text} = '~' & tempcString

Here is the dll code

PROGRAM

MAP
setImage(short equ, string filename),name(‘setImageFromDll’)
END

CODE
RETURN

setImage procedure (short equ, string filename)
Window WINDOW(‘Please Waitimage’),AT(,145,21),FONT(‘MS Sans Serif’,8,FONT:regular),CENTER,TIMER(10),GRAY
STRING(‘Press ALT ESC to display active window’),AT(7,2,135,10),USE(?String1),hide
END
code
open(window)
ACCEPT
END
close(WINDOW)
(equ){PROP:Text} = clip(filename)
RETURN

jslarve · November 6, 2018, 4:06pm

Here’s the thread to look for:

From: “Alexander” <www.vividhelp.com/contact.htm>
Newsgroups: sv.clarion.clarion9
Subject: too many files ERROR
Date: 29 Apr 2014 00:24:57 -0400

Lee’s suggestion and an example .clw are in a reply.

MarkGoldberg · November 6, 2018, 4:12pm

Jeff, can you please show the content of the NNTP posting,
for those of us, who don’t have NNTP clients installed.

Btw, instead of attaching a .zip it’s even better to give a link to a https://gist.github.com/
or https://pastebin.com/

jslarve · November 6, 2018, 4:55pm

Seems easier for you to get an NNTP client.

MarkGoldberg · November 6, 2018, 5:02pm

Is there one for my phone?
FYI I wrote (and edited this) from my phone

JaredDavis · November 6, 2018, 5:12pm

I spun up an old copy of thunderbird and used sv.clarion.clarion9 as the group name. I can not see any messages. What should I try next?

JaredDavis · November 6, 2018, 5:17pm

I sent an email to support to ask for the content of the link. Will post back details if/when I get them.

jslarve · November 6, 2018, 5:32pm

Here’s the zip file. You’d need to assign your own images to the image controls so they get linked in.

resources.zip (2.0 KB)

jslarve · November 6, 2018, 5:37pm

Hi Mark - I don’t know. I use Windows for development. Maybe you could use a windows box for that? Seems like a good resource to have.

JaredDavis · November 6, 2018, 5:40pm

Thanks for the file. I should replace

 IMAGE,AT(5,3),USE(?IMAGE1:2)
    IMAGE,AT(6,4),USE(?IMAGE1:3)
    IMAGE,AT(7,5),USE(?IMAGE1:4)
    IMAGE,AT(8,6),USE(?IMAGE1:5)

with

 IMAGE,AT(5,3),USE('myimagefilenameapple.gif')
    IMAGE,AT(6,4),USE('myimagefilenamedog.gif')
    IMAGE,AT(7,5),USE('myimagefilenamecat.gif')
    IMAGE,AT(8,6),USE('myimagefilenamepear.gif')

?

Is that it?

jslarve · November 6, 2018, 5:44pm

Hi Jared -

IMAGE(‘YourFile.gif’),yadayadayada

jslarve · November 6, 2018, 5:45pm

Might be simplest to write a quicky app to generate the image declarations.

ASSUMING that this helps at all.

jslarve · November 6, 2018, 5:49pm

BTW, Mark - I still have messages from CI$.

Here’s the oldest message that I have in my DB from you:

     Message retrieved by ForKeeps Message Archiver

MsgNo: 202025 Reply to MsgNo: 201909 Date: 8-11-1995
Forum: CLARION / 05 CFD 3.1
Subject: Error in compiling 3.1
From: Goldberg,Mark 75250, 2551
To: Calvin, 73127, 2010

Hi Calvin,

Check out your Redirection file (*.RED)

Mark

                        End Of Quote

JaredDavis · November 6, 2018, 6:01pm

Thanks for your time.

I just put 3 or 4 gifs in as a test. They don’t appear to be working when they are referenced in the main prj

(imagequate){prop:text} = ‘~myimagefilenameapple.gif’

results in an empty image box.

Does the text of the message contain any interesting bits?

Yes on scripting the image lines. excel formula programming…

jslarve · November 6, 2018, 6:08pm

Hi Jared -

This is all there was. I will send this message to Lee. Maybe he has more stuff to add:

Try creating a couple of “Source” procedures. Add a window to each and
stuff a bunch of the icons in image controls on each window. It does
NOT have to be pretty or organized since it’s only there as a resource
holder. Put each procedure in separate CLW’s and remove the ico files
from the project.

Now give it a try.

JaredDavis · November 6, 2018, 6:10pm

Thanks.

I hope all my old messages go away. I’m pretty sure I was a jerk in a high percentage of clarion posts from the 90s.