Hi
ich muss irgendwie rauskriegen ob (irgendeine) Taste gedrückt wird. Das soll nur innerhalb der Konsole sein...
hier ein beispiel wozu ichs brauch^^
nur "KeyHit" exitiert ja nicht
...gibt es denn überhaupt sowas?
Delphi-Quellcode:
function SettingsChange:Boolean;
//Gegebenenfalls Settings-Form erstellen+Anzeigen
var Form: TForm_Settings;
i:Integer;
begin
try
Write('Druecken sie eine Taste um die Einstellungen zu aendern');
i:=0;
while i<5 do
begin
Write('.');
sleep(1000);
if Keyhit then Break else inc(i);
end;
if i<5 then
begin
Form:=TForm_Settings.Create(nil);
Form.ShowModal;
Form.Free;
end;
WriteLn;
Result:=False;
except
Result:=True;
end;
end;