Procedure im Object

[youuu]

Hi,

ich habe ein Object.

Delphi-Quellcode:

  TCompanySize = class
  Private
    const Small = 'Klein';
    const Middle = 'Mittel';
    const Large = 'Groß';
  Public
    Procedure CompanySizeAdd(ComboBox: TAdvComboBox; Customer: TObject; OldSize: string);
  End;

nun möchte ich dir Procedure in einer anderen Unit aufrufen, doch das Funktioniert nicht.
[DCC Fehler] UnitKundenInfo.pas(259): E2003 Undeklarierter Bezeichner: 'CompanySizeAdd'

Unit in der das Objekt liegt habe ich allerdings eingebunden.
Was habe ich vergessen?

[guidok]

Hast du auch eine Instanz der Klasse erzeugt?

Delphi-Quellcode:

company : TCompanySize;

...

company := TCompanySize.Create;
company.SizeAdd //usw...

[bigben37]

Zitat von guidok:

Hast du auch eine Instanz der Klasse erzeugt?

Dann müsst aber eine AV auftreten, aber er kann den Code gar nicht kompilieren.

Du musst das halt so aufrufen:

Delphi-Quellcode:

var
CompanySize: TCompanySize 
begin
.
.
.

CompanySize.CompanySizeAdd(...);

Edit: Zeig uns dochmal, wie du das in der anderen Unit aufrufst.

[Aphton]

[quote="bigben37"]

Zitat von guidok:

Du musst das halt so aufrufen:

Wäre nicht schlecht, zu erwähnen, dass Klassen erst per Create erstellt werden muss

Delphi-Quellcode:

var
  KlassenInstanz: TKlassenTyp;

...

  KlassenInstanz := TKlassenTyp.Create;
  KlassenInstanz.Procedure1();
  KlassenInstanz.Free; // sollte man später auch nicht vergessen ...

MfG

[youuu]

Edit:

Hat sich erledigt Funktioniert.
Danke an Aphthon, genau das war es

[SimStar001]

Zitat von youuu:

Hi,

Delphi-Quellcode:

  TCompanySize = class
  Private
    const Small = 'Klein';
    const Middle = 'Mittel';
    const Large = 'Groß';
  Public
    Procedure CompanySizeAdd(ComboBox: TAdvComboBox; Customer: TObject; OldSize: string);
  End;

hast du denn überhaupt die Funktion im Interface Teil geschrieben???

[guidok]

Zitat von Aphton:

Wäre nicht schlecht, zu erwähnen, dass Klassen erst per Create erstellt werden muss

Hm, steht doch oben...