Einzelnen Beitrag anzeigen

vcore

Registriert seit: 2. Jan 2007
2 Beiträge
 
#1

FileRun nach einmaligem ausführen deaktivieren

  Alt 2. Jan 2007, 13:46
hallo zusammen,
habe ein kleines problem und konnte über sufu nichts finden.hoffe ihr könnt mir helfen,dürfte aber nicht so schwer sein.
bitte nachsicht da anfänger.

es handelt sich um ein programm für eine webcam.
dort habe ich eine procedure TForm1.OnMotionDetect
über eine matrize erkenne ich veränderung der pixel und bei bewegung soll eine datei (.exe) gestartet werden.
das funktioniert soweit nur das starten der exe macht probleme.diese soll nur einmal gestartet werden und nicht immer wieder wenn bewegung erkannt wird.

das ganze funktioniert im moment so:

procedure TForm1.OnMotionDetect ... usw.
Button2.Click; (der button ist unsichtbar und hat als action FileRun1)
end;

(über button 3 wähle ich vorher die exe,die gestartet wird wenn bewegung erkannt wird)

procedure TForm1.Button3Click(Sender: TObject);
begin
OpenDialog2.Execute();
FileRun1.FileName := OpenDialog2.FileName;
end;

das muss doch auch viel eleganter gehen ohne button2 und wichtig ist dass die ausgewählte exe nur einmal gestartet wird.
kann man FileRun1 irgendwie deaktivieren,sobald darüber die exe gestartet wurde?

bitte um nachsicht ob der unbeholfenen ausdrucksweise,danke


gruss vcore
  Mit Zitat antworten Zitat