Einzelnen Beitrag anzeigen

concept2015

Registriert seit: 22. Dez 2015
Ort: Nähe Dortmund
44 Beiträge
 
Delphi 7 Professional
 
#1

Warten bis Event OnKeyDown abgearbeitet ist

  Alt 5. Jan 2017, 10:18
Delphi-Version: 7
Problem gelöst !!!
Ich habe in meiner Routine den Focus auf Edit26 gesetzt !
Das war der Fehler
Der Focus geht automatisch weiter.

************************************************** **************


Hallo Spezialisten,
ich habe ein Problem, welches ich auch nach längerem suchen nicht gelöst bekomme. (kann sein, dass ich auch nicht nach dem richtigen Begiff gesucht habe)
Ursprünglich habe ich meine Programme mit Visual Dbase programmiert.
Seit dem Tod des Mitarbeiters, in der Firma meines Freundes, der die Programme in dieser Firma entwickelt hat, beschäftige ich mich mit Delphi (freiwillig und kostenlos)
Jetzt zu meinem Problem:
In dem bestehenden Programm werden Zahlen von Hand, in mehrere Edit Felder eingetragen und ausgewertet.

Für dieses Programm habe ich eine optische Leseeinheit (Auswertung von Belegen in denen Zahlen markiert sind) eingebunden.
Hier werden jetzt mehrere Zahlen bereitgestellt.

Mein Problem ist: an Edit1 (bestehendes Prog.) wird eine Zahl gesendet und mit
Keybd_Event(VK_RETURN,0,0,0);
Keybd_Event(VK_RETURN,0,KEYEVENTF_KEYUP,0);
übergeben.
Jetzt wird das Event TForm1.Edit1KeyDown ausgelöst und eine Folge abgearbeitet.

In meiner Prozedur muss jetzt gewaret werden bis das Event TForm1.Edit1KeyDown abgearbeitet ist bevor ich in das nächste Feld(Edti26) die nächste Zahl eintragen kann.

Das bekomme ich nicht hin

Kurzfassung:
Mehrere Editfelder werden automatisch ausgefüllt.
Ich sende (aus meiner Procedure) Zahl 1 an Edit1 in der gleichen Form.
Bevor ich Zahl2 an Edit26 sende, muss das Event von Edit1 fertig sein.

Bitte dringend um HILFE

Geändert von concept2015 ( 5. Jan 2017 um 10:49 Uhr) Grund: gelöst