Supportnet / Forum / Anwendungen(Java,C++...)
Entsprechung zu ReadKey (Pascal) in Delphi
Frage
Hi,
tja, in Pascal (DOS) gibts ja das einfache ReadKey (Lesen eine Tastatureingabe am Prompt). Ich suche etwas Entsprechendes für ein Delphi-[u]Konsolenprogramm[/u] unter Windows.
Also in der Richtung: "Drücken Sie J/N" und ich will wissen, ob er "j" oder "n" gedrückt hat.
Jemand ´ne Idee, wie man das bewerkstelligen könnte?
Massaraksch
Antwort 1 von Massaraksch
Selber rumprobiert...
Es geht natürlich auch recht einfach mit normalem "Read". Hab´s jetzt so gemacht (Beispiel):
Massaraksch
Es geht natürlich auch recht einfach mit normalem "Read". Hab´s jetzt so gemacht (Beispiel):
program readtest;
{$APPTYPE CONSOLE}
uses sysutils;
var taste: char;
begin
write(´Wollen Sie wirklich? [j/n]: ´);
read(taste);
if lowercase(taste) = ´j´ then writeln(´OK, geht los...´)
else writeln(´Dann eben nicht.´);
end.
Massaraksch