Tastatur sperren ??

[Vader]

hallo,

ich müßte bei meinen Prog. für eine Sequenz bzw kurz die Tastatur
sperren das keine Eingaben gemacht werden können.
Jetzt hab ich das so probiert aber es funzt nicht.

Code:

procedure TForm1.Button1Click(Sender: TObject); 
begin 
BlockInput(true); //   sperren
end; 

procedure TForm1.Button2Click(Sender: TObject); 
begin 
BlockInput(false);   //  entsperren
end;

er sagt beim compilieren : undefinierte Bezeichnung BlockInput,
muß ich irgeneine Variable definieren oder im use eine Apifunktion
reinschreiben :(


mfg vader

[Matze]

Die DP hat ne Suchfunktion. ;)

Delphi-Quellcode:

var
  Form1: TForm1;

implementation

{$R *.dfm}

function BlockInput (fBlockInput : boolean) : DWord; stdcall; external 'user32.DLL'; 

procedure TForm1.Button1Click(Sender: TObject); 
begin 
BlockInput(true); 
end; 

procedure TForm1.Button2Click(Sender: TObject); 
begin 
BlockInput(false); 
end;

[hacker]

Hi!

Wenn ich das beispiel von Matze nehme, ist bei mir die Maus auch ausgeschaltet....wieso?


Gruss Häcki :hi:

[Stanlay Hanks]

Wahrscheinlich weil zu "Input" alle Signale von EIngabegeräten gehören :gruebel:

[Matze]

Achso, sorry, stimmt :wall: sperrt ja auch die Maus.

Ich hoffe, du hast den PC nicht neu gestartet. ;)

[hacker]

Ne hab ich nicht...Task beenden geht komischerweise noch :mrgreen:


Gruss Häcki :hi:

[Dagon]

Zitat:

Zitat von Irgend eine Seite im Internet

Bemerkung: Läuft nur unter Windows 98/2000 und
späteren Versionen.
Eine Blockierung kann mit
CTRL+ALT+DEL aufgehoben werden.

[devnull]

und was würde passieren, wenn der task-manager deaktiviert wäre ? oder gilt das generell ???

[hacker]

Na das wäre wohl eine Erklärung.... :-D


Gruss Häcki :hi:

[hacker]

Wenn der Task Manager deaktiviert wäre müsstest du wohl deinen pc neu starten.... :mrgreen:


Gruss Häcki :hi:

[Robert Marquardt]

Warum setzt du nicht einen Application.OnMessage Filter und filterst alle Keyboard-Messages weg?
Systemweit den Input zu blockieren ist Wahnsinn.

[Vader]

danke werd´s probiern !

mfg vader

[Stanlay Hanks]

Hi. Ich weiß ja nicht, wo du keine Eingaben haben willst. Aber du könntest doch einfach,wenn du z.B. keine in einem Memo haben willst, dieses Memo auf enabled := false setzen. Mir wäre es lieber, ein deaktivierte Control vor mir zu haben, als dass ich gar keine Eingaben mehr machen kann.

Man liest sich, Stanlay :hi:

[Luckie]

Ergänzent zu Stanley: Was denkst du, wie beliebt dein Perogramm ist, wenn nur wegen deinem Programm mein Rechner für 5 Minuten blockiert ist, nur weil du nicht in der Lage warst gescheit zu programmieren? :evil:

[Assarbad]

Darf ich bitte den Namen des Programms erfahren um es auf meine persönliche Blacklist zu stellen?!!