TCombobox als Parameter einer Procedure Fehler E2037

[Maja Jessica]

Guten Abend
Bin verzweifelt und finde den Fehler nicht! Vermutlich einfach nur Stressblind!?
Möchte einer Procedure eine TComboBox als Parameter übergeben,
jedoch zeigt der Compiler den Fehler: E2037 Deklaration von machwasx unterscheidet sich von vorheriger Deklaration.
Habe deshalb so bescheuerte Namen genommen, falls irgendwoanders deklariert, ist aber nicht.
Hier der Code-Auszug, natürlich sinnfrei, aber kurz ;)

Delphi-Quellcode:

unit UnitAchsen;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, StdCtrls, DB, ADODB, DBGrids;

type
  TFormAchsen = class(TForm)
    procedure FormShow(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
    procedure machwasx(boxes : TComboBox; SQL : String);
  public
    { Public declarations }
   MAE_ID : String;
  end;
var
  FormAchsen: TFormAchsen;

implementation

uses UnitHauptformular;

{$R *.dfm}

procedure TFormAchsen.machwasx(boxes : TComboBox; SQL : String);
Var i : integer;
begin
  i := 0;
end;

Ändere ich TComboBox in TEdit dann alles ok, mit TComboBox nicht.

Für mich oberseltsam: Im Hauptformular dieses funktioniert:

Delphi-Quellcode:

procedure CbbFuellenMit(Cbb : TCombobox; SQL, Feld : String; clr : boolean);

// dann 

procedure THauptformular.CbbFuellenMit(Cbb : TCombobox; SQL, Feld : String; clr : boolean);
begin
  // hier schrecklicher Code
end;

Benutze Version Borland Developer Studio Turbo 2006
Danke für's lesen!

[himitsu]

Ich würde mal drauf tippen, dass in UnitHauptformular ein Typ TComboBox drin deklariert wurde,
also in dem USES zwischen dem TComboBox oben und dem TComboBox unten
und somit jeweils unterschiedliche Typen. :angle2:

[Maja Jessica]

Zitat:

Zitat von himitsu (Beitrag 1468131)

Ich würde mal drauf tippen, dass in UnitHauptformular ein Typ TComboBox drin deklariert wurde,
also in dem USES zwischen dem TComboBox oben und dem TComboBox unten
und somit jeweils unterschiedliche Typen. :angle2:

Ja, hast du Recht.
Habe gerade das "uses Hauptformular" rausgenommen, dann ok!
Jetzt muss ich nur noch im Hauptformular finden wo. (Recht lang das File)

// Edit: Da ist der "Verbrecher":

Delphi-Quellcode:

type
 TComboBox = class(StdCtrls.TComboBox)
  public
    procedure MouseWheelHandler(var Message: TMessage); override;
  end;

Mann bist du gut! Danke :)

[jobo]

Also mein Lieblingsfehler ist sowas wie
TCombox
zu schreiben

weitgehend redundanzfrei, aber falsch.

Schau einfach noch mal gründlich nach Tippfehlern.

schönes Wochende

P.S.: Ich bin offensichtlich zu alt und zu langsam

[Maja Jessica]

Zitat:

Zitat von jobo (Beitrag 1468136)

...
P.S.: Ich bin offensichtlich zu alt und zu langsam

Alles gut! Danke auch Dir!

Das Alter steigt bei mir proportional zu der Anzahl der Fehlermeldungen ;)

[himitsu]

Letztes Jahrtausend war ich auch noch viel jünger. :cry:

PS: Die Maus über das untere TComboBox halten oder Strg+Linksklick drarauf und sehen wo es her kommt. (Code-Insight)
:zwinker: