Einzelnen Beitrag anzeigen

Volker Z.

Registriert seit: 3. Dez 2012
Ort: Augsburg, Bayern, Süddeutschland
419 Beiträge
 
Delphi XE4 Ultimate
 
#3

AW: Anfrage wegen der Fehlermeldung ungenügende Forward- oder Externaldeklaration

  Alt 11. Mär 2013, 22:40
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ß
Volker Zeller
  Mit Zitat antworten Zitat