Kleine Datenbank speichern unter Verwendung von Zeigern

[omata]

Versuch es mal so...

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if key = #13 then
    key:=#0;
end;