Forum: Object-Pascal / Delphi-Language
by erich.wanker,
23. Jun 2010
OK .. Test funktioniert ..
function mylength(s: String): Integer;
var
len: Integer;
begin
len := 1;
while s <> #0 do
inc(len);
result := len-1;
Forum: Object-Pascal / Delphi-Language
by erich.wanker,
23. Jun 2010
Hallo Leute,
Wenn ein Barcodescanner seine Daten schickt, sendet er ascii20 als erstes, gefolgt von dem Strichcodewerten, abschließend Return. Wenn ascii20 via Tastaturhook kommt, soll meine Anwendung aktiv werden. Aber anstelle ascii20 zu emfangen, empfange ich 2 DllMessages mit Wert 84 und 17 ???
Ein Tastaturhook sendet via:
PostMessage(FindWindow(nil,'Versatile'), WM_USER +...