Link to home
Start Free TrialLog in
Avatar of Grunge
GrungeFlag for United Kingdom of Great Britain and Northern Ireland

asked on

Datareporter - Images

how can i populate an image box on my datareport on load of the image box depending on the value of a variable?
Avatar of Grunge
Grunge
Flag of United Kingdom of Great Britain and Northern Ireland image

ASKER

reword:

how can i populate an image box on load of my datareport depending on the value of
a variable?
Avatar of Grunge

ASKER

With dtarptBarcodes.Sections("SB_Detail")
  .Controls("image1").Picture = LoadPicture("c:\vbtik.bmp")
  .Controls("image1").Picture = frmMain.Picture1.Picture
End With

neither of these methods work
Avatar of Éric Moreau
have yopu tried:
set .Controls("image1").Picture = LoadPicture("c:\vbtik.bmp")
Avatar of Grunge

ASKER

tried the 'set' command but it didn't work...thanks anyway
Hi Grunge,

The emoreau comment: Set .Controls("Image1").Picture = LoadPicture(myFilePath) work properly.

You can put the code on DataReport_Activate() event.

'Hope will help.
Avatar of Grunge

ASKER

can u check that coz it seems not to work for me.

Thanks
Avatar of Grunge

ASKER

Private Sub DataReport_Activate()


With dtarptBarcodes.Sections("SB_Detail")
Set .Controls("Image1").Picture = LoadPicture("c:\vbtik.bmp")
End With

End Sub


this does not work...
It doesn't offer an error message (infact I can step thorough) but there is no picture displayed...
Hi Grunge,

Try to use another picture/ different file type maybe to test whether it's the picture problem, bcos it work for me. Regards..
Avatar of Grunge

ASKER

There is a problem then... i've tried it on two different development machines :?(
Avatar of Grunge

ASKER

the image is to be a barcode this is because i cannot find a working free barcode true type font...
Avatar of Grunge

ASKER

i have something that will create a barcode image...but not a font which would make things a whole lot easier :?)
Download http://download.cnet.com/downloads/0-10075-101-4004808.html?tag=st.dl.10075-100-4004808-4004808.dln.10075-110-4004808
and you will have these 5 fonts:
File Copy: C:\WINNT\Fonts\Bar25isa.ttf
File Copy: C:\WINNT\Fonts\Bar25sam.ttf
File Copy: C:\WINNT\Fonts\Bar39sam.ttf
File Copy: C:\WINNT\Fonts\Postalsa.ttf
File Copy: C:\WINNT\Fonts\Upcasamp.ttf
Avatar of Grunge

ASKER

Yeah thats the thing except it has demo plastered across its output.... unfortunately our dev budget is exhausted
:'(
Avatar of Grunge

ASKER

Yeah thats the thing except it has demo plastered across its output.... unfortunately our dev budget is exhausted
:'(
I have a font at home (a39t I think) which I found for free some years ago that I can send you if you give me your e-mail address.
Avatar of Grunge

ASKER

cisdev@nwarks-hinckley.ac.uk   ;?)
ASKER CERTIFIED SOLUTION
Avatar of Éric Moreau
Éric Moreau
Flag of Canada image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Please maintain your history:

Questions Asked 17
Last 10 Grades Given B A A B A A A  
Question Grading Record 7 Answers Graded / 7 Answers Received
Avatar of Grunge

ASKER

"Please maintain your history:

Questions Asked 17
Last 10 Grades Given B A A B A A A  
Question Grading Record 7 Answers Graded / 7 Answers Received "

is this directed at me?... what is this in reference to?

i'm goint to recheck that site you gave me....
my manager has authorised a purchase so i'm now looking for an affordable one.
Avatar of Grunge

ASKER

We had strayed from the question here a bit... ideally..since i have a vb module that will create a barcode in an image format id like to use that as described above...
Avatar of Grunge

ASKER

i found one finally! (off that big page u pointed out)

http://home.att.net/~daffy-duck/fonts/free3of9.zip

u need to use * at the start and end of the string

thanks all