Hello
I am new to Delphi and am having trouble implementing the KeyPressed procedure. On the Internet I find procedures or functions that respond to 1, 2, or several keys, but I have not found anything that would respond to any key. (Equivalent to the Pascal KeyPressed procedure).
I attach a program fragment in which I want to apply the procedure.
.....
begin
.....
Rx := expr;
if Rx = 0.0 then begin
Memo1.Lines.Add( 'Check why Rx = zero ');
Memo1.Lines.Add( 'Press any Key');
repeat
until KeyPressed);
halt
end;
.....
end;
end.
Please help.
Regards
I am new to Delphi and am having trouble implementing the KeyPressed procedure. On the Internet I find procedures or functions that respond to 1, 2, or several keys, but I have not found anything that would respond to any key. (Equivalent to the Pascal KeyPressed procedure).
I attach a program fragment in which I want to apply the procedure.
.....
begin
.....
Rx := expr;
if Rx = 0.0 then begin
Memo1.Lines.Add( 'Check why Rx = zero ');
Memo1.Lines.Add( 'Press any Key');
repeat
until KeyPressed);
halt
end;
.....
end;
end.
Please help.
Regards