Autor Beitrag
Megara
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Mo 07.01.08 09:28 
Ich hab ein Programm geschrieben zur Ansteuerung einer Kamera mit Hilfe des im Forum gefunden Codes. Ich hab das Programm zuerst an einer USB-Kamera getestet wo es auch funktioniert. Nun wollte ich eine Funkkamera benutzen und nun wenn ich das Delphi-Programm starten will startet sich der PC neu, das glecihe geschieht auch auf meinem Laptop. Der Treiber ist korrekt installiert. Kann mir bitte jemand helfen.
hathor
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mo 07.01.08 10:18 
Natürlich, können wir!
Wir sind ja alle Hellseher!

Ich weiss übrigens schon die Lottozahlen der nächsten Ziehung.
Falls jemand interessiert ist: kostet schlappe 1000 €.
Megara Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Mo 07.01.08 10:22 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
procedure TfrmMain.FormCreate(Sender: TObject);
begin
  CWND := capCreateCaptureWindowA('Video',WS_CHILD + WS_VISIBLE,0,0500,500,pnVideo.Handle,1);
  SendMessage (cwnd,WM_CAP_DRIVER_CONNECT,0,0);
  SendMessage (cwnd,WM_CAP_SET_PREVIEWRATE,30,0);
  SendMessage (cwnd,WM_CAP_SET_OVERLAY,1,0);
  SendMessage (cwnd,WM_CAP_SET_PREVIEW,1,0);
end;


USB-Funkkamera 2,4 GHz Quelle: Pollin Artikelnummer: 580 162
user defined image

Moderiert von user profile iconNarses: Code- durch Delphi-Tags ersetzt
F34r0fTh3D4rk
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 5284
Erhaltene Danke: 27

Win Vista (32), Win 7 (64)
Eclipse, SciTE, Lazarus
BeitragVerfasst: Mo 07.01.08 11:46 
funktioniert die Kamera denn mit einem anderen Programm ?

mfg
Megara Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Di 15.01.08 08:12 
Hab gerade mit dem dazugehörigen Program getestet und in diesem Programm läuft die Kamera. Wenn ich dann wieder Delphi starte um die Kamera anzusteueren, startet der PC wieder neu.
hazard999
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 162

Win XP SP2
VS 2010 Ultimate, CC.Net, Unity, Pex, Moles, DevExpress eXpress App
BeitragVerfasst: Di 15.01.08 09:50 
Hallo,

wie wärs wenn du die Statusinformationen aus dem Treiber nach jedem Schritt holst?

Und versuch mal GetLastError...

r u

René

_________________
MOV EAX, Result;MOV BYTE PTR [EAX], $B9;MOV ECX, M.Data;MOV DWORD PTR [EAX+$1], ECX;MOV BYTE PTR [EAX+$5], $5A;MOV BYTE PTR [EAX+$6], $51;MOV BYTE PTR [EAX+$7], $52;MOV BYTE PTR [EAX+$8], $B9;MOV ECX, M.Code;MOV DWORD PTR [EAX+$9], ECX
Megara Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: So 20.01.08 18:47 
Hab mal versucht ein einzelnes Programm zu schreiben das nur die Funkkamera ansteueren soll. Bei der USB Webcam von Logitech funktioniert das Programm aber wenn ich die Funkkamera anschliesse startet der PC wieder neu.
Bei Zeit kann man eine Zeit eingeben, die beim drücken des Start-Buttons als Timer-Intervall genutzt wird um jedes Mal nach abgelaufener Zeit ein Bild zu machen.
Mit dem Button kann man jeweils ein Bild erstellen vom Video.
Mit Close verlässt man das Programm.

Hab ein Archiv mithinzugefügt wenn sich jemand das Programm mal ansehen möchte. Wäre nett wenn mir jemand helfen könnte.
Einloggen, um Attachments anzusehen!