zu 1)
Delphi-Quellcode:
for i:=0 to stringgrid.rowcount-1 do
stringgrid.rows[i]:='';
zu 2)
arbeite doch mit butVerschlüssel.enabled.
Wenn OK gedrückt wurde dann setzt Du butVerschlüssel.enabled:=true
und nach dem Verschlüssel butVerschlüssel.enabled:=false.
Das sollte auffällig genug sein.
Ansonsten arbeite mit einer boolschen Variablen istOKgedrückt.
Gruß
K-H