Anfrage wegen der Fehlermeldung ungenügende Forward- oder Externaldeklaration

[Sir Rufo]

CrossPosts sind kein Fehler, wenn man auch darauf per Link hinweist

[Volker Z.]

Hallo,

Delphi-Quellcode:

unit Pieptonunterdruecken;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    CheckBox1: TCheckBox;
    Button1: TButton;
    procedure Edit1Change(Sender: TObject); // <-- Wo ist den der entsprechende Methodenteil in der Implementation?
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); // <-- Wo ist den die entsprechende Deklaration in Deiner Klasse?
begin
if CheckBox1.Checked then if key = #13 then key := #0
end;

end.

Gruß