Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Ayuda con TKinect (https://www.clubdelphi.com/foros/showthread.php?t=92950)

LuisHatake 26-03-2018 18:35:21

Ayuda con TKinect
 
Hola de nuevo chicos un saludo a todos. Alguien me puede ayudar con la conexión al Kinect, Utilizo w7 32 bits y el modelo del kinect es el 1414 he descargado el ejemplo que viene en delphimagic sobre el uso del kinect pero al compilarlo me marca el siguiente error: "[dcc32 Error] Main.pas(480): E2033 Types of actual and formal var parameters must be identical", lo anterior sucede en esta linea Fsensor.NuiImageStreamOpen() he cambiado las dos variables de tipo cardinal a THandle y al compilar la aplicación se inicia pero al pulsar el boton de inicio no hace nada. Después de esto he realizado pruebas de debug y he encontrado que existe la función NuiGetSensorCount que lo que realiza es devolverte el numero de kinects conectados al pc, al parecer hasta aquí todo bien ya que me devuelve un 1 cuando esta conectado el kinect y un 0 cuando no esta conectado, Después de esto se ejecuta el siguiente trozo de código:
Código Delphi [-]
i := 0;
   while (Fsensor = nil) and (i<=count) do
   begin
     if Not Failed(NuiCreateSensorByIndex(i,sensorEnum)) then
     begin
       if (sensorEnum.NuiStatus=S_OK) then
       begin
         Fsensor:=sensorEnum;
       end;
     end;
     Inc(I);
   end;
en donde al realizar pruebas la condición que no se ccumple es "if (sensorEnum.NuiStatus=S_OK) then" entonces por consecuencia no se hace la asignacion. he probado el Kinect en otra computadora con otro programa y el kinect funciona correctamente. La version del SDK que he descargado es la 1.7. De ante mano muchas gracias a todos por su ayuda. Saludos!

yusnerqui 26-03-2018 18:48:27

Pa mi delphi 7 no hay :(

LuisHatake 26-03-2018 20:36:26

No te entiendo
 
Cita:

Empezado por yusnerqui (Mensaje 525292)
Pa mi delphi 7 no hay :(

que hay! no entiendo a que te refieres. jeje gracias por contestar y espero me puedas ayudar un saludo!! estoy utilizando Delphi XE7 y ya tengo el kinect 1414 y el eliminador que utiliza para conectarlo al pc. muchas gracias! por cierto has revisado este link http://delphimagic.blogspot.mx/2015/...on-delphi.html ?


La franja horaria es GMT +2. Ahora son las 00:48:10.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi