Forum: Multimedia
Delphi
by serasa,
4. Dez 2009
taster ist ein schließer ganz herkömmlich mit einer steuerspannung von 12volt, der steuert eine optokoplerkarte an, die wurde im pc mit usb verbunden. mit dem code
while QApiExtReadDl1(...) = 0 do
Application.ProcessMessages;
kann man nun abfragen und was damit anstellen, habe das so probiert:
Label1.Caption := 'Bereit, warte...';
while QApiExtReadDl1(...) = 0 do
...
Forum: Multimedia
Delphi
by serasa,
30. Nov 2009
Hallo zusammen ich habe ein kleines Program geschrieben für eine video aufnahme, welches in einem teil so ausschaut:
procedure TForm1.StartesequenzielleAufnahme1Click(Sender: TObject);
begin
Aufnahme:=true; AnsichtUpdate1Click(self); //aktualisiere Menüs...
if form1.IniEinzelbild then begin
// Foto - Sequenz
timer1.Interval:=form1.IniIntervall*1000;
...