Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-pascal / 2016-05

fpc/lazarus and kinect sample

6 messages · 3 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Björn Lundin

Hi!
I got an xbox 360 kinect, which I'd
like to use for controlling a drone (Crazyflie 2).

https://www.youtube.com/watch?v=UzFwg2Fpv4E

The drone software is all in a virtual machine, and I do not get the kinect to work with that machine. (3d accelerated cards are hard to get to work well)

So, my next thought is to get the data from a win-box, using fpc, and get some data needed, and pushing that onto a socket.

I found the nice article "Programming the Microsoft Kinect in Pascal" by Michaël Van Canneyt, in Blaise Pascal Magazine. (Nr 5 / 2013)

However, I wonder if anyone have seen the sample code somewhere published on the web ?
I do not get it all quite together as is,
and copy/paste from a 2 columns pdf is challenging to say the least.

Björn
Unknown author
to Björn Lundin
Björn Lundin wrote 7 lines
I found the nice article "Programming the Microsoft Kinect in Pascal" by Michaël Van Canneyt, in Blaise Pascal Magazine. (Nr 5 / 2013) However, I wonder if anyone have seen the sample code somewhere published on the web ? I do not get it all quite together as is, and copy/paste from a 2 columns pdf is challenging to say the least.

doesn't your pdf reader have an "export as text" option? that's what i use when i have to convert pdfs for some blind friends so they can enjoy them, too...

NOTE: No off-list assistance is given without prior approval. *Please keep mailing list traffic on the list* unless private contact is specifically requested and granted.
Björn Lundin
to Unknown author
Show quoted text 13 lines
On 05/10/2016 04:33 PM, Björn Lundin wrote: > I found the nice article "Programming the Microsoft Kinect in Pascal" by > Michaël Van Canneyt, in Blaise Pascal Magazine. (Nr 5 / 2013) > > However, I wonder if anyone have seen the sample code > somewhere published on the web ? > I do not get it all quite together as is, > and copy/paste from a 2 columns pdf is challenging to say the least. doesn't your pdf reader have an "export as text" option? that's what i use when i have to convert pdfs for some blind friends so they can enjoy them, too...

I did try pdftotext, but it made a mess the article The two columns where merged into one, intertwined with each other.

My current reader, Adobe (win 7), does not have an export to text option. It does have a export to word/excel/rtf/ppt option, but only if you have a paid , I'm not quite sure I'll get the sample correct, even if I do manage copy/paste.

But if it not available, then it isn't...

Björn
Michael Van Canneyt
to Björn Lundin
Björn Lundin wrote 26 lines
On 2016-05-10 23:41, wrote: > On 05/10/2016 04:33 PM, Björn Lundin wrote: >> I found the nice article "Programming the Microsoft Kinect in Pascal" by >> Michaël Van Canneyt, in Blaise Pascal Magazine. (Nr 5 / 2013) >> >> However, I wonder if anyone have seen the sample code >> somewhere published on the web ? >> I do not get it all quite together as is, >> and copy/paste from a 2 columns pdf is challenging to say the least. > > doesn't your pdf reader have an "export as text" option? that's what i > use when i have to convert pdfs for some blind friends so they can enjoy > them, too... > I did try pdftotext, but it made a mess the article The two columns where merged into one, intertwined with each other. My current reader, Adobe (win 7), does not have an export to text option. It does have a export to word/excel/rtf/ppt option, but only if you have a paid account at adobe. However, I'm not quite sure I'll get the sample correct, even if I do manage copy/paste. But if it not available, then it isn't...

No worries. I will send it to you, if I can still find it :-)

Michael.

Björn Lundin
to Michael Van Canneyt: No worries. I will send it to you, if I can still find it :-) Michael.
Michael Van Canneyt wrote
No worries. I will send it to you, if I can still find it :-)

If you cannot find it, you perhaps remember :

Procedure TMainForm.FormCreate(Sender: TObject);
Begin
  FESkeleton := INVALID_HANDLE_VALUE;
  FEDepth := INVALID_HANDLE_VALUE;

the text says

The variables FESkeleton and FEDepth are the events used to receive notifications
when the skeleton and depth frames are ready.

but :
FESkeleton - where should it be declared.
FEDepth - where should id be declared

and the text also says

It is a simple
form, with 2 panels, some controls, and 3 shapes on it.

You don't remember WHAT kind of controls and shapes it is ?

I figure : 2 panels, some labels.
The slider for tilt is called TBAngle.
TB is which control? it does not look like a scrollbar.

Yes, Lazarus is new to me, I have not used pascal since 1995.

Björn