Fehlermeldung Identifier not found

[Joachim Raap]

[gelöst] Hallo, ich suche mir (Anfänger) gerade einen Wolf! Folgendes Problem: Ich habe ein Formular entwickelt, auf dem Editfelder vorhanden sind, die mehrheitlich auf Visible=false gesetzt sind. Das Formular wird mit "TFMArtStamm" als Type mit den entsprechenden Elementen gezeigt.
Nun habe ich eine Procedure geschrieben, die bestimmte Editfelder dieses Formulares auf Visible=true setzt (setzen soll....). Aber der Kollege meint, "Identifier not found" und zeigt den ersten (angeblich) nicht gefundenen Feldnamen an.
Den Procedurekopf habe ich mit "procedure Historie" unter der Formulardefinition aufgenommen - damit müßten die Feldnamen doch bekannt sein und es müßte funzen; oder? (na ja, offensichtlich nicht). Die Procedure selbst ist wie folgt definiert
"procedure Historie (Wert1, Wert2 : integer);" und fragt Case-Bedingungen von Wert1 bzw. Wert2 ab....

Was habe ich denn falsch gemacht bzw. was fehlt?

[Mathias]

Kannst du nicht die Fehlermeldung und den dazugehörigen Code ins Forum stellen ?

[Winni]

Hi!

So wie Du das beschreibst, glaube ich, Du hast vergessen, dass Deine prozedure Teil von TFMArtStamm ist.

So geht das:

Code: Alles auswählen

procedure TFMArtStamm.Historie;
begin
....
end;

Hab ich richtig geraten?

Winni

[Joachim Raap]

winni: ne - habe ich auch probiert und so steht es derzeit im Code
Matthias: hier ein zusammengedampfte Code (die ganze Unit ist inzwischen zu groß) - reicht hoffentlich

[Joachim Raap]

Ach ja - aufgerufen wird die Procedure mit "FMArtStamm.PreisHistorie(AnzeigeEKP, AnzeigeVKP);"
"AnzeigeEKP" und "AnzeigeVKP" sind Integer.

[Mathias]

@Joachim Raap

Bitte markiere deinen Code un klicke auf das </> Symbol.
Dann ist dein Code besser lesbar.

[Ally]

Hallo Joachim,

probiere mal procedure PreisHistorie(EKPNext,VKPNext:integer); an Stelle von procedure PreisHistorie();

Gruß Roland

[wennerer]

Hi Joachim,
trag mal oben zwischen die leeren Klammern deine Variablen ein.

Code: Alles auswählen

procedure BtSpeichernClick(Sender: TObject);
procedure CBAnzeigeLVChange(Sender: TObject);
procedure EdtStaNrEnter(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure LVArtStammClick(Sender: TObject);
procedure PreisHistorie(); //Hier fehlt es  procedure PreisHistorie(AnzeigeEKP, AnzeigeVKP:integer);

FMArtStamm.PreisHistorie(AnzeigeEKP, AnzeigeVKP);

und die Variable EdtEKP2 finde ich oben auch nicht, ich seh nur EdtEKPab12. Vielleicht bringt dich das schon weiter.

Viele Grüße Bernd

[Joachim Raap]

Hallo Bernd funktioniert weder mit den "Übergabevariablen" noch mit den in der Procedure verwendeten Variablen - Identifiert not found "EdtEKP2" (heul)

[Joachim Raap]

Bernd - Du bist mein Held!!!!!
"EdtEKP2" gibt es auch nicht (mehr) - die heißt jetzt "FSEdtEKP2"! Klar das der Kollege rumzickt!!!!
Danke!!!!!

[Joachim Raap]

............und Dir Roland auch!!!!

[af0815]

Wenn man was geändert hat bei der Deklaration kann man das mit Shift+Strg+C synchnosieren in Lazarus. Steht man im implemnetierungsteil so wird das Interface gesynct und umgekehrt.
Will man den Namen der funktion bzw. procedure ändern verwendet man besse F2 im interfaceteil.

Als Beginner mit Lazarus, sollte man sich die Shortcuts der IDE mal ansehen, die können einem das Leben viel leichter machen (Siehe Strg+j)

Irgendwo hatten wir die Shortcuts mal gesammelt hier im Forum (ist schon länger her) oder zumindest einen Link drauf.

[sstvmaster]

Irgendwo hatten wir die Shortcuts mal gesammelt hier im Forum (ist schon länger her) oder zumindest einen Link drauf.

Meinst du das? viewtopic.php?p=16836#p16836

Oder:
- https://wiki.freepascal.org/Lazarus_IDE_Tools/de
- https://wiki.freepascal.org/Lazarus_IDE_Shortcuts

[af0815]

An den Link im Forum habe ich mich erinnert, war ja eh fast gestern 2008

Ich glaube die anderen sind aktueller.