Registriert seit: 4. Dez 2012
Ort: Augsburg, Bayern, Süddeutschland
419 Beiträge
Delphi XE4 Ultimate
|
AW: Anfrage wegen der Fehlermeldung ungenügende Forward- oder Externaldeklaration
11. Mär 2013, 23: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
|
|
Zitat
|