hi,
ich hab da ein problem in delphi4:
ich möchte einer prozedur die aufgabe
geben, ein label zu ändern:


implementation
{$R *.DFM}

procedure prozi;
begin
lblExit.Caption:='Exit';
end;

procedure Button1Click(Sender: TObject)
begin
prozi;
end;


so ähnlich, aber der compiler meckert:

'Undefinierter ezeichner "lblExit"'

So What?

.... says (z)red.

Hallo erstmal,

dein Programm kennt deine Procedure noch nicht.
Ich habe noch einmal mit Rot hervorgehoben, was wichtig ist.

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38

[b]unit[/b] Unit1;   [b]interface[/b]   [b]uses[/b]   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,   StdCtrls;   [b]type[/b]   TForm1 = [b]class[/b](TForm)     Label1: TLabel;     Button1: TButton;     [COLOR=red][b]procedure[/b] ChangeNames(Name: [b]string[/b]);[/color]     [b]procedure[/b] Button1Click(Sender: TObject);   private     [i]{ Private-Deklarationen }[/i]   [b]public[/b]     [i]{ Public-Deklarationen }[/i]   [b]end[/b];   [b]var[/b]   Form1: TForm1;   [b]implementation[/b]   [i]{$R *.DFM}[/i]   [b]procedure[/b] [COLOR=red]TForm1.[/color]ChangeNames(Name: [b]string[/b]); [b]begin[/b]   Label1.Caption:=Name; [b]end[/b];   [b]procedure[/b] TForm1.Button1Click(Sender: TObject); [b]begin[/b]   ChangeNames('Mein Name'); [b]end[/b];   [b]end[/b].

danke!
jetzt gehts, man sieht sich

Kein Problem. Wenn du noch weitere (bzw. andere) Fragen hast, einfach posten ...