VCL-Komponenten in Prozedur ansprechen geht nicht

[flashb4t]

Hallo,

ich habe ein kleines Problemchen. Ich habe eine Prozedur geschrieben, die bestimmte VCL-Komponenten auf dem Form verändern soll (deaktivieren, caption ändern usw.) - alles total banales zeug...

nur wenn ich das ganze kompilieren will, bekomm ich exemplarisch folgenden fehler:

Zitat:

[Fehler] Unit1.pas(88): Undefinierter Bezeichner: 'Button3'

button3 gibt es auf jeden fall un wenn ich das ganze als onclick bei einem anderen button oder dergleichen mache gehts natürlich auch ohne probleme...

muss ich in der prozeduren deklaration oder an der form-deklaration diesbezüglich noch etwas ändern oder woran mag das ganze liegen?

danke schonmal

[mirage228]

Hallo,

prüfe mal, ob die Prozedur unter public im MainForm aufgelistet ist und ob die Prozedur den Namen TNameDesForms.EineProzedur trägt.

mfG
mirage228

[S - tefano]

Oder sprech den Button nicht per Button3.blabliblub an, sondern per Form1.Button3.blabliblub.

Bis dann,

S - tefano

[flashb4t]

Zitat von S - tefano:

Oder sprech den Button nicht per Button3.blabliblub an, sondern per Form1.Button3.blabliblub.

Bis dann,

S - tefano

das hat geholfen vielen dank

[SleepyMaster]

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.

[S - tefano]

Das hatte mirage aber doch schon vorgeschlagen, woll?

Bis dann,

S - tefano

[SleepyMaster]

@S - tefano Upps hatte nur den von dir gelesen gehabt!