Date   

Re: Transfer of BB4W to Groups.io

Richard Russell
 

Can I ask people to give this group a chance, and not to be too quick to criticise?  It's going to take everyone a while to get used to the differences between the way this group works compared with Yahoo!  Of course I understand that a subset of members will criticise any decision I take, and generally do their utmost to make my life a misery.  Sadly the automatic transfer process will have brought them here along with everybody else.  :(

Richard.


Re: 3D Gaming Project

Richard Russell
 

On Fri, May 6, 2016 at 11:17 am, Ric <eatondrink@...> wrote:

I have gone to the files section and can not see a way to add files, I cant even see any other files, how does it work?

The reason you can't see any other files is that there aren't any yet!  There should be an upload button.

But for 'work in progress' files with only a short lifetime you might prefer to upload them to a cloud storage site (e.g. Dropbox) and publish a public link.

Richard.


Re: Code posting

Richard Russell
 

On Fri, May 6, 2016 at 08:42 am, Ric <eatondrink@...> wrote:

Finally found it to the site, can someone tell me how to post code

You can upload to the group's Files area, but since I've not yet set up a folder structure please try to keep it tidy.  I still hope to transfer many of the Yahoo group's files here, but as it seems that can only be done manually it could take a while!

For 'work in progress' files, with only a short lifetime, you might prefer to upload them to a 'cloud' storage site (e.g. Dropbox) and then publish a public link.

Richard.


Re: 3D Gaming Project

Ric
 

I have gone to the files section and can not see a way to add files, I cant even see any other files, how does it work?


Re: 3D Gaming Project

Ric
 

Thanks Richard, I was just trying to get a message on the board, so it was probably my fault. I will try the files section.


Re: 3D Gaming Project

Richard Russell
 

Ric and Robin: if you're posting by email can you please check your settings because everything is appearing (at least) twice!

This group should have the same configuration as the old Yahoo group, so no attachments (they are not much use for those of us who access the group via its web interface!).  Feel free to upload to the group's Files area, although I've not set up a folder structure yet so please be careful to keep it tidy.

Richard.



Re: 3D Gaming Project

Ric
 

that is beyond my knowledge, I am computer illiterate when it comes to technical stuff, Is there a way that is simple to share my code?


Re: 3D Gaming Project

Robin Hodson
 

On 6/5/2016 1842, Ric wrote:
cheers, I was hoping to send as complete file as code is 42000 chars long
The website has "view source" links. These link to email source type displays of the forum messages, so perhaps if you try sending your code as an HTML email?


Re: 3D Gaming Project

Robin Hodson
 

On 6/5/2016 1837, Ric wrote:
cheers bud,

was there an attachment?
No email attachment.


Re: 3D Gaming Project

Ric
 

cheers, I was hoping to send as complete file as code is 42000 chars long


Re: 3D Gaming Project

Ric
 

cheers bud,

was there an attachment?


Re: 3D Gaming Project

Robin Hodson
 

On 6/5/2016 1830, Ric wrote:
Is it working this time?

_._,_._,_
------------------------------------------------------------------------
Oh, sorry, posts appear but no code.

Perhaps using BBcode will work, eg enclosing script segments in [code]...[/code]


Re: 3D Gaming Project

Robin Hodson
 

On 6/5/2016 1830, Ric wrote:
Is it working this time?

It is, if replies work via email.


3D Gaming Project

Ric
 

Is it working this time?


Code posting

Ric
 

Finally found it to the site, can someone tell me how to post code.


Many thanks

Ric


Re: Loading a GIF or JPEG image WIKI

J.G.Harston
 

Oops, pressed SEND instead of SAVE.

"SendMessage", hbox%, STM_SETIMAGE, 0, hbitmap%"
What is the missing variable? Why does it not run? Help appreciated.
If you add the line
PRINT hbox%, STM_SETIMAGE, 0, hbitmap%
just before the SYS that will tell you which variable isn't defined
by how many items get printed before the error occurs.
hbox% is the _H_andle to the dialogue _BOX_ that you are displaying the
image in. So, you must have opened a dialogue box with which you have
a handle to to use to say what dialogue box you want the image
displayed in.

--
J.G.Harston - jgh@mdfs.net - mdfs.net/jgh


Re: Loading a GIF or JPEG image WIKI

svein svensson
 

Can't see hbox% initialized ......
Hence 'no such variable' ?

Svein

4. mai 2016 18.29 skrev <chriscoxall@...>:

Except for file open dialogue box the code below was pasted in from wiki.

When run "no such variable" is repoted for the line     " SYS "SendMessage", hbox%, STM_SETIMAGE, 0, hbitmap%"

What is the missing variable? Why does it not run? Help appreciated.


      PROC_openfile
      PRINT imgfile$

      STM_SETIMAGE = &172
      hbitmap% = FNloadimage(imgfile$, cx%, cy%)
      SYS "SendMessage", hbox%, STM_SETIMAGE, 0, hbitmap%
      END

      DEF PROC_openfile
      DIM fs{lStructSize%, hwndOwner%, hInstance%, lpstrFilter%, \
      \      lpstrCustomFilter%, nMaxCustFilter%, nFilterIndex%, \
      \      lpstrFile%, nMaxFile%, lpstrFileTitle%, \
      \      nMaxFileTitle%, lpstrInitialDir%, lpstrTitle%, \
      \      flags%, nFileOffset{l&,h&}, nFileExtension{l&,h&}, \
      \      lpstrDefExt%, lCustData%, lpfnHook%, lpTemplateName%}
      DIM fp{t&(260)}
      ff$ = "Jpeg files"+CHR$0+"*.jpg"+CHR$0+CHR$0
      fs.lStructSize% = DIM(fs{})
      fs.hwndOwner% = @hwnd%
      fs.lpstrFilter% = !^ff$
      fs.lpstrFile% = fp{}
      fs.nMaxFile% = 260
      fs.flags% = 6


      SYS "GetOpenFileName", fs{} TO result%
      IF result% imgfile$ = $$fp{}
      ENDPROC


      DEF FNloadimage(file$, cx%, cy%)
      LOCAL iid{}, hbm%, hcopy%, pic%, ole%, olpp%, text%
      DIM iid{a%,b%,c%,d%}, text% LOCAL 513

      iid.a% = &7BF80980 : REM. 128-bit iid
      iid.b% = &101ABF32
      iid.c% = &AA00BB8B
      iid.d% = &AB0C3000

      SYS "MultiByteToWideChar", 0, 0, file$, -1, text%, 256

      SYS "LoadLibrary", "OLEAUT32.DLL" TO ole%
      SYS "GetProcAddress", ole%, "OleLoadPicturePath" TO olpp%
      IF olpp%=0 THEN = 0

      SYS olpp%, text%, 0, 0, 0, iid{}, ^pic% : REM. OleLoadPicturePath
      IF pic%=0 THEN = 0

      SYS !(!pic%+12), pic%, ^hbm% : REM. IPicture::get_Handle
      IF hbm%=0 THEN = 0

      SYS "CopyImage", hbm%, 0, cx%, cy%, 0 TO hcopy%
      SYS "DeleteObject", hbm%
      SYS !(!pic%+8), pic% : REM. IPicture::Release

      = hcopy%

Thanks in advance

Regards Chris


Re: Loading a GIF or JPEG image WIKI

J.G.Harston
 

chriscoxall wrote:
Except for file open dialogue box the code below was pasted in from
wiki.
When run "no such variable" is repoted for the line " SYS
"SendMessage", hbox%, STM_SETIMAGE, 0, hbitmap%"
What is the missing variable? Why does it not run? Help appreciated.
If you add the line
PRINT hbox%, STM_SETIMAGE, 0, hbitmap%

just before the SYS that will tell you which variable isn't defined
by how many items get printed before the error occurs.

--
J.G.Harston - jgh@mdfs.net - mdfs.net/jgh


Loading a GIF or JPEG image WIKI

Chris Coxall
 

Except for file open dialogue box the code below was pasted in from wiki.

When run "no such variable" is repoted for the line     " SYS "SendMessage", hbox%, STM_SETIMAGE, 0, hbitmap%"

What is the missing variable? Why does it not run? Help appreciated.


      PROC_openfile
      PRINT imgfile$

      STM_SETIMAGE = &172
      hbitmap% = FNloadimage(imgfile$, cx%, cy%)
      SYS "SendMessage", hbox%, STM_SETIMAGE, 0, hbitmap%
      END

      DEF PROC_openfile
      DIM fs{lStructSize%, hwndOwner%, hInstance%, lpstrFilter%, \
      \      lpstrCustomFilter%, nMaxCustFilter%, nFilterIndex%, \
      \      lpstrFile%, nMaxFile%, lpstrFileTitle%, \
      \      nMaxFileTitle%, lpstrInitialDir%, lpstrTitle%, \
      \      flags%, nFileOffset{l&,h&}, nFileExtension{l&,h&}, \
      \      lpstrDefExt%, lCustData%, lpfnHook%, lpTemplateName%}
      DIM fp{t&(260)}
      ff$ = "Jpeg files"+CHR$0+"*.jpg"+CHR$0+CHR$0
      fs.lStructSize% = DIM(fs{})
      fs.hwndOwner% = @hwnd%
      fs.lpstrFilter% = !^ff$
      fs.lpstrFile% = fp{}
      fs.nMaxFile% = 260
      fs.flags% = 6


      SYS "GetOpenFileName", fs{} TO result%
      IF result% imgfile$ = $$fp{}
      ENDPROC


      DEF FNloadimage(file$, cx%, cy%)
      LOCAL iid{}, hbm%, hcopy%, pic%, ole%, olpp%, text%
      DIM iid{a%,b%,c%,d%}, text% LOCAL 513

      iid.a% = &7BF80980 : REM. 128-bit iid
      iid.b% = &101ABF32
      iid.c% = &AA00BB8B
      iid.d% = &AB0C3000

      SYS "MultiByteToWideChar", 0, 0, file$, -1, text%, 256

      SYS "LoadLibrary", "OLEAUT32.DLL" TO ole%
      SYS "GetProcAddress", ole%, "OleLoadPicturePath" TO olpp%
      IF olpp%=0 THEN = 0

      SYS olpp%, text%, 0, 0, 0, iid{}, ^pic% : REM. OleLoadPicturePath
      IF pic%=0 THEN = 0

      SYS !(!pic%+12), pic%, ^hbm% : REM. IPicture::get_Handle
      IF hbm%=0 THEN = 0

      SYS "CopyImage", hbm%, 0, cx%, cy%, 0 TO hcopy%
      SYS "DeleteObject", hbm%
      SYS !(!pic%+8), pic% : REM. IPicture::Release

      = hcopy%

Thanks in advance

Regards Chris


Re: "Responding to a hot key " example

Richard Russell
 

Does the "desk top publisher with spread sheet function ability" support ActiveX (COM automation)?  If it does you should be able to do what you want directly without the complication of using AutoHotkey.  See this Wiki article for how to use ActiveX from BBC BASIC (it's a slight shame you are not using Excel on the PC because the article uses it for its examples):

http://bb4w.wikispaces.com/Component+Object+Model+programming

Richard.




3061 - 3080 of 23891