Einzelnen Beitrag anzeigen

Benutzerbild von SleepyMaster
SleepyMaster

Registriert seit: 18. Mai 2003
634 Beiträge
 
#5

Re: VCL-Komponenten in Prozedur ansprechen geht nicht

  Alt 29. Okt 2003, 15:18
Oder nenn deine Procedure TForm1.XYZ und setz dann in den Public Teil von TForm1: "procedure XYZ;"

Beispiel:
Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    procedure XYZ; //<------Muss so aussehen wie unten das
  end;
                       
var
  Form1: TForm1;
                          
implementation
                         
{$R *.dfm}               

procedure TForm1.XYZ; //<------nur oben bei dem muss man das "TForm1." weglassen
begin
Edit1.Text:=Edit1.Text;
end;

end.
  Mit Zitat antworten Zitat