只要单击特定按钮，它就会在Pascal中执行某些操作

Question

Hello。有人可以一直帮助我进行扫描按钮吗？当我单击特定的按钮时，它甚至可以直接执行某些操作吗？我想用9个属性填充记录，但当Im atc时。第四，我要关闭它。我尝试了一些readkey的东西：

procedure searching();
var p:char;search:string='';
begin
     repeat
       p:=readkey();
       write(p);
       search+=chr(p);
       until (p=#27) or (p=#13);
       if (p=#27) then menu()
       else
       ...

但是问题是它写了一些字符，所以无法擦除它，而且我知道后退和再次书写使我的搜索充满了我在那儿不想要的字符。找不到有关Pascal的主题，所以我在这里尝试。请不要为英语发火。希望你明白我的意思，英语也可能是我找不到的问题。等待答案，谢谢，Maroš。

Answer 1

但是问题是它写了一些字符，无法删除它

为什么不呢？只需处理＃8（退格键）并截断search字符串中的最后一个字符即可。您可以同时使用System.Delete（通过删除最后一个字符）和System.SetLength（通过将长度设置为当前长度-1）。